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
|
object AtomPackageSettingsForm: TAtomPackageSettingsForm
Left = 352
Height = 580
Top = 171
Width = 588
Caption = 'New Atom Package'
ClientHeight = 580
ClientWidth = 588
LCLVersion = '3.99.0.0'
OnShow = FormShow
object edtDescription: TEdit
AnchorSideLeft.Control = dePackage
AnchorSideTop.Control = dePackage
AnchorSideTop.Side = asrBottom
Left = 120
Height = 32
Top = 48
Width = 446
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Top = 8
TabOrder = 0
end
object lblDescription: TLabel
AnchorSideTop.Control = edtDescription
AnchorSideTop.Side = asrCenter
AnchorSideRight.Control = edtDescription
Left = 24
Height = 15
Top = 57
Width = 88
Alignment = taRightJustify
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Right = 8
Caption = '&Description'
FocusControl = edtDescription
ParentColor = False
end
object edtName: TEdit
AnchorSideLeft.Control = edtDescription
AnchorSideTop.Control = edtDescription
AnchorSideTop.Side = asrBottom
Left = 120
Height = 32
Top = 88
Width = 280
BorderSpacing.Top = 8
TabOrder = 1
OnEditingDone = edtNameEditingDone
OnKeyPress = edtNameKeyPress
end
object lblName: TLabel
AnchorSideTop.Control = edtName
AnchorSideTop.Side = asrCenter
AnchorSideRight.Control = edtName
Left = 16
Height = 15
Top = 97
Width = 96
Alignment = taRightJustify
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Right = 8
Caption = 'Package &Name'
FocusControl = edtName
ParentColor = False
end
object cbLink: TCheckBox
AnchorSideLeft.Control = edtClassName
AnchorSideTop.Control = edtClassName
AnchorSideTop.Side = asrBottom
Left = 120
Height = 23
Top = 169
Width = 160
BorderSpacing.Top = 8
Caption = 'Link in Atom package dir'
TabOrder = 2
end
object vleCommands: TValueListEditor
AnchorSideLeft.Control = cbLink
AnchorSideTop.Control = cbLink
AnchorSideTop.Side = asrBottom
Left = 120
Height = 112
Top = 200
Width = 446
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Top = 8
DefaultColWidth = 192
FixedCols = 0
RowCount = 2
TabOrder = 3
KeyOptions = [keyEdit, keyAdd, keyDelete]
Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goColSizing, goEditing, goAutoAddRows, goAlwaysShowEditor, goThumbTracking]
TitleCaptions.Strings = (
'Name'
'Function'
)
ColWidths = (
192
252
)
end
object ButtonPanel1: TButtonPanel
Left = 6
Height = 56
Top = 518
Width = 576
OKButton.Name = 'OKButton'
OKButton.DefaultCaption = True
HelpButton.Name = 'HelpButton'
HelpButton.DefaultCaption = True
CloseButton.Name = 'CloseButton'
CloseButton.DefaultCaption = True
CancelButton.Name = 'CancelButton'
CancelButton.DefaultCaption = True
TabOrder = 4
ShowButtons = [pbOK, pbCancel]
end
object lblLicense: TLabel
AnchorSideTop.Control = edtLicense
AnchorSideTop.Side = asrCenter
AnchorSideRight.Control = edtLicense
Left = 56
Height = 15
Top = 329
Width = 56
Alignment = taRightJustify
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Right = 8
Caption = '&License'
FocusControl = edtLicense
ParentColor = False
end
object edtLicense: TEdit
AnchorSideLeft.Control = vleCommands
AnchorSideTop.Control = vleCommands
AnchorSideTop.Side = asrBottom
Left = 120
Height = 32
Top = 320
Width = 184
BorderSpacing.Top = 8
TabOrder = 5
end
object lblCommands: TLabel
AnchorSideTop.Control = vleCommands
AnchorSideRight.Control = vleCommands
Left = 32
Height = 15
Top = 200
Width = 80
Alignment = taRightJustify
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Right = 8
Caption = '&Commands'
FocusControl = vleCommands
ParentColor = False
end
object lblLicense1: TLabel
AnchorSideTop.Control = edtKeywords
AnchorSideTop.Side = asrCenter
AnchorSideRight.Control = edtKeywords
Left = 44
Height = 15
Top = 370
Width = 68
Alignment = taRightJustify
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Right = 8
Caption = '&Keywords'
FocusControl = edtKeywords
ParentColor = False
end
object edtKeywords: TEdit
AnchorSideLeft.Control = edtLicense
AnchorSideTop.Control = edtLicense
AnchorSideTop.Side = asrBottom
Left = 120
Height = 32
Top = 361
Width = 445
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Top = 9
TabOrder = 6
end
object lblCommands1: TLabel
AnchorSideTop.Control = vleActivationCommands
AnchorSideRight.Control = vleActivationCommands
Left = 23
Height = 30
Top = 401
Width = 89
Alignment = taRightJustify
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Right = 8
Caption = '&Activation '#10'Commands'
FocusControl = vleActivationCommands
ParentColor = False
end
object vleActivationCommands: TValueListEditor
AnchorSideLeft.Control = edtKeywords
AnchorSideTop.Control = edtKeywords
AnchorSideTop.Side = asrBottom
Left = 120
Height = 112
Top = 401
Width = 445
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Top = 8
DefaultColWidth = 192
FixedCols = 0
RowCount = 2
TabOrder = 7
KeyOptions = [keyEdit, keyAdd, keyDelete, keyUnique]
Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goColSizing, goEditing, goAutoAddRows, goAlwaysShowEditor, goThumbTracking]
TitleCaptions.Strings = (
'Command Name'
'Scope'
)
ColWidths = (
192
251
)
end
object dePackage: TDirectoryEdit
Left = 120
Height = 32
Top = 8
Width = 447
ShowHidden = False
ButtonWidth = 23
NumGlyphs = 1
Anchors = [akTop, akLeft, akRight]
MaxLength = 0
TabOrder = 8
end
object lblDescription1: TLabel
AnchorSideTop.Control = dePackage
AnchorSideTop.Side = asrCenter
AnchorSideRight.Control = dePackage
Left = 34
Height = 15
Top = 17
Width = 78
Alignment = taRightJustify
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Right = 8
Caption = '&Directory'
FocusControl = edtDescription
ParentColor = False
end
object lblClassName: TLabel
AnchorSideTop.Control = edtClassName
AnchorSideTop.Side = asrCenter
AnchorSideRight.Control = edtClassName
Left = 32
Height = 15
Top = 138
Width = 79
Alignment = taRightJustify
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Right = 9
Caption = '&Class Name'
FocusControl = edtClassName
ParentColor = False
end
object edtClassName: TEdit
AnchorSideLeft.Control = edtName
AnchorSideTop.Control = edtName
AnchorSideTop.Side = asrBottom
Left = 120
Height = 32
Top = 129
Width = 280
BorderSpacing.Top = 9
TabOrder = 9
OnKeyPress = edtClassNameKeyPress
end
end
|
