mirrors/doublecmd
2
0
Fork 0
mirror of https://github.com/doublecmd/doublecmd.git synced 2026-06-21 09:58:13 +00:00
Code Issues Projects Releases Packages Wiki Activity

ADD/FTP: support Icon for '/' in FsExtractCustomIconW()

Browse source
This commit is contained in:
rich2014 2026-01-22 00:18:46 +08:00
commit ce6f58dbda
1 changed files with 5 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

8
plugins/wfx/ftp/src/ftpfunc.pas
View file

@ -1093,12 +1093,14 @@ begin
Result:= FS_ICON_USEDEFAULT;
if (ExtractFileDir(RemoteName) = PathDelim) then
begin
if RemoteName[1] = '<' then
asRemoteName:= CeUtf16ToUtf8(RemoteName + 1);
if (asRemoteName='') or (RemoteName[1]='<') then
begin
Result:= FS_ICON_EXTRACTED;
TheIcon^.Format:= FS_ICON_FORMAT_FILE;
asRemoteName:= CeUtf16ToUtf8(RemoteName + 1);
if asRemoteName = cAddConnection then
if asRemoteName = '' then
StrPCopy(RemoteName, gStartupInfo.PluginDir+'ftp.ico')
else if asRemoteName = cAddConnection then
StrPCopy(RemoteName, 'list-add')
else if asRemoteName = cQuickConnection then
StrPCopy(RemoteName, 'view-file');