Changeset 88 for trunk/Packages/Common/UScaleDPI.pas

Timestamp:

Aug 29, 2017, 10:33:39 PM (7 years ago)

Author:

chronos

Message:

• Modified: Enabled DPI scaling.
• Modified: Moved ImageListMain to Core unit and introduced Core Init method.

File:

• trunk/Packages/Common/UScaleDPI.pas (modified) (1 diff)

trunk/Packages/Common/UScaleDPI.pas

@@ -226 +226 @@
     Temp[I] := TBitmap.Create;
     Temp[I].SetSize(NewWidth, NewHeight);
+    {$ifdef linux}
+    Temp[I].PixelFormat := pf24bit;
+    {$else}
     Temp[I].PixelFormat := pf32bit;
+    {$endif}
     Temp[I].TransparentColor := TempBmp.TransparentColor;
     //Temp[I].TransparentMode := TempBmp.TransparentMode;