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

Timestamp:

Sep 20, 2021, 10:16:37 AM (3 years ago)

Author:

chronos

Message:

• Modified: Updated Common package.
• Modified: CoolTranslator package merged into Common package.
• Fixed: Build with Lazarus 2.0.12

File:

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

trunk/Packages/Common/UScaleDPI.pas

@@ -227 +227 @@
     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;