Changeset 193 for branches/highdpi/LocalPlayer/Select.pas

Timestamp:

May 7, 2020, 7:05:57 PM (4 years ago)

Author:

chronos

Message:

• Modified: Improved code in HighDPI branch.

File:

• branches/highdpi/LocalPlayer/Select.pas (modified) (1 diff)

branches/highdpi/LocalPlayer/Select.pas

@@ -1609 +1609 @@
   begin { center on screen }
     if Kind = kTribe then
-      Left := (Screen.Width - 800) * 3 div 8 + 130
+      Left := (DpiScreen.Width - 800) * 3 div 8 + 130
     else
-      Left := (Screen.Width - Width) div 2;
-    Top := (Screen.Height - Height) div 2;
+      Left := (DpiScreen.Width - Width) div 2;
+    Top := (DpiScreen.Height - Height) div 2;
     if Kind = kProject then
       Top := Top + 48;