Changeset 86 for trunk/Packages/Common/UPersistentForm.pas

Timestamp:

Jun 21, 2022, 5:04:48 PM (23 months ago)

Author:

chronos

Message:

• Fixed: Calculation of tracks end.
• Modified: Updated Common package to version 0.10.
• Modified: Build with Lazarus 2.2.2.
• Modified: Used Generics.Collections instead of fgl for generic lists.

File:

• trunk/Packages/Common/UPersistentForm.pas (modified) (2 diffs)

trunk/Packages/Common/UPersistentForm.pas

@@ -1 +1 @@
 unit UPersistentForm;
-
-{$mode delphi}
 
 // Date: 2020-11-26
@@ -318 +316 @@
       Form.RestoredHeight);
     FormWindowState := Form.WindowState;
+    Form.WindowState := wsNormal;
     ShowWindow(Form.Handle, SW_SHOWFULLSCREEN);
     {$IFDEF WINDOWS}