Changeset 365 for trunk/Forms/FormNew.lfm

Timestamp:

Jan 2, 2025, 2:29:10 PM (5 days ago)

Author:

chronos

Message:

• Modified: OK button moved to be on the left side of buttons.
• Modified: Allow to run test from test form.
• Fixed: Free tests during test list form close.

File:

• trunk/Forms/FormNew.lfm (modified) (23 diffs)

trunk/Forms/FormNew.lfm

@@ -3 +3 @@
   Height = 794
   Top = 155
-  Width = 1218
+  Width = 1401
   Caption = 'New game'
   ClientHeight = 794
-  ClientWidth = 1218
+  ClientWidth = 1401
   Constraints.MinHeight = 502
   Constraints.MinWidth = 667
@@ -19 +19 @@
     Height = 676
     Top = 60
-    Width = 813
+    Width = 996
     ActivePage = TabSheetMap
     Align = alClient
@@ -30 +30 @@
       Caption = 'Mode'
       ClientHeight = 636
-      ClientWidth = 803
+      ClientWidth = 986
       ParentFont = False
       object Panel3: TPanel
@@ -36 +36 @@
         Height = 636
         Top = 0
-        Width = 803
+        Width = 986
         Align = alClient
         BevelOuter = bvNone
         ClientHeight = 636
-        ClientWidth = 803
+        ClientWidth = 986
         ParentFont = False
         TabOrder = 0
@@ -173 +173 @@
       Caption = 'Players'
       ClientHeight = 636
-      ClientWidth = 803
+      ClientWidth = 986
       ParentFont = False
       object Panel2: TPanel
@@ -179 +179 @@
         Height = 636
         Top = 0
-        Width = 803
+        Width = 986
         Align = alClient
         BevelOuter = bvNone
@@ -189 +189 @@
       Caption = 'Map'
       ClientHeight = 636
-      ClientWidth = 803
+      ClientWidth = 986
       OnShow = TabSheetMapShow
       ParentFont = False
@@ -196 +196 @@
         Height = 636
         Top = 0
-        Width = 803
+        Width = 986
         Align = alClient
         BevelOuter = bvNone
         ClientHeight = 636
-        ClientWidth = 803
+        ClientWidth = 986
         ParentFont = False
         TabOrder = 0
@@ -247 +247 @@
           Height = 58
           Top = 8
-          Width = 552
+          Width = 735
           Max = 100
           Min = 2
@@ -261 +261 @@
           Height = 58
           Top = 49
-          Width = 552
+          Width = 735
           Max = 100
           Min = 2
@@ -418 +418 @@
           Height = 43
           Top = 184
-          Width = 533
+          Width = 716
           Anchors = [akTop, akLeft, akRight]
           ParentFont = False
@@ -425 +425 @@
         end
         object ButtonImageBrowse: TButton
-          Left = 688
+          Left = 871
           Height = 43
           Top = 184
@@ -489 +489 @@
           Height = 360
           Top = 272
-          Width = 374
+          Width = 557
           Anchors = [akTop, akLeft, akRight, akBottom]
           OnResize = Image1Resize
@@ -517 +517 @@
       Caption = 'Rules'
       ClientHeight = 636
-      ClientWidth = 803
+      ClientWidth = 986
       ParentFont = False
       object Panel4: TPanel
@@ -523 +523 @@
         Height = 636
         Top = 0
-        Width = 803
+        Width = 986
         Align = alClient
         BevelOuter = bvNone
         ClientHeight = 636
-        ClientWidth = 803
+        ClientWidth = 986
         ParentFont = False
         TabOrder = 0
@@ -616 +616 @@
           Height = 110
           Top = 314
-          Width = 780
+          Width = 963
           ActivePage = TabSheetCaptureEntireMap
           Anchors = [akTop, akLeft, akRight]
@@ -631 +631 @@
           object TabSheetCaptureCells: TTabSheet
             ClientHeight = 67
-            ClientWidth = 770
+            ClientWidth = 953
             ParentFont = False
             object Label14: TLabel
@@ -656 +656 @@
           object TabSheetStayAliveTurns: TTabSheet
             ClientHeight = 67
-            ClientWidth = 770
+            ClientWidth = 953
             ParentFont = False
             object Label13: TLabel
@@ -693 +693 @@
     Height = 54
     Top = 740
-    Width = 1218
+    Width = 1401
     Align = alBottom
     BevelOuter = bvNone
     ClientHeight = 54
-    ClientWidth = 1218
+    ClientWidth = 1401
     ParentFont = False
     TabOrder = 1
     object ButtonOk: TButton
-      Left = 1098
+      Left = 1152
       Height = 38
       Top = 8
@@ -713 +713 @@
     end
     object ButtonCancel: TButton
-      Left = 967
+      Left = 1272
       Height = 38
       Top = 8
@@ -725 +725 @@
   end
   object PanelChat: TPanel
-    Left = 827
+    Left = 1010
     Height = 684
     Top = 56
@@ -735 +735 @@
   end
   object Splitter1: TSplitter
-    Left = 821
+    Left = 1004
     Height = 684
     Top = 56
@@ -746 +746 @@
     Height = 56
     Top = 0
-    Width = 1218
+    Width = 1401
     Align = alTop
     BevelOuter = bvNone
     ClientHeight = 56
-    ClientWidth = 1218
+    ClientWidth = 1401
     ParentFont = False
     TabOrder = 4