Changeset 468 for trunk/Packages/CevoComponents/GraphicSet.pas

Timestamp:

Dec 3, 2023, 11:28:08 AM (6 months ago)

Author:

chronos

Message:

• Added: High DPI support integrated into trunk branch. It can be enabled by adding DPI define to compiler parameters for main project and packages.

File:

• trunk/Packages/CevoComponents/GraphicSet.pas (modified) (2 diffs)

trunk/Packages/CevoComponents/GraphicSet.pas

@@ -4 +4 @@
 
 uses
-  Classes, SysUtils, Graphics, Generics.Collections, LCLType, DOM,
+  {$IFDEF DPI}Dpi.Graphics,{$ELSE}
+  Graphics,{$ENDIF}
+  Classes, SysUtils, Generics.Collections, LCLType, DOM,
   XMLRead, XMLWrite, XML;
 
@@ -228 +230 @@
 begin
   Data := TBitmap.Create;
-  Data.PixelFormat := pf24bit;
+  Data.PixelFormat := TPixelFormat.pf24bit;
   Mask := TBitmap.Create;
-  Mask.PixelFormat := pf24bit;
+  Mask.PixelFormat := TPixelFormat.pf24bit;
   Items := TGraphicSetItems.Create;
   Items.GraphicSet := Self;