Including the MSWINDOWS directive to make this unit Windows only - Embarcadero#30

lmbelo · lmbelo · commit 3af6852f84f2 · 2022-07-04T12:36:51.000-07:00
diff --git a/Source/WrapDelphiWindows.pas b/Source/WrapDelphiWindows.pas
@@ -4,11 +4,15 @@
 
 interface
 
+{$IFDEF MSWINDOWS}
 uses
   Windows, Classes, SysUtils, PythonEngine, WrapDelphi, WrapDelphiClasses;
+{$ENDIF MSWINDOWS}
 
 implementation
 
+{$IFDEF MSWINDOWS}
+
 {$IFDEF DELPHI11_OR_HIGHER}
 uses
   System.Win.HighDpi, Winapi.ShellScaling;
@@ -185,13 +189,13 @@ class function TWindowsRegistration.SetProcessDpiAwareness_Wrapper(PySelf,
 {$ENDIF DELPHI11_OR_HIGHER}
 
 initialization
-  RegisteredUnits.Add( TWindowsRegistration.Create );
+  RegisteredUnits.Add(TWindowsRegistration.Create);
 
-  {$IFDEF MSWINDOWS}
-    {$IFDEF DELPHI11_OR_HIGHER}
-    SetHighDpiAware();
-    {$ENDIF DELPHI11_OR_HIGHER}
-  {$ENDIF MSWINDOWS}
+  {$IFDEF DELPHI11_OR_HIGHER}
+  SetHighDpiAware();
+  {$ENDIF DELPHI11_OR_HIGHER}
+
+{$ENDIF MSWINDOWS}
 
 end.
 
