Changeset 386 for trunk/Forms/FormSettings.lfm

Timestamp:

Jan 4, 2025, 10:18:42 PM (4 days ago)

Author:

chronos

Message:

• Fixed: Previous auto save game was not correctly restored if no game was loaded yet.
• Modified: Use new higher resolution application image in about dialog.

File:

• trunk/Forms/FormSettings.lfm (modified) (9 diffs)

trunk/Forms/FormSettings.lfm

@@ -1 +1 @@
 object FormSettings: TFormSettings
   Left = 545
-  Height = 613
+  Height = 353
   Top = 203
-  Width = 857
+  Width = 689
   ActiveControl = ButtonOk
   Caption = 'Settings'
-  ClientHeight = 613
-  ClientWidth = 857
+  ClientHeight = 353
+  ClientWidth = 689
   Constraints.MinHeight = 200
   Constraints.MinWidth = 300
@@ -16 +16 @@
   LCLVersion = '3.6.0.0'
   object ButtonOk: TButton
-    Left = 608
+    Left = 440
     Height = 38
-    Top = 568
+    Top = 308
     Width = 114
     Anchors = [akRight, akBottom]
@@ -27 +27 @@
   end
   object ButtonCancel: TButton
-    Left = 735
+    Left = 567
     Height = 38
-    Top = 568
+    Top = 308
     Width = 114
     Anchors = [akRight, akBottom]
@@ -39 +39 @@
   object PageControl1: TPageControl
     Left = 8
-    Height = 552
+    Height = 292
     Top = 8
-    Width = 841
+    Width = 673
     ActivePage = TabSheetGeneral
     Align = alTop
@@ -51 +51 @@
     object TabSheetGeneral: TTabSheet
       Caption = 'General'
-      ClientHeight = 512
-      ClientWidth = 831
+      ClientHeight = 252
+      ClientWidth = 663
       ParentFont = False
       object Panel1: TPanel
         Left = 0
-        Height = 512
+        Height = 252
         Top = 0
-        Width = 831
+        Width = 663
         Align = alClient
         BevelOuter = bvNone
-        ClientHeight = 512
-        ClientWidth = 831
+        ClientHeight = 252
+        ClientWidth = 663
         ParentFont = False
         TabOrder = 0
@@ -85 +85 @@
         end
         object ComboBoxTheme: TComboBox
-          Left = 176
+          Left = 178
           Height = 42
           Top = 72
@@ -133 +133 @@
     object TabSheetDebug: TTabSheet
       Caption = 'Debug'
-      ClientHeight = 512
-      ClientWidth = 831
+      ClientHeight = 252
+      ClientWidth = 663
       ParentFont = False
       object Panel2: TPanel
         Left = 0
-        Height = 512
+        Height = 252
         Top = 0
-        Width = 831
+        Width = 663
         Align = alClient
         BevelOuter = bvNone
-        ClientHeight = 512
-        ClientWidth = 831
+        ClientHeight = 252
+        ClientWidth = 663
         ParentFont = False
         TabOrder = 0
@@ -151 +151 @@
           Height = 24
           Top = 32
-          Width = 799
+          Width = 631
           Anchors = [akTop, akLeft, akRight]
           AutoSize = False
@@ -203 +203 @@
           Height = 26
           Top = 136
-          Width = 803
+          Width = 635
           Anchors = [akTop, akLeft, akRight]
           AutoSize = False