source: trunk/Forms/FormGameSystem.lfm

Last change on this file was 390, checked in by chronos, 6 months ago
  • Modifired: Improved controls layout.
File size: 3.6 KB
Line 
1object FormGameSystem: TFormGameSystem
2 Left = 954
3 Height = 482
4 Top = 479
5 Width = 650
6 Caption = 'Game system'
7 ClientHeight = 482
8 ClientWidth = 650
9 DesignTimePPI = 144
10 OnCreate = FormCreate
11 OnDestroy = FormDestroy
12 LCLVersion = '3.6.0.0'
13 object ButtonSave: TButton
14 Left = 144
15 Height = 38
16 Top = 432
17 Width = 113
18 Anchors = [akLeft, akBottom]
19 Caption = 'Save'
20 ParentFont = False
21 TabOrder = 0
22 OnClick = ButtonSaveClick
23 end
24 object ButtonLoad: TButton
25 Left = 16
26 Height = 38
27 Top = 432
28 Width = 113
29 Anchors = [akLeft, akBottom]
30 Caption = 'Load'
31 ParentFont = False
32 TabOrder = 1
33 OnClick = ButtonLoadClick
34 end
35 object ButtonCancel: TButton
36 Left = 515
37 Height = 38
38 Top = 432
39 Width = 113
40 Anchors = [akRight, akBottom]
41 Caption = 'Cancel'
42 ModalResult = 2
43 ParentFont = False
44 TabOrder = 2
45 end
46 object ButtonOk: TButton
47 Left = 384
48 Height = 38
49 Top = 432
50 Width = 113
51 Anchors = [akRight, akBottom]
52 Caption = 'OK'
53 ModalResult = 1
54 ParentFont = False
55 TabOrder = 3
56 end
57 object PageControl1: TPageControl
58 Left = 16
59 Height = 400
60 Top = 16
61 Width = 612
62 ActivePage = TabSheetGeneral
63 Anchors = [akTop, akLeft, akRight, akBottom]
64 ParentFont = False
65 TabIndex = 0
66 TabOrder = 4
67 object TabSheetGeneral: TTabSheet
68 Caption = 'General'
69 ClientHeight = 360
70 ClientWidth = 602
71 ParentFont = False
72 object ScrollBoxGeneral: TScrollBox
73 Left = 0
74 Height = 360
75 Top = 0
76 Width = 602
77 HorzScrollBar.Page = 576
78 VertScrollBar.Page = 174
79 Align = alClient
80 ClientHeight = 358
81 ClientWidth = 600
82 TabOrder = 0
83 object Label5: TLabel
84 Left = 16
85 Height = 26
86 Top = 136
87 Width = 164
88 Caption = 'Preferred grid type:'
89 ParentColor = False
90 ParentFont = False
91 end
92 object ComboBoxPreferredGridType: TComboBox
93 Left = 272
94 Height = 38
95 Top = 136
96 Width = 304
97 ItemHeight = 0
98 Items.Strings = (
99 'None'
100 'Hexagon vertical'
101 'Square'
102 'Triangular'
103 'Random'
104 'Isometric'
105 'Hexagon horizontal'
106 )
107 ParentFont = False
108 Style = csDropDownList
109 TabOrder = 0
110 end
111 object CheckBoxUnitsMoveImmediately: TCheckBox
112 Left = 16
113 Height = 30
114 Top = 95
115 Width = 232
116 Caption = 'Units move immediately'
117 ParentFont = False
118 TabOrder = 1
119 end
120 object CheckBoxUnitsSplitMerge: TCheckBox
121 Left = 16
122 Height = 30
123 Top = 55
124 Width = 229
125 Caption = 'Units can split or merge'
126 ParentFont = False
127 TabOrder = 2
128 end
129 object CheckBoxEmptyCellsNeutral: TCheckBox
130 Left = 16
131 Height = 30
132 Top = 16
133 Width = 357
134 Caption = 'Set cells without player units as neutral'
135 ParentFont = False
136 TabOrder = 3
137 end
138 end
139 end
140 object TabSheetUnits: TTabSheet
141 Caption = 'Units'
142 ParentFont = False
143 end
144 object TabSheetNations: TTabSheet
145 Caption = 'Nations'
146 ParentFont = False
147 end
148 object TabSheetBuildings: TTabSheet
149 Caption = 'Buildings'
150 ParentFont = False
151 end
152 end
153 object OpenDialog1: TOpenDialog
154 Left = 440
155 Top = 160
156 end
157 object SaveDialog1: TSaveDialog
158 Left = 232
159 Top = 160
160 end
161end
Note: See TracBrowser for help on using the repository browser.