Changeset 254

Timestamp:

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

Author:

chronos

Message:

• Fixed: Full screen mode under Linux.

File:

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

trunk/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;