source: tags/1.4.0/Forms/FormMain.lfm

Last change on this file was 364, checked in by chronos, 8 months ago
  • Modified: Added more action icons to main toolbar and main menu.
File size: 6.2 KB
Line 
1object FormMain: TFormMain
2 Left = 534
3 Height = 959
4 Top = 223
5 Width = 1491
6 Caption = 'xTactics'
7 ClientHeight = 959
8 ClientWidth = 1491
9 DesignTimePPI = 144
10 Menu = MainMenu1
11 OnActivate = FormActivate
12 OnClose = FormClose
13 OnCreate = FormCreate
14 OnDestroy = FormDestroy
15 OnKeyUp = FormKeyUp
16 OnResize = FormResize
17 OnShow = FormShow
18 LCLVersion = '3.6.0.0'
19 object ToolBar1: TToolBar
20 Left = 0
21 Height = 40
22 Top = 0
23 Width = 1491
24 ButtonHeight = 32
25 ButtonWidth = 32
26 Images = Core.ImageListSmall
27 ParentFont = False
28 ParentShowHint = False
29 PopupMenu = PopupMenuToolbar
30 ShowHint = True
31 TabOrder = 0
32 object ToolButton1: TToolButton
33 Left = 1
34 Top = 2
35 Action = Core.AGameNew
36 end
37 object ToolButton3: TToolButton
38 Left = 33
39 Top = 2
40 Action = Core.AGameEnd
41 end
42 object ToolButton4: TToolButton
43 Left = 65
44 Top = 2
45 Action = Core.AGameRestart
46 end
47 object ToolButton5: TToolButton
48 Left = 189
49 Top = 2
50 Action = Core.ASettings
51 end
52 object ToolButton9: TToolButton
53 Left = 184
54 Height = 32
55 Top = 2
56 Style = tbsDivider
57 end
58 object ToolButton11: TToolButton
59 Left = 102
60 Top = 2
61 Action = Core.AGameLoad
62 DropdownMenu = PopupMenuOpenRecent
63 Style = tbsDropDown
64 end
65 object ToolButton12: TToolButton
66 Left = 152
67 Top = 2
68 Action = Core.AGameSave
69 end
70 object ToolButton13: TToolButton
71 Left = 221
72 Top = 2
73 Action = Core.AExit
74 end
75 object ToolButton2: TToolButton
76 Left = 97
77 Height = 32
78 Top = 2
79 Style = tbsDivider
80 end
81 object ToolButton6: TToolButton
82 Left = 253
83 Top = 2
84 Action = Core.APlayersStats
85 end
86 object ToolButton7: TToolButton
87 Left = 285
88 Top = 2
89 Action = Core.AShowUnitMoves
90 end
91 object ToolButton8: TToolButton
92 Left = 317
93 Top = 2
94 Action = Core.AShowCharts
95 end
96 end
97 object PanelMain: TPanel
98 Left = 0
99 Height = 919
100 Top = 40
101 Width = 1491
102 Align = alClient
103 BevelOuter = bvNone
104 ParentFont = False
105 TabOrder = 1
106 end
107 object MainMenu1: TMainMenu
108 Images = Core.ImageListSmall
109 Left = 224
110 Top = 48
111 object MenuItem1: TMenuItem
112 Caption = 'Game'
113 object MenuItem2: TMenuItem
114 Action = Core.AGameNew
115 end
116 object MenuItem3: TMenuItem
117 Action = Core.AGameEnd
118 end
119 object MenuItem7: TMenuItem
120 Action = Core.AGameRestart
121 end
122 object MenuItem14: TMenuItem
123 Action = Core.AGameLoad
124 end
125 object MenuItemLoadRecent: TMenuItem
126 Caption = 'Load recent'
127 end
128 object MenuItem15: TMenuItem
129 Action = Core.AGameSave
130 end
131 object MenuItem29: TMenuItem
132 Action = Core.AGameSaveAs
133 end
134 object MenuItem5: TMenuItem
135 Caption = '-'
136 end
137 object MenuItem6: TMenuItem
138 Action = Core.AExit
139 end
140 end
141 object MenuItem10: TMenuItem
142 Caption = 'View'
143 object MenuItem11: TMenuItem
144 Caption = 'Zoom all'
145 ImageIndex = 7
146 ShortCut = 16449
147 end
148 object MenuItem12: TMenuItem
149 Caption = 'Zoom in'
150 ImageIndex = 8
151 ShortCut = 16491
152 end
153 object MenuItem13: TMenuItem
154 Caption = 'Zoom out'
155 ImageIndex = 9
156 ShortCut = 16493
157 end
158 object MenuItem32: TMenuItem
159 Caption = '-'
160 end
161 object MenuItem30: TMenuItem
162 Action = Core.AFullscreen
163 end
164 object MenuItem19: TMenuItem
165 Caption = '-'
166 end
167 object MenuItem33: TMenuItem
168 Action = AMapGridVisible
169 end
170 object MenuItem34: TMenuItem
171 Action = AUnitShapeVisible
172 end
173 object MenuItem35: TMenuItem
174 Caption = '-'
175 end
176 object MenuItem21: TMenuItem
177 Action = AToolBarVisible
178 end
179 object MenuItem20: TMenuItem
180 Action = AToolBarBigIcons
181 end
182 object MenuItem22: TMenuItem
183 Action = AStatusBarVisible
184 end
185 object MenuItem26: TMenuItem
186 Caption = '-'
187 end
188 object MenuItem27: TMenuItem
189 Action = Core.ANewSpectatorClient
190 end
191 end
192 object MenuItem8: TMenuItem
193 Caption = 'Tools'
194 object MenuItem9: TMenuItem
195 Action = Core.ASettings
196 end
197 object MenuItem37: TMenuItem
198 Action = Core.AGameSystems
199 end
200 object Separator1: TMenuItem
201 Caption = '-'
202 end
203 object MenuItem24: TMenuItem
204 Action = Core.AShowCharts
205 end
206 object MenuItem25: TMenuItem
207 Action = Core.AShowUnitMoves
208 end
209 object MenuItem28: TMenuItem
210 Action = Core.APlayersStats
211 end
212 end
213 object MenuItemDebug: TMenuItem
214 Caption = 'Debug'
215 object MenuItem31: TMenuItem
216 Action = Core.AToggleFogOfWar
217 end
218 object MenuItem36: TMenuItem
219 Action = Core.ATests
220 end
221 end
222 object MenuItem16: TMenuItem
223 Caption = 'Help'
224 object MenuItem23: TMenuItem
225 Action = Core.AHelp
226 end
227 object MenuItem4: TMenuItem
228 Action = Core.AShowKeyShortcuts
229 end
230 object MenuItem17: TMenuItem
231 Action = Core.AAbout
232 end
233 end
234 end
235 object Timer1: TTimer
236 Interval = 20
237 OnTimer = Timer1Timer
238 Left = 128
239 Top = 263
240 end
241 object ActionList1: TActionList
242 Images = Core.ImageListSmall
243 Left = 280
244 Top = 152
245 object AToolBarBigIcons: TAction
246 Caption = 'Toolbar big icons'
247 OnExecute = AToolBarBigIconsExecute
248 end
249 object AToolBarVisible: TAction
250 Caption = 'Toolbar visible'
251 OnExecute = AToolBarVisibleExecute
252 end
253 object AStatusBarVisible: TAction
254 Caption = 'Status bar visible'
255 OnExecute = AStatusBarVisibleExecute
256 end
257 object AMapGridVisible: TAction
258 Caption = 'Map grid visible'
259 OnExecute = AMapGridVisibleExecute
260 end
261 object AUnitShapeVisible: TAction
262 Caption = 'Unit shape visible'
263 OnExecute = AUnitShapeVisibleExecute
264 end
265 end
266 object PopupMenuToolbar: TPopupMenu
267 Left = 452
268 Top = 98
269 object MenuItem18: TMenuItem
270 Action = AToolBarBigIcons
271 end
272 end
273 object PopupMenuOpenRecent: TPopupMenu
274 Left = 448
275 Top = 251
276 end
277end
Note: See TracBrowser for help on using the repository browser.