Changeset 255 for tags

Timestamp:

Sep 22, 2018, 11:22:15 PM (6 years ago)

Author:

chronos

Message:

• Fixed: Full screen mode under Linux under 1.3.0 branch.

File:

• tags/1.3.0/UCore.pas (modified) (1 diff)

tags/1.3.0/UCore.pas

@@ -285 +285 @@
       FormMain.WindowState := wsFullScreen;
     end;
+    {$IFDEF WINDOWS}
     FormMain.BorderStyle := bsSizeable;
+    {$ENDIF}
     FormMain.WindowState := OldWindowState;
     InFullScreenMode := False;
   end else begin
     OldWindowState := FormMain.WindowState;
+    {$IFDEF WINDOWS}
     FormMain.BorderStyle := bsNone;
+    {$ENDIF}
     FormMain.WindowState := wsFullScreen;
     InFullScreenMode := True;