Changeset 476 for trunk/Packages/DpiControls/Dpi.Common.pas

Timestamp:

Dec 4, 2023, 9:46:31 PM (5 months ago)

Author:

chronos

Message:

• Fixed: Build under Linux.

File:

• trunk/Packages/DpiControls/Dpi.Common.pas (modified) (3 diffs)

trunk/Packages/DpiControls/Dpi.Common.pas

@@ -15 +15 @@
     XSrc, YSrc: Integer; Rop: DWORD = SRCCOPY): Boolean;
 function CreateRectRgn(X1, Y1, X2, Y2: Integer): HRGN;
+{$IFDEF WINDOWS}
 function ScrollDC(hDC: HDC; dx: longint; dy: longint; const lprcScroll: RECT;
   const lprcClip:RECT;hrgnUpdate:HRGN; lprcUpdate: LPRECT): WINBOOL; overload;
+{$ENDIF}
 function ScrollDC(Canvas: TCanvas; dx: Longint; dy: Longint; const lprcScroll: TRect;
   const lprcClip:TRect; hrgnUpdate: Handle; lprcUpdate: PRect): Boolean; overload;
@@ -51 +53 @@
 end;
 
+{$IFDEF WINDOWS}
 function ScrollDC(hDC: HDC; dx: longint; dy: longint; const lprcScroll: RECT;
   const lprcClip: RECT; hrgnUpdate: HRGN; lprcUpdate: LPRECT): WINBOOL;
@@ -63 +66 @@
     ScaleRectToNative(lprcScroll), ScaleRectToNative(lprcClip), hrgnUpdate, lprcUpdate);
 end;
+{$ENDIF}
 
 function ScrollDC(Canvas: TCanvas; dx: Longint; dy: Longint;