source: trunk/IDE/Forms/FormMain.lfm

Last change on this file was 75, checked in by chronos, 6 months ago
  • Modified: Removed U prefix from unit names.
  • Modified: Updated Common package.
File size: 16.4 KB
Line 
1object FormMain: TFormMain
2 Left = 799
3 Height = 752
4 Top = 435
5 Width = 1042
6 Caption = 'Transpascal IDE'
7 ClientHeight = 752
8 ClientWidth = 1042
9 DesignTimePPI = 144
10 Font.Height = -17
11 Font.Name = 'Tahoma'
12 Menu = MainMenu
13 OnClose = FormClose
14 OnCreate = FormCreate
15 OnDestroy = FormDestroy
16 OnShow = FormShow
17 Position = poDesktopCenter
18 LCLVersion = '3.2.0.0'
19 object Splitter3: TSplitter
20 Cursor = crVSplit
21 Left = 0
22 Height = 8
23 Top = 744
24 Width = 1042
25 Align = alBottom
26 ResizeAnchor = akBottom
27 end
28 object ToolBar1: TToolBar
29 Left = 0
30 Height = 39
31 Top = 0
32 Width = 1042
33 Images = ImageList1
34 ParentShowHint = False
35 ShowHint = True
36 TabOrder = 1
37 object ToolButton1: TToolButton
38 Left = 1
39 Top = 2
40 Action = AProjectNew
41 end
42 object ToolButton2: TToolButton
43 Left = 36
44 Top = 2
45 Action = AProjectOpen
46 DropdownMenu = PopupMenu1
47 Style = tbsDropDown
48 end
49 object ToolButton3: TToolButton
50 Left = 89
51 Top = 2
52 Action = AProjectSave
53 end
54 object ToolButton4: TToolButton
55 Left = 124
56 Top = 2
57 Action = AProjectClose
58 end
59 object ToolButton5: TToolButton
60 Left = 159
61 Height = 33
62 Top = 2
63 Style = tbsSeparator
64 end
65 object ToolButton6: TToolButton
66 Left = 167
67 Top = 2
68 Action = AViewOptions
69 end
70 object ToolButton7: TToolButton
71 Left = 202
72 Top = 2
73 Action = ABuild
74 end
75 object ToolButton8: TToolButton
76 Left = 237
77 Top = 2
78 Action = ARun
79 end
80 object ToolButton9: TToolButton
81 Left = 272
82 Top = 2
83 Action = APause
84 end
85 object ToolButton10: TToolButton
86 Left = 307
87 Top = 2
88 Action = AStop
89 end
90 object ComboBoxTarget: TComboBox
91 Left = 342
92 Height = 40
93 Top = 2
94 Width = 150
95 ItemHeight = 0
96 Style = csDropDownList
97 TabOrder = 0
98 OnChange = ComboBoxTargetChange
99 end
100 object ToolButton11: TToolButton
101 Left = 492
102 Top = 2
103 Action = AViewTargets
104 end
105 end
106 object Splitter1: TSplitter
107 Left = 734
108 Height = 545
109 Top = 39
110 Width = 8
111 Align = alRight
112 ResizeAnchor = akRight
113 end
114 object PageControlRight: TPageControl
115 Left = 742
116 Height = 545
117 Top = 39
118 Width = 300
119 ActivePage = TabSheetExternalProducer
120 Align = alRight
121 TabIndex = 3
122 TabOrder = 3
123 TabPosition = tpRight
124 object TabSheetProject: TTabSheet
125 Caption = 'Project'
126 end
127 object TabSheetCodeTree: TTabSheet
128 Caption = 'Code Tree'
129 end
130 object TabSheetTargetProject: TTabSheet
131 Caption = 'Target project'
132 end
133 object TabSheetExternalProducer: TTabSheet
134 Caption = 'External producer'
135 end
136 end
137 object PageControlBottom: TPageControl
138 Left = 0
139 Height = 152
140 Top = 592
141 Width = 1042
142 ActivePage = TabSheetMessages
143 Align = alBottom
144 TabIndex = 0
145 TabOrder = 4
146 TabPosition = tpBottom
147 object TabSheetMessages: TTabSheet
148 Caption = 'Messages'
149 end
150 object TabSheetBreakpoints: TTabSheet
151 Caption = 'Breakpoints'
152 end
153 end
154 object Splitter2: TSplitter
155 Cursor = crVSplit
156 Left = 0
157 Height = 8
158 Top = 584
159 Width = 1042
160 Align = alBottom
161 ResizeAnchor = akBottom
162 end
163 object PageControlMain: TPageControl
164 Left = 0
165 Height = 545
166 Top = 39
167 Width = 734
168 ActivePage = TabSheetTarget
169 Align = alClient
170 TabIndex = 1
171 TabOrder = 6
172 object TabSheetSource: TTabSheet
173 Caption = 'Source code'
174 end
175 object TabSheetTarget: TTabSheet
176 Caption = 'Target code'
177 end
178 end
179 object MainMenu: TMainMenu
180 Images = ImageList1
181 Left = 173
182 Top = 240
183 object MenuItem1: TMenuItem
184 Caption = 'Project'
185 object MenuItem5: TMenuItem
186 Action = AProjectNew
187 end
188 object MenuItem2: TMenuItem
189 Action = AProjectOpen
190 end
191 object MenuItemOpenRecent: TMenuItem
192 Caption = 'Open recent'
193 end
194 object MenuItem4: TMenuItem
195 Action = AProjectSave
196 end
197 object MenuItem6: TMenuItem
198 Action = AProjectSaveAs
199 end
200 object MenuItem3: TMenuItem
201 Action = AProjectClose
202 end
203 object MenuItem12: TMenuItem
204 Caption = '-'
205 end
206 object MenuItem13: TMenuItem
207 Action = AExit
208 end
209 end
210 object MenuItem7: TMenuItem
211 Caption = 'Run'
212 object MenuItemProducer: TMenuItem
213 Caption = 'Target'
214 end
215 object MenuItem8: TMenuItem
216 Action = ABuild
217 end
218 object MenuItem27: TMenuItem
219 Caption = '-'
220 end
221 object MenuItem14: TMenuItem
222 Action = ARun
223 end
224 object MenuItem25: TMenuItem
225 Action = APause
226 end
227 object MenuItem26: TMenuItem
228 Action = AStop
229 end
230 object MenuItem32: TMenuItem
231 Action = AReset
232 end
233 object MenuItem28: TMenuItem
234 Action = AStepIn
235 end
236 object MenuItem29: TMenuItem
237 Action = AStepOver
238 end
239 object MenuItem30: TMenuItem
240 Action = AStepOut
241 end
242 object MenuItem31: TMenuItem
243 Action = ARunToCursor
244 end
245 end
246 object MenuItem15: TMenuItem
247 Caption = 'View'
248 object MenuItem16: TMenuItem
249 Action = AViewOptions
250 end
251 object MenuItem22: TMenuItem
252 Caption = '-'
253 end
254 object MenuItem18: TMenuItem
255 Action = AViewSourceEditor
256 end
257 object MenuItem19: TMenuItem
258 Action = AViewMessages
259 end
260 object MenuItem20: TMenuItem
261 Action = AViewProject
262 end
263 object MenuItem21: TMenuItem
264 Action = AViewCodeTree
265 end
266 object MenuItem23: TMenuItem
267 Action = AViewCompiledSoruce
268 end
269 object MenuItem17: TMenuItem
270 Action = AViewObjectInspector
271 end
272 object MenuItem24: TMenuItem
273 Action = AViewTargets
274 end
275 end
276 object MenuItem9: TMenuItem
277 Caption = 'Help'
278 object MenuItem33: TMenuItem
279 Action = AHelp
280 end
281 object MenuItem10: TMenuItem
282 Action = AHomepage
283 end
284 object MenuItem11: TMenuItem
285 Action = AAbout
286 end
287 end
288 end
289 object ActionList1: TActionList
290 Images = ImageList1
291 Left = 168
292 Top = 324
293 object AProjectNew: TAction
294 Category = 'Project'
295 Caption = 'New...'
296 Hint = 'Create new project'
297 ImageIndex = 10
298 OnExecute = AProjectNewExecute
299 ShortCut = 16462
300 end
301 object AProjectOpen: TAction
302 Category = 'Project'
303 Caption = 'Open...'
304 Hint = 'Open project'
305 ImageIndex = 7
306 OnExecute = AProjectOpenExecute
307 ShortCut = 16463
308 end
309 object AProjectSave: TAction
310 Category = 'Project'
311 Caption = 'Save'
312 Hint = 'Save project to disk'
313 ImageIndex = 9
314 OnExecute = AProjectSaveExecute
315 ShortCut = 16467
316 end
317 object AProjectSaveAs: TAction
318 Category = 'Project'
319 Caption = 'Save as...'
320 Hint = 'Save project with custom name'
321 ImageIndex = 9
322 OnExecute = AProjectSaveAsExecute
323 end
324 object AProjectClose: TAction
325 Category = 'Project'
326 Caption = 'Close'
327 ImageIndex = 3
328 OnExecute = AProjectCloseExecute
329 end
330 object ABuild: TAction
331 Category = 'Build'
332 Caption = 'Build'
333 ImageIndex = 12
334 OnExecute = ABuildExecute
335 ShortCut = 16504
336 end
337 object AExit: TAction
338 Caption = 'Exit'
339 ImageIndex = 4
340 OnExecute = AExitExecute
341 ShortCut = 16499
342 end
343 object ARun: TAction
344 Category = 'Run'
345 Caption = 'Run'
346 ImageIndex = 13
347 OnExecute = ARunExecute
348 ShortCut = 120
349 end
350 object AAbout: TAction
351 Caption = 'About...'
352 OnExecute = AAboutExecute
353 end
354 object AHomepage: TAction
355 Caption = 'Homepage'
356 OnExecute = AHomepageExecute
357 end
358 object AViewProject: TAction
359 Category = 'View'
360 Caption = 'Project manager'
361 OnExecute = AViewProjectExecute
362 end
363 object AViewObjectInspector: TAction
364 Category = 'View'
365 Caption = 'Object inspector'
366 ShortCut = 122
367 end
368 object AViewSourceEditor: TAction
369 Category = 'View'
370 Caption = 'Source editor'
371 OnExecute = AViewSourceEditorExecute
372 end
373 object AViewMessages: TAction
374 Category = 'View'
375 Caption = 'Messages'
376 OnExecute = AViewMessagesExecute
377 end
378 object AViewOptions: TAction
379 Category = 'View'
380 Caption = 'Options'
381 ImageIndex = 11
382 OnExecute = AViewOptionsExecute
383 end
384 object AViewCodeTree: TAction
385 Category = 'View'
386 Caption = 'Code tree'
387 OnExecute = AViewCodeTreeExecute
388 end
389 object AViewCompiledSoruce: TAction
390 Category = 'View'
391 Caption = 'Compiled source'
392 OnExecute = AViewCompiledSoruceExecute
393 end
394 object AViewTargets: TAction
395 Category = 'View'
396 Caption = 'Targets'
397 ImageIndex = 14
398 OnExecute = AViewTargetsExecute
399 end
400 object AStop: TAction
401 Category = 'Run'
402 Caption = 'Stop'
403 ImageIndex = 0
404 OnExecute = AStopExecute
405 ShortCut = 16497
406 end
407 object APause: TAction
408 Category = 'Run'
409 Caption = 'Pause'
410 ImageIndex = 8
411 OnExecute = APauseExecute
412 end
413 object AReset: TAction
414 Category = 'Run'
415 Caption = 'Reset'
416 OnExecute = AResetExecute
417 end
418 object AStepOver: TAction
419 Category = 'Run'
420 Caption = 'Step over'
421 OnExecute = AStepOverExecute
422 ShortCut = 119
423 end
424 object AStepIn: TAction
425 Category = 'Run'
426 Caption = 'Step in'
427 OnExecute = AStepInExecute
428 ShortCut = 118
429 end
430 object AStepOut: TAction
431 Category = 'Run'
432 Caption = 'Step out'
433 OnExecute = AStepOutExecute
434 ShortCut = 8311
435 end
436 object ARunToCursor: TAction
437 Category = 'Run'
438 Caption = 'Run to cursor'
439 OnExecute = ARunToCursorExecute
440 ShortCut = 115
441 end
442 object AHelp: TAction
443 Caption = 'Help'
444 ImageIndex = 5
445 ShortCut = 112
446 end
447 end
448 object OpenDialogProject: TOpenDialog
449 DefaultExt = '.tppr'
450 Filter = 'Project file (*.tppr)|*.tppr|Any file (*.*)|*.*'
451 Left = 173
452 Top = 81
453 end
454 object SaveDialogProject: TSaveDialog
455 DefaultExt = '.tppr'
456 Filter = 'Project file (*.tppr)|*.tppr|Any file (*.*)|*.*'
457 Left = 173
458 Top = 156
459 end
460 object ImageList1: TImageList
461 Left = 168
462 Top = 408
463 Bitmap = {
464 4C7A0F00000010000000100000008C0A00000000000078DAED9A0B544DF91EC7
465 CFCAB2D6154A8A89A9A5B98C94A644AEC7186118B40C2D8F3CEE6D3AA1282291
466 9E3A2244EE44629454485C16998C6772EA62702F732F17638CD7984B73178D4E
467 A7C7E975BEF7FFDF9D73DA67B7CF3E2F83B1FA9DF5B5CFFEEDDFE7F7FBBFF63E
468 7BEF88446DA66D80B0DAF8779B6FB3577932A96412B75AB49A911139B438B6F4
469 E4D0C91990032525257A59811C8CDF8C1C1ABF8939B4FC86E660CD6DAB634239
470 34CCEAD5BC7DD09583CD51E3F03A73B039BA4F8DED17CAC1AE6700DB2A077331
471 62B1469C0F5AF54D3C8F0CE268B3DE0689447944F9447F7312890E251015125D
472 516D139AFDF94C9C003FDAD2F268A9B7F7ED32B1B85C111A2A578AC52F142347
473 DE2AB3B43C524A8FEBE6F739595A1E2E9D31E367F99C394FE0E7F750A3D9B37F
474 82AFEF4379870E874A691C3F9F9D306CD8B5673E3E37316EDCF5569A30E1DFF0
475 F4BCF08CC6F1F399853E3EB71443864841E5E97916CECEC7E0E0908FEEDD73D1
476 B56B167AF73EAAA071FCFCF62BA486D2DDFD341C1D8F90F8FDB0B1C9D3D2FBEF
477 1F51D2387E3EB5D0CBEB82C2CEAE90C47ECD2B3BBB630A1AC7CF6F4CB0B72F78
478 6667574A62A5BCB2B4CC7F46E3F8F924A776ED369676EB269577ED7A9DC45FD3
479 9295D539B9854572298DE3E71389A2475B58AC2AB5B43C58666DFD0F858DCD6D
480 25DDD27DEAA7C7699C6E3E92683E596762B2DEC464DD89AFA8B609CDFE48912E
481 FEF7AAB7C5ECED4B40A5BABE1A1DEBE474056CE9CA2374BC6FDFEFC016374697
482 9F6B2E2E37A0963A96FDDD107373BB05AE8CE1A979787C0FB58C65070EBC07AE
483 0CCD3178F003A8A566B8FBBA6CE8D0C7508B1BABCBAFB6E1C39F402DA1187378
484 4372183BD6A6D8EBAA63C2BD069F0CE2F9CC603E298937071F9FC473DFC7F03C
485 39B83C6505794E0E36AF66D93294E7638DE1CDAD6F70FF397369F4F8EBA9AF73
486 ED717813D6239737ED3C308F37E799999BE38DD8A5A4B1F8FBDA31B89B15863B
487 3B16E256FA3C665B1833025F477F0C61760CEEEF8D82FCDE6534D6CA00A59251
488 63553964774A70799B3FF2970EE2CD7131E9533C3D93C1C436DC2C45FDC10D68
489 DA30134D49D3A1D8BF06B5DF15A35E56869B0762B12FD415DAEC38A62E65EBA5
490 F940ECA7405136502367EA2BCB9FA23E231CF2935950543C43518A1F76CEEFAB
491 C97171ED6854DCBB80FA1BE4392F6614B0734973DBAF16A269EB7CD47F5B0065
492 B50CD5519FA0FC5221FEFBCFE3D8E2FF8186BFB17612D3DF7AD24E2C1F0E244D
493 068E6E8272F147A85DE00C59DA4226DFFFD64EC7F7EBC450C85E2071462F0D7F
494 9DC6D3714A9C04847B028BDCD014D20F8AA0DEA84A0B4213A95D75EB12BEF5B5
495 C7D9D9CE24B4096B7D1C5AF8C4F10CAF88FD0C750B5D5013F421646227C8D64F
496 63FC15D283B834A70F4E4EEA865333FB30BC6442CF165E328E19BB175F45E017
497 F107783CC7113FCEEA81F2431B19FECAE4AE3833C906C727D9E272DC34D454BC
498 2043DC43C37F13331C2FEF943263F3604E4FDCF67B0F37A7D9E2EEAACFF173FE
499 7A1451D6A72B4EFA74C1C333F9B87FF534FC4674D6F027A3BC70276311EA2ACA
500 F0202F19977D6D5132D906F7F39399FA2726DA30ECEDEC3590BF2843E6F2A998
501 E8D5596B0D1486F7C78F875743F1B20C4F8AF2712DC10FA5B37AA364E61F7155
502 E28787670FA0F279198E6F5B89099E7FE05D837B42DC50923C0B8FAF7E835A32
503 47CAA64646D5A4BFB4CDD9D133315E07ABB6ADF35DB08E8C75B26F37ACF17144
504 C2F81E8819FB1E668DB06AD5E657F3B61B6D6A7E0E9A47748AB5AFBE0EF3F952
505 38EC28762C3B17DDAAF6A952E823882AD64975DC89AF162B770A4F3DFACF2816
506 7F4A15C7C76BB5975B9F53E7148F4F538B5B5B88E78E094F9BE6E9E1C1D74EBE
507 3E7179D5586BD550CF09ABFFF304F814CEFD420A6B2E79FBD4F6FC6FFEBB4803
508 EF65F00AEE715ABD4337F65945AB1DEA7B55ED77BC06DF77AA59C1ADD07DAB3E
509 560FAF23D6707159F6BDB82EB1C6CF0C56D37F1359FEE707C359919163D56602
510 F6704B94F4DEA670DC5DBB00B7E303A1CFCFB51FD62F963E3FB61B1545877173
511 C54CE8F3738DE496FE72601BCA4FEEC3F58513A1CFCF35925BFA744F0A9E1764
512 E2EA1723A1CFCF35925BFAD3CE44D05A17A70F843E3FD7AE847E2E2DDBBF05B4
513 96D4C719FAFC5C3B337DB0F44946129E64AEC389518ED0E7E71AC95DF2C3BA45
514 78B43D018786DB439F9F6B24B794CE2F996F6478D9419F9F6B24B7F43F91B370
515 3F651936B959439F9F6B24B7F45F4B7D712F390C12E78ED0E7E71AC92D4D72B5
516 427CDF8E88FDD012FAFCEFE0DFF961E2F550E7FB3BBEF7793CBF8746F1E6D6E7
517 FD0D7A177843DE9DE9FA0D36E4F753E837DCF0777726F1E6F6FF37E645669E3F
518 BF976B809E5711069DB726F3C5C5C57AEF830DBC6E4090E7FEA733C3FEA60143
519 CDE8FA9C76B4D5FF8DEB9BC8BF89737F5FDC0450ED8D1D8FBD319F614FF438E4
520 468D45EECA4F91133906D92B46237BF928EC8EF046D6B291C80AFF04BB968E40
521 E6928F9119369C61CFEF95E0FC9E0414EF5985E2DC7814E7C4E35C4E1C8AB263
522 51B49B2A0667B3A27166175166144E67AEC4E98C48642C1EC6D4559B92BE6B27
523 6A6A6A226A446363031A1B1AD0D0508F86FA3AD453D5295057578B3A452D762E
524 1A823DA4CDD4366CD8007F7F7FE4E6E6A2A95180259C82AAB6065F85FE89F477
525 2C5333202000E9E9E998366D1AC3C6C5C521262606919191888888C092254B10
526 1A1A82E0E060CC9D3B17B5B5D5D811329819272569EFE6CD9B3175EA54E4E5E5
527 35D7246A69AFBA6E0D5397B2B53555D8B1C08B19E3E6BE36B7B9B9BD026C4D33
528 5B535D85EDC18398F9A1EC89132790447E57CE936B1C779C9AD96A162B67941E
529 E489DD646EE938252626E2E2C58B484D4D65D8B8B85855FF572062D932848585
530 212484F63F88F43F10D55595D8367F005917239936E7E464432291E0E8D1235A
531 635CABAA5BA3AA5B5D2567D82AB90C69733D98F5D4DCDE3A565F396C756BB64A
532 5E81B44077662DD2F69E3F5F8CB4B4349C3B57A435C62D6C650B5B590139D156
533 F147CC3AA675E3E3E399FED375446BC6C6C6223A3A1A2B56ACC0B265E1A4FF8B
534 49FF1722282808818181A894BDC49680FEC820E7006DF3F6EDE90CBB2B33536B
535 8C5BDA2B636ACA2B5F326CA5EC57A47EE14ACE81A14C7B15DC7112622B7E85AC
536 A21C5FFABB30E7005DC7742DD2F544D7447AD040666EE9FCD031A6E344FBBA45
537 ECC6B439D5DF155FFEC5057FFD73BF77EA59645046B0A63FC1D73220CA18A411
538 FB984E53C7B13836AF37078761DAC0690FDB27C4F3D5D2F4C9C0FA06F5F975CC
539 09773C05DACF373EAD72E830BE31E6AE03C1FAAA5A426B401FCFD75E767BDE86
540 39790D4F02309B372707581F7379537280E7632E6F4C0E087CDE54FD3735FE6F
541 6AFDB599C8D3D3D3830803060CE8650AEFEEEEEE4D04BA358673757595103DEA
542 DFBF3FD4A2FBD4AF8F757676CE2142BF7EFD0A88A6A8BE4FA1FBF43B3DAE8BED
543 D3A78F840844012C1F58DF0354C779DBE1E4E4F488A880E30367BF80C6B17D0E
544 0E0EBD88BC1D1D1D4134857D8CFA38FB53A88FC653AE67CF9E54109054E838CD
545 696F6FEF41E4DDBD7B771049E877B5A88FB32F61F9B4D685ADADED23A2028E0F
546 9CFD021AC7377ED6D6D6122258595905B07C1A9EFAE97E972E5D96EA9AC3CE9D
547 3BE774EAD40944051D3B769C42BFABB605F43B3DAE6F0D75E8D04142F488082C
548 D1FDA5C6ACE3F6EDDB7B13816E4D397F2C2C2C3C88D0AE5D3B9DE7DFFF0101C8
549 8363
550 }
551 end
552 object PopupMenu1: TPopupMenu
553 Left = 294
554 Top = 81
555 end
556end
Note: See TracBrowser for help on using the repository browser.