-
Notifications
You must be signed in to change notification settings - Fork 1
Expand file tree
/
Copy pathCodeTemplates.lfm
More file actions
168 lines (168 loc) · 3.5 KB
/
CodeTemplates.lfm
File metadata and controls
168 lines (168 loc) · 3.5 KB
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
object frmCodeTemplates: TfrmCodeTemplates
Left = 291
Height = 327
Top = 206
Width = 408
HelpContext = 5200
BorderIcons = [biSystemMenu, biHelp]
BorderStyle = bsDialog
Caption = 'Code Templates'
ClientHeight = 327
ClientWidth = 408
Font.Height = -11
Font.Name = 'MS Sans Serif'
OnCreate = FormCreate
OnDestroy = FormDestroy
Position = poScreenCenter
LCLVersion = '0.9.31'
object grpTemplates: TGroupBox
Left = 4
Height = 284
Top = 4
Width = 399
Caption = 'Code Templates'
ClientHeight = 261
ClientWidth = 391
TabOrder = 0
object lblTemplate: TLabel
Left = 8
Height = 16
Top = 16
Width = 54
Caption = '&Template:'
ParentColor = False
end
object lblCode: TLabel
Left = 8
Height = 16
Top = 99
Width = 31
Caption = '&Code:'
ParentColor = False
end
object grdTemplates: TStringGrid
Left = 88
Height = 80
Top = 16
Width = 233
HelpContext = 5204
ColCount = 2
DefaultRowHeight = 18
FixedCols = 0
Options = [goFixedVertLine, goFixedHorzLine, goDrawFocusSelected]
RowCount = 2
TabOrder = 0
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
OnSelectCell = grdTemplatesSelectCell
ColWidths = (
57
151
)
end
object btnAdd: TButton
Left = 326
Height = 24
Top = 16
Width = 64
HelpContext = 5205
Caption = '&Add...'
OnClick = btnAddClick
TabOrder = 2
end
object btnEdit: TButton
Left = 326
Height = 24
Top = 44
Width = 64
HelpContext = 5206
Caption = '&Edit...'
OnClick = btnEditClick
TabOrder = 3
end
object btnDelete: TButton
Left = 326
Height = 24
Top = 71
Width = 64
HelpContext = 5207
Caption = '&Delete'
OnClick = btnDeleteClick
TabOrder = 4
end
object mmoCode: TMemo
Left = 88
Height = 157
Top = 99
Width = 233
HelpContext = 5208
OnChange = mmoCodeChange
ScrollBars = ssBoth
TabOrder = 1
end
object btnLoad: TButton
Left = 8
Height = 24
Top = 204
Width = 73
HelpContext = 5209
Caption = '&Load'
OnClick = btnLoadClick
TabOrder = 5
end
object btnSave: TButton
Left = 8
Height = 24
Top = 232
Width = 73
HelpContext = 5210
Caption = '&Save'
OnClick = btnSaveClick
TabOrder = 6
end
end
object btnOK: TButton
Left = 168
Height = 25
Top = 296
Width = 75
HelpContext = 5211
Caption = 'OK'
Default = True
ModalResult = 1
TabOrder = 1
end
object btnCancel: TButton
Left = 248
Height = 25
Top = 296
Width = 75
HelpContext = 5212
Cancel = True
Caption = 'Cancel'
ModalResult = 2
TabOrder = 2
end
object btnHelp: TButton
Left = 328
Height = 25
Top = 296
Width = 75
HelpContext = 5215
Caption = '&Help'
OnClick = btnHelpClick
TabOrder = 3
end
object dlgOpen: TOpenDialog
DefaultExt = '.dci'
Filter = 'Code Templates (*.dci)|*.dci'
left = 245
top = 8
end
object dlgSave: TSaveDialog
DefaultExt = '.dci'
Filter = 'Code Templates (*.dci)|*.dci'
left = 277
top = 8
end
end