Changeset 274 for trunk/Forms/UFormNew.lfm

Timestamp:

Feb 3, 2019, 8:32:20 PM (6 years ago)

Author:

chronos

Message:

• Added: Keep information about available unit moves during turn.
• Added: Allow to move units instantly during turn.
• Added: Game system parameter to play without possibility to merge/split units.

File:

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

trunk/Forms/UFormNew.lfm

@@ -33 +33 @@
       object Panel3: TPanel
         Left = 0
-        Height = 655
+        Height = 652
         Top = 0
-        Width = 739
+        Width = 796
         Align = alClient
         BevelOuter = bvNone
-        ClientHeight = 655
-        ClientWidth = 739
+        ClientHeight = 652
+        ClientWidth = 796
         TabOrder = 0
         object RadioButtonModeLocal: TRadioButton
@@ -103 +103 @@
         object ListViewServers: TListView
           Left = 26
-          Height = 423
+          Height = 420
           Top = 181
           Width = 334
@@ -131 +131 @@
           Left = 27
           Height = 31
-          Top = 616
+          Top = 613
           Width = 94
           Action = AServerAdd
@@ -140 +140 @@
           Left = 240
           Height = 31
-          Top = 616
+          Top = 613
           Width = 94
           Action = AServerRemove
@@ -149 +149 @@
           Left = 136
           Height = 30
-          Top = 616
+          Top = 613
           Width = 94
           Action = AServerModify
@@ -326 +326 @@
         object ComboBoxGridType: TComboBox
           Left = 146
-          Height = 42
+          Height = 38
           Top = 104
           Width = 208
@@ -343 +343 @@
         object ComboBoxMapShape: TComboBox
           Left = 146
-          Height = 42
+          Height = 38
           Top = 144
           Width = 208
@@ -587 +587 @@
         object ComboBoxWinObjective: TComboBox
           Left = 224
-          Height = 42
+          Height = 38
           Top = 244
           Width = 328
@@ -702 +702 @@
           TabOrder = 5
         end
+        object CheckBoxUnitsSplitMerge: TCheckBox
+          Left = 336
+          Height = 30
+          Top = 101
+          Width = 231
+          Caption = 'Units can split or merge'
+          TabOrder = 6
+        end
+        object CheckBoxUnitsMoveImmediately: TCheckBox
+          Left = 336
+          Height = 30
+          Top = 141
+          Width = 234
+          Caption = 'Units move immediately'
+          TabOrder = 7
+        end
       end
     end