Browse Source

compile fix for LCL

Johann ELSASS 1 year ago
parent
commit
b8bf033a2c
1 changed files with 2 additions and 2 deletions
  1. 2 2
      lazpaint/lazpaintinstance.pas

+ 2 - 2
lazpaint/lazpaintinstance.pas

@@ -299,7 +299,7 @@ uses LCLType, Types, Dialogs, FileUtil, StdCtrls, LCLIntf, BGRAUTF8, UTranslatio
      unewimage, uresample, UPixelate, unoisefilter, ufilters,
      unewimage, uresample, UPixelate, unoisefilter, ufilters,
      USharpen, uposterize, UPhongFilter, UFilterFunction,
      USharpen, uposterize, UPhongFilter, UFilterFunction,
      uprint, USaveOption, UFormRain,
      uprint, USaveOption, UFormRain,
-     {$IFDEF DARWIN}BGRAGraphics,{$ENDIF}
+     {$IFDEF DARWIN}Graphics, BGRAGraphics,{$ENDIF}
 
 
      ugraph, LCScaleDPI, ucommandline, uabout, UPython;
      ugraph, LCScaleDPI, ucommandline, uabout, UPython;
 
 
@@ -1462,7 +1462,7 @@ begin
     begin
     begin
       unscaled.GetBitmap(i, bmpUnscaled);
       unscaled.GetBitmap(i, bmpUnscaled);
       retina.GetBitmap(i, bmpRetina);
       retina.GetBitmap(i, bmpRetina);
-      result.AddMultipleResolutions([bmpUnscaled, bmpRetina]);
+      result.AddMultipleResolutions([TCustomBitmap(bmpUnscaled), TCustomBitmap(bmpRetina)]);
     end;
     end;
 
 
     bmpUnscaled.Free;
     bmpUnscaled.Free;