source: branches/virt simple/UFormMain.lfm

Last change on this file was 138, checked in by chronos, 6 years ago
  • Modified: Preparation for support for multiple memory types.
File size: 3.8 KB
Line 
1object Form1: TForm1
2 Left = 44
3 Height = 1023
4 Top = 6
5 Width = 1703
6 Caption = 'Form1'
7 ClientHeight = 0
8 ClientWidth = 0
9 DesignTimePPI = 120
10 OnClose = FormClose
11 OnCreate = FormCreate
12 OnDestroy = FormDestroy
13 OnShow = FormShow
14 LCLVersion = '1.8.0.6'
15 object ListViewMemory: TListView
16 Left = 888
17 Height = 696
18 Top = 32
19 Width = 234
20 Columns = <
21 item
22 Caption = 'Address'
23 Width = 100
24 end
25 item
26 Caption = 'Content'
27 Width = 154
28 end>
29 OwnerData = True
30 ReadOnly = True
31 RowSelect = True
32 TabOrder = 0
33 ViewStyle = vsReport
34 OnData = ListViewMemoryData
35 end
36 object ListViewRegisters: TListView
37 Left = 1128
38 Height = 696
39 Top = 32
40 Width = 274
41 Columns = <
42 item
43 Caption = 'Address'
44 Width = 100
45 end
46 item
47 Caption = 'Content'
48 Width = 154
49 end>
50 OwnerData = True
51 ReadOnly = True
52 RowSelect = True
53 TabOrder = 1
54 ViewStyle = vsReport
55 OnData = ListViewRegistersData
56 end
57 object ListViewInstructions: TListView
58 Left = 528
59 Height = 704
60 Top = 31
61 Width = 343
62 Columns = <
63 item
64 Caption = 'Index'
65 Width = 100
66 end
67 item
68 Caption = 'Instruction'
69 Width = 370
70 end>
71 OwnerData = True
72 ReadOnly = True
73 RowSelect = True
74 TabOrder = 2
75 ViewStyle = vsReport
76 OnData = ListViewInstructionsData
77 end
78 object Label1: TLabel
79 Left = 888
80 Height = 20
81 Top = 9
82 Width = 58
83 Caption = 'Memory:'
84 ParentColor = False
85 end
86 object Label2: TLabel
87 Left = 1128
88 Height = 20
89 Top = 9
90 Width = 63
91 Caption = 'Registers:'
92 ParentColor = False
93 end
94 object Label3: TLabel
95 Left = 1416
96 Height = 20
97 Top = 8
98 Width = 111
99 Caption = 'Special registers:'
100 ParentColor = False
101 end
102 object ListViewSpecialRegisters: TListView
103 Left = 1416
104 Height = 696
105 Top = 31
106 Width = 274
107 Columns = <
108 item
109 Caption = 'Address'
110 Width = 100
111 end
112 item
113 Caption = 'Content'
114 Width = 154
115 end>
116 OwnerData = True
117 ReadOnly = True
118 RowSelect = True
119 TabOrder = 3
120 ViewStyle = vsReport
121 OnData = ListViewSpecialRegistersData
122 end
123 object MemoOutput: TMemo
124 Left = 17
125 Height = 312
126 Top = 776
127 Width = 495
128 ReadOnly = True
129 ScrollBars = ssAutoBoth
130 TabOrder = 4
131 end
132 object Label4: TLabel
133 Left = 18
134 Height = 20
135 Top = 744
136 Width = 49
137 Caption = 'Output:'
138 ParentColor = False
139 end
140 object Label5: TLabel
141 Left = 528
142 Height = 20
143 Top = 9
144 Width = 152
145 Caption = 'Compiled source code:'
146 ParentColor = False
147 end
148 object MemoSource: TMemo
149 Left = 18
150 Height = 704
151 Top = 31
152 Width = 502
153 Font.Name = 'Liberation Mono'
154 ParentFont = False
155 ScrollBars = ssAutoBoth
156 TabOrder = 5
157 end
158 object Label6: TLabel
159 Left = 20
160 Height = 20
161 Top = 7
162 Width = 85
163 Caption = 'Source code:'
164 ParentColor = False
165 end
166 object ButtonCompile: TButton
167 Left = 532
168 Height = 25
169 Top = 760
170 Width = 100
171 Caption = 'Compile'
172 OnClick = ButtonCompileClick
173 TabOrder = 6
174 end
175 object ButtonStart: TButton
176 Left = 664
177 Height = 25
178 Top = 760
179 Width = 100
180 Caption = 'Start'
181 OnClick = ButtonStartClick
182 TabOrder = 7
183 end
184 object ButtonStop: TButton
185 Left = 784
186 Height = 25
187 Top = 760
188 Width = 100
189 Caption = 'Stop'
190 OnClick = ButtonStopClick
191 TabOrder = 8
192 end
193 object Timer1: TTimer
194 Interval = 200
195 OnTimer = Timer1Timer
196 left = 614
197 top = 205
198 end
199 object ActionList1: TActionList
200 left = 1051
201 top = 808
202 object ASave: TAction
203 Caption = 'Save'
204 OnExecute = ASaveExecute
205 ShortCut = 16467
206 end
207 end
208end
Note: See TracBrowser for help on using the repository browser.