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

FIX: Show wfx-plugin icon under GTK2

Browse source
This commit is contained in:
Alexander Koblov 2019-11-02 20:20:15 +00:00
commit eeffa52c01
1 changed files with 7 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

7
src/platform/upixmapmanager.pas
View file

@ -1155,6 +1155,12 @@ begin
if Result >= 0 then
AResult:= FPixmapsFileNames.List[Result]^.Data
else begin
{$IF DEFINED(LCLGTK2)}
AResult := gdk_pixbuf_new_from_file_at_size(PChar(AFileName), gIconsSize, gIconsSize, nil);
if (AResult = nil) then Exit(ADefaultIcon);
Result := FPixmapList.Add(AResult);
FPixmapsFileNames.Add(AFileName, AResult);
{$ELSE}
AIcon:= TIcon.Create;
try
AIcon.LoadFromFile(AFileName);
@ -1171,6 +1177,7 @@ begin
Result:= ADefaultIcon;
end;
AIcon.Free;
{$ENDIF}
end;
finally
FPixmapsLock.Release;