8 |
|
ClientHeight = 425 |
9 |
|
ClientWidth = 716 |
10 |
|
OnShow = FormShow |
11 |
< |
LCLVersion = '1.2.2.0' |
11 |
> |
LCLVersion = '1.4.4.0' |
12 |
|
object Label3: TLabel |
13 |
|
Left = 288 |
14 |
|
Height = 15 |
49 |
|
end |
50 |
|
object QuoteFields: TCheckBox |
51 |
|
Left = 16 |
52 |
< |
Height = 24 |
52 |
> |
Height = 22 |
53 |
|
Top = 392 |
54 |
< |
Width = 127 |
54 |
> |
Width = 125 |
55 |
|
Caption = '&Quote Identifiers' |
56 |
|
TabOrder = 3 |
57 |
|
end |
71 |
|
Height = 337 |
72 |
|
Top = 27 |
73 |
|
Width = 251 |
74 |
< |
ActivePage = ExecutePage |
75 |
< |
TabIndex = 4 |
74 |
> |
ActivePage = SelectPage |
75 |
> |
TabIndex = 0 |
76 |
|
TabOrder = 5 |
77 |
+ |
TabPosition = tpLeft |
78 |
|
object SelectPage: TTabSheet |
79 |
|
Caption = 'Select' |
80 |
< |
ClientHeight = 300 |
81 |
< |
ClientWidth = 243 |
80 |
> |
ClientHeight = 331 |
81 |
> |
ClientWidth = 184 |
82 |
|
OnShow = SelectPageShow |
83 |
|
object Label1: TLabel |
84 |
|
Left = 7 |
85 |
< |
Height = 18 |
85 |
> |
Height = 15 |
86 |
|
Top = 3 |
87 |
< |
Width = 78 |
87 |
> |
Width = 69 |
88 |
|
Caption = 'Table Name' |
89 |
|
ParentColor = False |
90 |
|
end |
91 |
|
object Label2: TLabel |
92 |
|
Left = 7 |
93 |
< |
Height = 18 |
93 |
> |
Height = 15 |
94 |
|
Top = 53 |
95 |
< |
Width = 39 |
95 |
> |
Width = 33 |
96 |
|
Caption = 'Fields' |
97 |
|
ParentColor = False |
98 |
|
end |
99 |
|
object Label4: TLabel |
100 |
|
Left = 7 |
101 |
< |
Height = 18 |
101 |
> |
Height = 15 |
102 |
|
Top = 231 |
103 |
< |
Width = 87 |
103 |
> |
Width = 77 |
104 |
|
Caption = 'Primary Keys' |
105 |
|
ParentColor = False |
106 |
|
end |
107 |
|
object SelectTableNames: TComboBox |
108 |
|
Left = 7 |
109 |
< |
Height = 29 |
109 |
> |
Height = 27 |
110 |
|
Top = 19 |
111 |
|
Width = 169 |
112 |
+ |
Anchors = [akTop, akLeft, akRight] |
113 |
+ |
AutoComplete = True |
114 |
+ |
AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending] |
115 |
|
ItemHeight = 0 |
116 |
|
OnCloseUp = SelectTableNamesCloseUp |
117 |
|
TabOrder = 0 |
122 |
|
Hint = 'Select Fields to include in Select Statement or leave unselected to select all' |
123 |
|
Top = 69 |
124 |
|
Width = 169 |
125 |
+ |
Anchors = [akTop, akLeft, akRight] |
126 |
|
ItemHeight = 0 |
127 |
|
MultiSelect = True |
128 |
|
OnDblClick = SelectFieldsListDblClick |
134 |
|
end |
135 |
|
object SelectPrimaryKeys: TListBox |
136 |
|
Left = 7 |
137 |
< |
Height = 46 |
137 |
> |
Height = 77 |
138 |
|
Top = 247 |
139 |
< |
Width = 159 |
140 |
< |
Anchors = [akTop, akLeft, akBottom] |
139 |
> |
Width = 169 |
140 |
> |
Anchors = [akTop, akLeft, akRight, akBottom] |
141 |
|
ItemHeight = 0 |
142 |
< |
ScrollWidth = 157 |
142 |
> |
ScrollWidth = 167 |
143 |
|
TabOrder = 2 |
144 |
|
TopIndex = -1 |
145 |
|
end |
146 |
|
end |
147 |
|
object InsertPage: TTabSheet |
148 |
|
Caption = 'Insert' |
149 |
< |
ClientHeight = 300 |
150 |
< |
ClientWidth = 243 |
149 |
> |
ClientHeight = 331 |
150 |
> |
ClientWidth = 184 |
151 |
|
OnShow = InsertPageShow |
152 |
|
object Label8: TLabel |
153 |
|
Left = 7 |
154 |
< |
Height = 18 |
154 |
> |
Height = 15 |
155 |
|
Top = 3 |
156 |
< |
Width = 78 |
156 |
> |
Width = 69 |
157 |
|
Caption = 'Table Name' |
158 |
|
ParentColor = False |
159 |
|
end |
160 |
|
object Label9: TLabel |
161 |
|
Left = 7 |
162 |
< |
Height = 18 |
162 |
> |
Height = 15 |
163 |
|
Top = 53 |
164 |
< |
Width = 39 |
164 |
> |
Width = 33 |
165 |
|
Caption = 'Fields' |
166 |
|
ParentColor = False |
167 |
|
end |
168 |
|
object InsertTableNames: TComboBox |
169 |
|
Left = 7 |
170 |
< |
Height = 29 |
170 |
> |
Height = 27 |
171 |
|
Top = 19 |
172 |
|
Width = 169 |
173 |
+ |
Anchors = [akTop, akLeft, akRight] |
174 |
+ |
AutoComplete = True |
175 |
+ |
AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending] |
176 |
|
ItemHeight = 0 |
177 |
|
OnCloseUp = InsertTableNamesCloseUp |
178 |
|
TabOrder = 0 |
179 |
|
end |
180 |
|
object InsertFieldsList: TListBox |
181 |
|
Left = 7 |
182 |
< |
Height = 225 |
182 |
> |
Height = 256 |
183 |
|
Hint = 'Select Fields to include in Insert Statement or leave unselected to select all' |
184 |
|
Top = 69 |
185 |
|
Width = 169 |
186 |
< |
Anchors = [akTop, akLeft, akBottom] |
186 |
> |
Anchors = [akTop, akLeft, akRight, akBottom] |
187 |
|
ItemHeight = 0 |
188 |
|
MultiSelect = True |
189 |
|
OnDblClick = SelectFieldsListDblClick |
196 |
|
end |
197 |
|
object ModifyPage: TTabSheet |
198 |
|
Caption = 'Modify' |
199 |
< |
ClientHeight = 300 |
200 |
< |
ClientWidth = 243 |
199 |
> |
ClientHeight = 331 |
200 |
> |
ClientWidth = 184 |
201 |
|
OnShow = ModifyPageShow |
202 |
|
object Label10: TLabel |
203 |
|
Left = 7 |
204 |
< |
Height = 18 |
204 |
> |
Height = 15 |
205 |
|
Top = 3 |
206 |
< |
Width = 78 |
206 |
> |
Width = 69 |
207 |
|
Caption = 'Table Name' |
208 |
|
ParentColor = False |
209 |
|
end |
210 |
|
object Label11: TLabel |
211 |
|
Left = 7 |
212 |
< |
Height = 18 |
212 |
> |
Height = 15 |
213 |
|
Top = 53 |
214 |
< |
Width = 39 |
214 |
> |
Width = 33 |
215 |
|
Caption = 'Fields' |
216 |
|
ParentColor = False |
217 |
|
end |
218 |
|
object Label12: TLabel |
219 |
|
Left = 7 |
220 |
< |
Height = 18 |
220 |
> |
Height = 15 |
221 |
|
Top = 228 |
222 |
< |
Width = 87 |
222 |
> |
Width = 77 |
223 |
|
Caption = 'Primary Keys' |
224 |
|
ParentColor = False |
225 |
|
end |
226 |
|
object ModifyTableNames: TComboBox |
227 |
|
Left = 7 |
228 |
< |
Height = 29 |
228 |
> |
Height = 27 |
229 |
|
Top = 19 |
230 |
|
Width = 169 |
231 |
+ |
Anchors = [akTop, akLeft, akRight] |
232 |
+ |
AutoComplete = True |
233 |
+ |
AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending] |
234 |
|
ItemHeight = 0 |
235 |
|
OnCloseUp = ModifyTableNamesCloseUp |
236 |
|
TabOrder = 0 |
241 |
|
Hint = 'Select Fields to include in Update Statement or leave unselected to select all' |
242 |
|
Top = 69 |
243 |
|
Width = 169 |
244 |
+ |
Anchors = [akTop, akLeft, akRight] |
245 |
|
ItemHeight = 0 |
246 |
|
MultiSelect = True |
247 |
|
OnClick = SelectFieldsListDblClick |
251 |
|
end |
252 |
|
object ModifyPrimaryKeys: TListBox |
253 |
|
Left = 7 |
254 |
< |
Height = 46 |
254 |
> |
Height = 77 |
255 |
|
Top = 244 |
256 |
< |
Width = 159 |
257 |
< |
Anchors = [akTop, akLeft, akBottom] |
256 |
> |
Width = 169 |
257 |
> |
Anchors = [akTop, akLeft, akRight, akBottom] |
258 |
|
ItemHeight = 0 |
259 |
|
OnClick = SelectFieldsListDblClick |
260 |
< |
ScrollWidth = 157 |
260 |
> |
ScrollWidth = 167 |
261 |
|
TabOrder = 2 |
262 |
|
TopIndex = -1 |
263 |
|
end |
265 |
|
Left = 5 |
266 |
|
Height = 22 |
267 |
|
Top = 181 |
268 |
< |
Width = 161 |
268 |
> |
Width = 150 |
269 |
|
Caption = 'Include Primary keys' |
270 |
|
OnClick = IncludePrimaryKeysClick |
271 |
|
TabOrder = 3 |
272 |
|
end |
273 |
|
object Label5: TLabel |
274 |
|
Left = 27 |
275 |
< |
Height = 18 |
275 |
> |
Height = 15 |
276 |
|
Top = 202 |
277 |
< |
Width = 75 |
277 |
> |
Width = 67 |
278 |
|
Caption = 'in Field List' |
279 |
|
ParentColor = False |
280 |
|
end |
281 |
|
end |
282 |
|
object DeletePage: TTabSheet |
283 |
|
Caption = 'Delete' |
284 |
< |
ClientHeight = 300 |
285 |
< |
ClientWidth = 243 |
284 |
> |
ClientHeight = 331 |
285 |
> |
ClientWidth = 184 |
286 |
|
OnShow = DeletePageShow |
287 |
|
object Label14: TLabel |
288 |
|
Left = 7 |
289 |
< |
Height = 18 |
289 |
> |
Height = 15 |
290 |
|
Top = 3 |
291 |
< |
Width = 78 |
291 |
> |
Width = 69 |
292 |
|
Caption = 'Table Name' |
293 |
|
ParentColor = False |
294 |
|
end |
295 |
|
object Label15: TLabel |
296 |
|
Left = 7 |
297 |
< |
Height = 18 |
297 |
> |
Height = 15 |
298 |
|
Top = 66 |
299 |
< |
Width = 87 |
299 |
> |
Width = 77 |
300 |
|
Caption = 'Primary Keys' |
301 |
|
ParentColor = False |
302 |
|
end |
303 |
|
object DeleteTableNames: TComboBox |
304 |
|
Left = 7 |
305 |
< |
Height = 29 |
305 |
> |
Height = 27 |
306 |
|
Top = 19 |
307 |
|
Width = 169 |
308 |
+ |
Anchors = [akTop, akLeft, akRight] |
309 |
+ |
AutoComplete = True |
310 |
+ |
AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending] |
311 |
|
ItemHeight = 0 |
312 |
|
OnCloseUp = DeleteTableNamesCloseUp |
313 |
|
TabOrder = 0 |
316 |
|
Left = 7 |
317 |
|
Height = 55 |
318 |
|
Top = 82 |
319 |
< |
Width = 159 |
319 |
> |
Width = 167 |
320 |
> |
Anchors = [akTop, akLeft, akRight] |
321 |
|
ItemHeight = 0 |
322 |
|
OnDblClick = SelectFieldsListDblClick |
323 |
< |
ScrollWidth = 157 |
323 |
> |
ScrollWidth = 165 |
324 |
|
TabOrder = 1 |
325 |
|
TopIndex = -1 |
326 |
|
end |
327 |
|
end |
328 |
|
object ExecutePage: TTabSheet |
329 |
|
Caption = 'Execute' |
330 |
< |
ClientHeight = 300 |
331 |
< |
ClientWidth = 243 |
330 |
> |
ClientHeight = 331 |
331 |
> |
ClientWidth = 184 |
332 |
|
OnShow = ExecutePageShow |
333 |
|
object Label16: TLabel |
334 |
|
Left = 7 |
359 |
|
Height = 27 |
360 |
|
Top = 19 |
361 |
|
Width = 169 |
362 |
+ |
Anchors = [akTop, akLeft, akRight] |
363 |
|
ItemHeight = 0 |
364 |
|
OnCloseUp = ProcedureNamesCloseUp |
365 |
|
TabOrder = 0 |
369 |
|
Height = 80 |
370 |
|
Top = 82 |
371 |
|
Width = 164 |
372 |
+ |
Anchors = [akTop, akLeft, akRight] |
373 |
|
IntegralHeight = True |
374 |
|
ItemHeight = 0 |
375 |
|
ScrollWidth = 162 |
378 |
|
end |
379 |
|
object ProcOutputList: TListBox |
380 |
|
Left = 10 |
381 |
< |
Height = 66 |
381 |
> |
Height = 97 |
382 |
|
Top = 201 |
383 |
|
Width = 160 |
384 |
< |
Anchors = [akTop, akLeft, akBottom] |
384 |
> |
Anchors = [akTop, akLeft, akRight] |
385 |
|
IntegralHeight = True |
386 |
|
ItemHeight = 0 |
387 |
|
ScrollWidth = 158 |
391 |
|
object SelectProcedure: TLabel |
392 |
|
Left = 7 |
393 |
|
Height = 14 |
394 |
< |
Top = 279 |
394 |
> |
Top = 310 |
395 |
|
Width = 126 |
396 |
|
Anchors = [akLeft, akBottom] |
397 |
|
Caption = 'Is ''Select Procedure''' |
415 |
|
end |
416 |
|
object GenerateParams: TCheckBox |
417 |
|
Left = 16 |
418 |
< |
Height = 24 |
418 |
> |
Height = 22 |
419 |
|
Top = 368 |
420 |
< |
Width = 173 |
420 |
> |
Width = 171 |
421 |
|
Caption = 'Allow DSQL Placeholders' |
422 |
|
TabOrder = 7 |
423 |
|
end |