source: trunk/Forms/FormMain.lfm

Last change on this file was 2, checked in by chronos, 14 months ago
  • Added: Initial development version.
File size: 2.1 KB
Line 
1object FormMain: TFormMain
2 Left = 623
3 Height = 716
4 Top = 509
5 Width = 1061
6 Caption = 'SHARP MZ-800 emulator'
7 ClientHeight = 682
8 ClientWidth = 1061
9 DesignTimePPI = 144
10 Menu = MainMenu1
11 OnClose = FormClose
12 OnCreate = FormCreate
13 OnDestroy = FormDestroy
14 OnShow = FormShow
15 LCLVersion = '2.2.6.0'
16 object PanelLeft: TPanel
17 Left = 0
18 Height = 682
19 Top = 0
20 Width = 231
21 Align = alLeft
22 BevelOuter = bvNone
23 TabOrder = 0
24 end
25 object PanelRight: TPanel
26 Left = 806
27 Height = 682
28 Top = 0
29 Width = 255
30 Align = alRight
31 BevelOuter = bvNone
32 TabOrder = 1
33 end
34 object Splitter1: TSplitter
35 Left = 231
36 Height = 682
37 Top = 0
38 Width = 8
39 end
40 object Splitter2: TSplitter
41 Left = 798
42 Height = 682
43 Top = 0
44 Width = 8
45 Align = alRight
46 ResizeAnchor = akRight
47 end
48 object PanelCenter: TPanel
49 Left = 239
50 Height = 682
51 Top = 0
52 Width = 559
53 Align = alClient
54 BevelOuter = bvNone
55 TabOrder = 4
56 end
57 object MainMenu1: TMainMenu
58 Left = 216
59 Top = 64
60 object MenuItem1: TMenuItem
61 Caption = 'File'
62 object MenuItem4: TMenuItem
63 Action = Core.AExit
64 end
65 end
66 object MenuItem5: TMenuItem
67 Caption = 'View'
68 object MenuItem6: TMenuItem
69 Action = Core.AViewMemory
70 end
71 object MenuItem7: TMenuItem
72 Action = Core.AViewDissssembler
73 end
74 object MenuItem14: TMenuItem
75 Action = Core.AViewCpu
76 end
77 object MenuItem15: TMenuItem
78 Action = Core.AViewScreen
79 end
80 end
81 object MenuItem2: TMenuItem
82 Caption = 'Debug'
83 object MenuItem3: TMenuItem
84 Action = Core.ARun
85 end
86 object MenuItem8: TMenuItem
87 Action = Core.APause
88 end
89 object MenuItem13: TMenuItem
90 Action = Core.AStop
91 end
92 object MenuItem9: TMenuItem
93 Action = Core.AStepIn
94 end
95 object MenuItem10: TMenuItem
96 Action = Core.AStepOver
97 end
98 object MenuItem11: TMenuItem
99 Action = Core.AStepOut
100 end
101 object MenuItem12: TMenuItem
102 Action = Core.ARunToCursor
103 end
104 end
105 end
106end
Note: See TracBrowser for help on using the repository browser.