Changeset 287 for trunk/Forms/UFormNew.lfm

Timestamp:

Mar 24, 2019, 2:26:29 PM (6 years ago)

Author:

chronos

Message:

• Fixed: FormNew default undefined game system causing error.
• Modified: FormNew and FormUnitKind use Server property insteady Load/Save methods.

File:

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

trunk/Forms/UFormNew.lfm

@@ -1 +1 @@
 object FormNew: TFormNew
-  Left = 546
+  Left = 478
   Height = 745
-  Top = 184
+  Top = 526
   Width = 1211
   Caption = 'New game'
@@ -15 +15 @@
   OnShow = FormShow
   Position = poMainFormCenter
-  LCLVersion = '1.8.4.0'
+  LCLVersion = '2.0.0.4'
   object PageControl1: TPageControl
     Left = 4
@@ -21 +21 @@
     Top = 60
     Width = 806
-    ActivePage = TabSheetMap
+    ActivePage = TabSheetRules
     Align = alClient
     BorderSpacing.Around = 4
-    TabIndex = 2
+    TabIndex = 3
     TabOrder = 0
     OnChange = PageControl1Change
@@ -258 +258 @@
         object ComboBoxGridType: TComboBox
           Left = 146
-          Height = 42
+          Height = 38
           Top = 104
           Width = 304
@@ -275 +275 @@
         object ComboBoxMapShape: TComboBox
           Left = 146
-          Height = 42
+          Height = 38
           Top = 144
           Width = 304
@@ -519 +519 @@
         object ComboBoxWinObjective: TComboBox
           Left = 224
-          Height = 42
+          Height = 38
           Top = 244
           Width = 328
@@ -579 +579 @@
           object TabSheetCaptureCells: TTabSheet
             ClientHeight = 74
-            ClientWidth = 769
+            ClientWidth = 763
             object Label14: TLabel
               Left = 8
@@ -601 +601 @@
           object TabSheetStayAliveTurns: TTabSheet
             ClientHeight = 74
-            ClientWidth = 769
+            ClientWidth = 763
             object Label13: TLabel
               Left = 8
@@ -647 +647 @@
       Caption = 'Ok'
       ModalResult = 1
+      OnClick = ButtonOkClick
       TabOrder = 0
     end