Changeset 330 for trunk/Forms/FormGameSystem.lfm

Timestamp:

Jul 19, 2024, 9:46:33 PM (2 months ago)

Author:

chronos

Message:

• Fixed: New game symetric map units calcualtion.
• Fixed: Map preview with cell and unit borders.
• Fixed: Allow to set preferred game system grid type.

File:

• trunk/Forms/FormGameSystem.lfm (modified) (3 diffs)

trunk/Forms/FormGameSystem.lfm

@@ -67 +67 @@
     object TabSheetGeneral: TTabSheet
       Caption = 'General'
-      ClientHeight = 360
-      ClientWidth = 603
+      ClientHeight = 362
+      ClientWidth = 605
       ParentFont = False
       object CheckBoxEmptyCellsNeutral: TCheckBox
         Left = 16
-        Height = 30
+        Height = 29
         Top = 16
-        Width = 357
+        Width = 330
         Caption = 'Set cells without player units as neutral'
         ParentFont = False
@@ -81 +81 @@
       object CheckBoxUnitsSplitMerge: TCheckBox
         Left = 16
-        Height = 30
+        Height = 29
         Top = 55
-        Width = 229
+        Width = 213
         Caption = 'Units can split or merge'
         ParentFont = False
@@ -90 +90 @@
       object CheckBoxUnitsMoveImmediately: TCheckBox
         Left = 16
-        Height = 30
+        Height = 29
         Top = 95
-        Width = 232
+        Width = 217
         Caption = 'Units move immediately'
         ParentFont = False
         TabOrder = 2
+      end
+      object Label5: TLabel
+        Left = 16
+        Height = 25
+        Top = 136
+        Width = 153
+        Caption = 'Preferred grid type:'
+        ParentColor = False
+        ParentFont = False
+      end
+      object ComboBoxPreferredGridType: TComboBox
+        Left = 272
+        Height = 33
+        Top = 136
+        Width = 304
+        ItemHeight = 25
+        Items.Strings = (
+          'None'
+          'Hexagon vertical'
+          'Square'
+          'Triangular'
+          'Random'
+          'Isometric'
+          'Hexagon horizontal'
+        )
+        ParentFont = False
+        Style = csDropDownList
+        TabOrder = 3
       end
     end