-
Notifications
You must be signed in to change notification settings - Fork 4
/
frmExtConfigU.dfm
312 lines (312 loc) · 9.25 KB
/
frmExtConfigU.dfm
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
object frmExtConfig: TfrmExtConfig
Left = 0
Top = 0
Caption = 'External Function Configuration Utility for SIMION'
ClientHeight = 540
ClientWidth = 537
Color = clWhite
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Tahoma'
Font.Style = []
OldCreateOrder = False
Position = poMainFormCenter
PixelsPerInch = 106
TextHeight = 16
object Panel1: TPanel
AlignWithMargins = True
Left = 3
Top = 3
Width = 531
Height = 36
Align = alTop
BevelOuter = bvNone
ParentBackground = False
ParentColor = True
PopupMenu = PopupMenu1
TabOrder = 0
object sbLuaScript: TSpeedButton
AlignWithMargins = True
Left = 239
Top = 3
Width = 90
Height = 30
Align = alLeft
Caption = 'Lua script'
OnClick = sbLuaScriptClick
end
object sbSimion: TSpeedButton
AlignWithMargins = True
Left = 164
Top = 3
Width = 69
Height = 30
Align = alLeft
Caption = 'Simion'
OnClick = sbSimionClick
end
object sbSave: TSpeedButton
AlignWithMargins = True
Left = 81
Top = 3
Width = 72
Height = 30
Hint = 'Save configuration file'
Align = alLeft
Caption = 'Save'
Glyph.Data = {
36030000424D3603000000000000360000002800000010000000100000000100
18000000000000030000120B0000120B00000000000000000000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C03D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D
3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3DC0C0C0C0C0C0C0C0C03D3D3D
BAF4FEBAF4FE3D3D3DC0C0C0C0C0C03D3D3D3D3D3D3D3D3D3D3D3DBAF4FEBAF4
FE3D3D3DC0C0C0C0C0C0C0C0C03D3D3DBAF4FEBAF4FE3D3D3DC0C0C0C0C0C03D
3D3D3D3D3D3D3D3D3D3D3DBAF4FEBAF4FE3D3D3DC0C0C0C0C0C0C0C0C03D3D3D
BAF4FEBAF4FE3D3D3DC0C0C0C0C0C03D3D3D3D3D3D3D3D3D3D3D3DBAF4FEBAF4
FE3D3D3DC0C0C0C0C0C0C0C0C03D3D3DBAF4FEBAF4FE3D3D3D3D3D3D3D3D3D3D
3D3D3D3D3D3D3D3D3D3D3DBAF4FEBAF4FE3D3D3DC0C0C0C0C0C0C0C0C03D3D3D
BAF4FEBAF4FEBAF4FEBAF4FEBAF4FEBAF4FEBAF4FEBAF4FEBAF4FEBAF4FEBAF4
FE3D3D3DC0C0C0C0C0C0C0C0C03D3D3DBAF4FEBAF4FE3D3D3D3D3D3D3D3D3D3D
3D3D3D3D3D3D3D3D3D3D3DBAF4FEBAF4FE3D3D3DC0C0C0C0C0C0C0C0C03D3D3D
BAF4FE3D3D3DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF3D3D3DBAF4
FE3D3D3DC0C0C0C0C0C0C0C0C03D3D3DBAF4FE3D3D3DFFFFFFFF0000FF0000FF
0000FF0000FFFFFFFFFFFF3D3D3DBAF4FE3D3D3DC0C0C0C0C0C0C0C0C03D3D3D
BAF4FE3D3D3DFFFFFFFFFFFFFF0000FF0000FF0000FFFFFFFFFFFF3D3D3DBAF4
FE3D3D3DC0C0C0C0C0C0C0C0C03D3D3DBAF4FEC0C0C0FFFFFFFF0000FF0000FF
0000FF0000FFFFFFFFFFFF3D3D3D3D3D3D3D3D3DC0C0C0C0C0C0C0C0C03D3D3D
C0C0C0C0C0C0FF0000FF0000FF0000FFFFFFFF0000FFFFFFFFFFFF3D3D3D8080
803D3D3DC0C0C0C0C0C0C0C0C0C0C0C0C0C0C0FF0000FF0000FF0000C0C0C0C0
C0C0C0C0C0C0C0C03D3D3D3D3D3D3D3D3D3D3D3DC0C0C0C0C0C0C0C0C0C0C0C0
FF0000FF0000FF0000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0FF0000C0C0C0C0C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0}
end
object sbOpen: TSpeedButton
AlignWithMargins = True
Left = 3
Top = 3
Width = 72
Height = 30
Hint = 'Open configuration file'
Align = alLeft
Caption = 'Open'
Glyph.Data = {
36030000424D3603000000000000360000002800000010000000100000000100
18000000000000030000120B0000120B00000000000000000000C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C03D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D
3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3DC0C0C0C0C0C0C0C0C03D3D3D
BAF4FEBAF4FE3D3D3DC0C0C0C0C0C03D3D3D3D3D3D3D3D3D3D3D3DBAF4FEBAF4
FE3D3D3DC0C0C0C0C0C0C0C0C03D3D3DBAF4FEBAF4FE3D3D3DC0C0C0C0C0C03D
3D3D3D3D3D3D3D3D3D3D3DBAF4FEBAF4FE3D3D3DC0C0C0C0C0C0C0C0C03D3D3D
BAF4FEBAF4FE3D3D3DC0C0C0C0C0C03D3D3D3D3D3D3D3D3D3D3D3DBAF4FEBAF4
FE3D3D3DC0C0C0C0C0C0C0C0C03D3D3DBAF4FEBAF4FE3D3D3D3D3D3D3D3D3D3D
3D3D3D3D3D3D3D3D3D3D3DBAF4FEBAF4FE3D3D3DC0C0C0C0C0C0C0C0C03D3D3D
BAF4FEBAF4FEBAF4FEBAF4FEBAF4FEBAF4FEBAF4FEBAF4FEBAF4FEBAF4FEBAF4
FE3D3D3DC0C0C0C0C0C0C0C0C03D3D3DBAF4FEBAF4FE3D3D3D3D3D3D3D3D3D3D
3D3D3D3D3D3D3D3D3D3D3DBAF4FEBAF4FE3D3D3DC0C0C0C0C0C0C0C0C03D3D3D
BAF4FE3D3D3DFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF3D3D3DBAF4
FE3D3D3DC0C0C0C0C0C0C0C0C03D3D3DBAF4FE3D3D3DFFFFFFFFFFFFFFFFFFFF
0000FFFFFFFFFFFFFFFFFF3D3D3DBAF4FE3D3D3DC0C0C0C0C0C0C0C0C03D3D3D
BAF4FE3D3D3DFFFFFFFFFFFFFF0000FF0000FF0000FFFFFFFFFFFF3D3D3DBAF4
FE3D3D3DC0C0C0C0C0C0C0C0C03D3D3DBAF4FE3D3D3DFFFFFFFFFFFFFFFFFFFF
0000FF0000FF0000FFFFFFC0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C03D3D3D
BAF4FE3D3D3DFFFFFFFFFFFFFFFFFFFFFFFFFF0000FF0000FF0000C0C0C0FF00
00C0C0C0C0C0C0C0C0C0C0C0C03D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3DC0
C0C0C0C0C0FF0000FF0000FF0000FF0000C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0FF0000FF0000FF00
00C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0
C0C0C0C0C0FF0000FF0000FF0000FF0000C0C0C0C0C0C0C0C0C0}
end
object Shape1: TShape
Left = 156
Top = 0
Width = 5
Height = 36
Align = alLeft
Pen.Style = psClear
ExplicitLeft = 92
ExplicitTop = -4
ExplicitHeight = 31
end
object chkNoGUI: TCheckBox
AlignWithMargins = True
Left = 335
Top = 3
Width = 66
Height = 30
Align = alLeft
Caption = ' noGUI'
TabOrder = 0
end
end
object StatusBar1: TStatusBar
AlignWithMargins = True
Left = 3
Top = 517
Width = 531
Height = 22
Margins.Bottom = 1
AutoHint = True
Color = clWhite
Panels = <>
SimplePanel = True
end
object Panel2: TPanel
AlignWithMargins = True
Left = 3
Top = 472
Width = 531
Height = 39
Align = alBottom
BevelOuter = bvNone
ParentColor = True
TabOrder = 2
object OKBtn: TButton
AlignWithMargins = True
Left = 271
Top = 3
Width = 81
Height = 33
Align = alRight
Caption = 'OK'
Default = True
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ModalResult = 1
ParentFont = False
TabOrder = 0
end
object CancelBtn: TButton
AlignWithMargins = True
Left = 358
Top = 3
Width = 80
Height = 33
Align = alRight
Cancel = True
Caption = 'Cancel'
ModalResult = 2
TabOrder = 1
end
object HelpBtn: TButton
AlignWithMargins = True
Left = 444
Top = 3
Width = 80
Height = 33
Margins.Right = 7
Align = alRight
Caption = '&Help'
TabOrder = 2
end
end
object PageControl1: TPageControl
Left = 0
Top = 42
Width = 537
Height = 427
ActivePage = tsFeatures
Align = alClient
TabHeight = 24
TabOrder = 3
object tsFeatures: TTabSheet
Caption = ' Features '
ExplicitLeft = 0
ExplicitTop = 0
ExplicitWidth = 0
ExplicitHeight = 0
object lbFeats: TListBox
AlignWithMargins = True
Left = 3
Top = 22
Width = 110
Height = 368
Align = alLeft
TabOrder = 0
OnClick = lbFeatsClick
end
object Panel5: TPanel
Left = 0
Top = 0
Width = 529
Height = 19
Align = alTop
BevelOuter = bvNone
Caption = 'Adujstable features of the external function (object) '
Color = 15925247
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Tahoma'
Font.Style = []
ParentBackground = False
ParentFont = False
TabOrder = 1
end
object leDftDbl: TLabeledEdit
Left = 130
Top = 56
Width = 110
Height = 24
EditLabel.Width = 40
EditLabel.Height = 16
EditLabel.Caption = 'Default'
TabOrder = 2
end
object leMinDbl: TLabeledEdit
Left = 130
Top = 112
Width = 110
Height = 24
EditLabel.Width = 20
EditLabel.Height = 16
EditLabel.Caption = 'Min'
TabOrder = 3
end
object leMaxDbl: TLabeledEdit
Left = 262
Top = 112
Width = 110
Height = 24
EditLabel.Width = 23
EditLabel.Height = 16
EditLabel.Caption = 'Max'
TabOrder = 4
end
object chkEnabled: TCheckBox
Left = 357
Top = 48
Width = 97
Height = 17
Caption = 'Enabled'
TabOrder = 5
end
end
end
object PopupMenu1: TPopupMenu
Left = 472
Top = 40
object pmRunSimion: TMenuItem
Caption = 'Run Simion'
OnClick = pmRunSimionClick
end
object pmPokeWithDatum: TMenuItem
Caption = 'Poke with datum'
OnClick = pmPokeWithDatumClick
end
object pmCloseSimion: TMenuItem
Caption = 'Close Simion'
OnClick = pmCloseSimionClick
end
end
object OpenDialog1: TOpenDialog
Left = 336
Top = 192
end
end