Changeset 343

Timestamp:

Apr 2, 2021, 10:03:23 PM (3 years ago)

Author:

chronos

Message:

• Fixed: Not correctly set initial fullscreen mode for background.

File:

• trunk/Back.pas (modified) (1 diff)

trunk/Back.pas

@@ -74 +74 @@
     end;
   end else begin
-    WindowState := wsNormal;
-    WindowState := wsFullScreen;
+    if WindowState <> wsMaximized then begin
+      WindowState := wsNormal;
+      WindowState := wsFullScreen;
+    end;
     WindowState := wsNormal;
     BoundsRect := Bounds(StartDlg.Left - 8, StartDlg.Top - 8,