-
Notifications
You must be signed in to change notification settings - Fork 5
/
Copy pathfrmConfig_U.dfm
324 lines (324 loc) · 7.04 KB
/
frmConfig_U.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
313
314
315
316
317
318
319
320
321
322
323
324
object frmConfig: TfrmConfig
AlignWithMargins = True
Left = 322
Top = 137
Caption = 'Run options'
ClientHeight = 486
ClientWidth = 792
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
OldCreateOrder = True
Position = poScreenCenter
StyleElements = [seFont, seClient]
OnClose = FormClose
OnConstrainedResize = FormConstrainedResize
OnCreate = FormCreate
OnHide = FormHide
OnShow = FormShow
DesignSize = (
792
486)
PixelsPerInch = 96
TextHeight = 13
object gbItems: TGroupBox
Left = 6
Top = 1
Width = 373
Height = 404
Anchors = [akLeft, akTop, akBottom]
Caption = 'Elements to run'
TabOrder = 0
DesignSize = (
373
404)
object tvItems: TTreeView
Left = 8
Top = 15
Width = 357
Height = 380
Anchors = [akLeft, akTop, akBottom]
DoubleBuffered = True
DragMode = dmAutomatic
HideSelection = False
Images = TreeImageList
Indent = 19
ParentDoubleBuffered = False
TabOrder = 0
OnChange = tvItemsChange
OnChanging = tvItemsChanging
OnCustomDrawItem = tvItemsCustomDrawItem
OnDragDrop = tvItemsDragDrop
OnDragOver = tvItemsDragOver
OnEdited = tvItemsEdited
end
end
object gbProperties: TGroupBox
Left = 386
Top = 1
Width = 400
Height = 404
Anchors = [akLeft, akTop, akRight, akBottom]
Caption = 'Properties'
TabOrder = 1
inline frmCommandConfig: TfrmCommandConfig
Left = 2
Top = 15
Width = 396
Height = 387
Align = alClient
TabOrder = 0
ExplicitLeft = 2
ExplicitTop = 15
ExplicitWidth = 396
ExplicitHeight = 387
end
end
object gbButtons: TGroupBox
Left = 6
Top = 411
Width = 373
Height = 69
Anchors = [akLeft, akBottom]
TabOrder = 2
object btnAddGroup: TButton
Left = 6
Top = 37
Width = 117
Height = 25
Action = actAddGroup
TabOrder = 3
end
object btnAddElement: TButton
Left = 128
Top = 37
Width = 117
Height = 25
Action = actAddElement
TabOrder = 4
WordWrap = True
end
object btnDel: TButton
Left = 250
Top = 7
Width = 117
Height = 25
Action = actDel
TabOrder = 2
end
object btnCopy: TButton
Left = 250
Top = 37
Width = 117
Height = 25
Action = actCopy
TabOrder = 5
end
object btnUp: TButton
Left = 6
Top = 7
Width = 117
Height = 25
Action = actItemUp
TabOrder = 0
end
object btnDown: TButton
Left = 128
Top = 7
Width = 117
Height = 25
Action = actItemDown
TabOrder = 1
end
end
object gbMainButtons: TGroupBox
Left = 386
Top = 411
Width = 400
Height = 69
Anchors = [akLeft, akRight, akBottom]
TabOrder = 3
DesignSize = (
400
69)
object lblVer: TLinkLabel
Left = 10
Top = 14
Width = 46
Height = 17
Cursor = crHandPoint
Align = alCustom
Alignment = taRightJustify
Caption = 'Version: '
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 0
TabStop = True
OnLinkClick = lblVerLinkClick
end
object btnApply: TButton
Left = 319
Top = 37
Width = 75
Height = 25
Action = actApply
Anchors = [akRight, akBottom]
TabOrder = 3
end
object btnClose: TButton
Left = 236
Top = 37
Width = 75
Height = 25
Action = actClose
Anchors = [akRight, akBottom]
Cancel = True
TabOrder = 2
end
object btnOK: TButton
Left = 153
Top = 37
Width = 75
Height = 25
Action = actOK
Anchors = [akRight, akBottom]
TabOrder = 1
end
object btnOptions: TButton
Left = 10
Top = 37
Width = 107
Height = 25
Caption = 'Options'
PopupMenu = ppOptionsMenu
TabOrder = 4
OnClick = btnOptionsClick
end
end
object ActionList: TActionList
Left = 44
Top = 58
object actAddElement: TAction
Tag = -1
Category = 'Elements'
Caption = 'Add element'
OnExecute = actAddElementExecute
end
object actAddGroup: TAction
Category = 'Elements'
Caption = 'Add group'
OnExecute = actAddElementExecute
end
object actCopy: TAction
Category = 'Elements'
Caption = 'Copy'
OnExecute = actCopyExecute
OnUpdate = actCopyUpdate
end
object actDel: TAction
Category = 'Elements'
Caption = 'Delete'
OnExecute = actDelExecute
OnUpdate = actCopyUpdate
end
object actOK: TAction
Category = 'Main'
Caption = 'OK'
Hint = 'Save and close options'
OnExecute = actOKExecute
OnUpdate = actApplyUpdate
end
object actClose: TAction
Category = 'Main'
Caption = 'Close'
Hint = 'Cancel and close options'
OnExecute = actCloseExecute
OnUpdate = actCloseUpdate
end
object actApply: TAction
Category = 'Main'
Caption = 'Apply'
Hint = 'Apply options without closing window'
OnExecute = actApplyExecute
OnUpdate = actApplyUpdate
end
object actItemUp: TAction
Category = 'Elements'
Caption = 'Up'
OnExecute = actItemUpExecute
OnUpdate = actItemUpUpdate
end
object actItemDown: TAction
Category = 'Elements'
Caption = 'Down'
OnExecute = actItemDownExecute
OnUpdate = actItemDownUpdate
end
end
object TrayIcon: TTrayIcon
Hint = 'Quick run from Tray'
PopupMenu = ppConfigMenu
OnMouseUp = TrayIconMouseUp
Left = 228
Top = 47
end
object ppConfigMenu: TPopupMenu
Left = 148
Top = 117
object ppCMConfig: TMenuItem
Caption = 'Options...'
Default = True
OnClick = ppCMConfigClick
end
object MenuItem1: TMenuItem
Caption = '-'
end
object ppCMExit: TMenuItem
Caption = 'Exit'
OnClick = ppCMExitClick
end
end
object TreeImageList: TImageList
ColorDepth = cd32Bit
Left = 212
Top = 192
end
object ppOptionsMenu: TPopupMenu
Left = 506
Top = 423
object miOptionsLang: TMenuItem
Caption = 'Interface language'
end
object N1: TMenuItem
Caption = '-'
end
object miOptionsRunAtStart: TMenuItem
AutoCheck = True
Caption = 'Run at Windows start'
OnClick = miOptionsRunAtStartClick
end
object N2: TMenuItem
Caption = '-'
end
object miOptionsExtensions: TMenuItem
Caption = 'Extensions...'
OnClick = miOptionsExtensionsClick
end
object N3: TMenuItem
Caption = '-'
end
object miOptionsExitProgram: TMenuItem
Caption = 'Exit the program'
OnClick = miOptionsExitProgramClick
end
end
end