ViewVC Help
View File | Revision Log | Show Annotations | Download File | View Changeset | Root Listing
root/public/ibx/trunk/design/ibselectsqleditor.lfm
Revision: 263
Committed: Thu Dec 6 15:55:01 2018 UTC (6 years ago) by tony
File size: 12630 byte(s)
Log Message:
Release 2.3.2 committed

File Contents

# User Rev Content
1 tony 5 object IBSelectSQLEditorForm: TIBSelectSQLEditorForm
2 tony 106 Left = 678
3 tony 105 Height = 487
4 tony 106 Top = 264
5 tony 263 Width = 795
6 tony 7 ActiveControl = PageControl
7 tony 5 Caption = 'Select SQL Editor'
8 tony 105 ClientHeight = 487
9 tony 263 ClientWidth = 795
10 tony 5 OnShow = FormShow
11 tony 67 Position = poScreenCenter
12 tony 263 LCLVersion = '2.0.0.2'
13 tony 5 object Label3: TLabel
14 tony 80 Left = 278
15 tony 67 Height = 14
16 tony 80 Top = 8
17 tony 37 Width = 24
18 tony 5 Caption = 'SQL'
19     ParentColor = False
20     end
21     object Button1: TButton
22 tony 263 Left = 598
23 tony 5 Height = 30
24 tony 105 Top = 429
25 tony 5 Width = 72
26 tony 7 Anchors = [akRight, akBottom]
27 tony 5 Caption = 'OK'
28     Default = True
29     ModalResult = 1
30 tony 80 TabOrder = 0
31 tony 5 end
32     object Button2: TButton
33 tony 263 Left = 686
34 tony 5 Height = 30
35 tony 105 Top = 429
36 tony 5 Width = 72
37 tony 7 Anchors = [akRight, akBottom]
38 tony 5 Cancel = True
39     Caption = 'Cancel'
40     ModalResult = 2
41 tony 80 TabOrder = 1
42 tony 5 end
43 tony 7 object GenerateBtn: TButton
44 tony 263 Left = 326
45 tony 5 Height = 30
46 tony 105 Top = 429
47 tony 7 Width = 101
48     Anchors = [akRight, akBottom]
49     Caption = 'Generate SQL'
50     OnClick = GenerateBtnClick
51 tony 80 TabOrder = 2
52 tony 5 end
53 tony 7 object TestBtn: TButton
54 tony 263 Left = 462
55 tony 5 Height = 30
56 tony 105 Top = 429
57 tony 5 Width = 66
58 tony 7 Anchors = [akRight, akBottom]
59 tony 5 Caption = 'Test'
60 tony 7 OnClick = TestBtnClick
61 tony 80 TabOrder = 3
62 tony 5 end
63     object QuoteFields: TCheckBox
64 tony 19 Left = 24
65 tony 37 Height = 22
66 tony 105 Top = 440
67 tony 37 Width = 125
68 tony 5 Caption = '&Quote Identifiers'
69 tony 80 TabOrder = 4
70 tony 5 end
71 tony 7 object PageControl: TPageControl
72     Left = 24
73 tony 105 Height = 405
74 tony 80 Top = 8
75 tony 7 Width = 232
76 tony 141 ActivePage = SelectPage
77     TabIndex = 0
78 tony 80 TabOrder = 5
79 tony 7 object SelectPage: TTabSheet
80     Caption = 'Tables'
81 tony 105 ClientHeight = 373
82 tony 21 ClientWidth = 226
83 tony 7 OnShow = SelectPageShow
84     object Label1: TLabel
85     Left = 7
86 tony 67 Height = 14
87 tony 7 Top = 4
88 tony 19 Width = 69
89 tony 7 Caption = 'Table Name'
90     ParentColor = False
91     end
92     object Label2: TLabel
93 tony 80 Left = 8
94 tony 67 Height = 14
95 tony 106 Top = 160
96 tony 19 Width = 33
97 tony 7 Caption = 'Fields'
98     ParentColor = False
99     end
100     object Label4: TLabel
101 tony 106 Left = 8
102 tony 67 Height = 14
103 tony 106 Top = 80
104 tony 19 Width = 77
105 tony 7 Caption = 'Primary Keys'
106     ParentColor = False
107     end
108 tony 80 object SelectTableNames: TIBLookupComboEditBox
109     Left = 7
110 tony 37 Height = 27
111 tony 80 Top = 21
112     Width = 209
113     KeyField = 'RDB$RELATION_ID'
114     ListField = 'RDB$RELATION_NAME'
115     ListFieldIndex = 0
116     LookupCache = False
117     OnDblClick = SelectTableNamesDblClick
118     ScrollListDataset = True
119 tony 141 Sorted = True
120 tony 80 TabOrder = 0
121     AutoInsert = False
122 tony 21 AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
123 tony 37 ItemHeight = 0
124 tony 7 end
125 tony 80 object FieldNamesGrid: TIBDynamicGrid
126 tony 7 Left = 7
127 tony 105 Height = 168
128 tony 106 Top = 174
129 tony 80 Width = 209
130     Color = clWindow
131     Columns = <
132     item
133     ButtonStyle = cbsCheckboxColumn
134     Title.Caption = 'SELECTED'
135     Width = 30
136     FieldName = 'SELECTED'
137     AutoSizeColumn = False
138     InitialSortColumn = False
139     DBLookupProperties.ItemHeight = 0
140     DBLookupProperties.ItemWidth = 0
141     DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
142     end
143     item
144 tony 143 ReadOnly = True
145 tony 80 Title.Caption = 'COLUMNNAME'
146     Width = 64
147     FieldName = 'COLUMNNAME'
148     AutoSizeColumn = True
149     InitialSortColumn = False
150     DBLookupProperties.ItemHeight = 0
151     DBLookupProperties.ItemWidth = 0
152     DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
153     end>
154     DataSource = IBSQLEditFrame.FieldsSource
155     FixedCols = 0
156     Options = [dgEditing, dgColumnResize, dgColumnMove, dgRowLines, dgConfirmDelete, dgCancelOnExit, dgDisableDelete, dgDisableInsert]
157     Scrollbars = ssAutoVertical
158 tony 7 TabOrder = 1
159 tony 80 OnDblClick = FieldNamesGridDblClick
160     ExpandEditorPanelBelowRow = False
161     Descending = False
162     EditorBorderStyle = bsSingle
163     DefaultPositionAtEnd = False
164 tony 7 end
165 tony 80 object PrimaryKeysGrid: TIBDynamicGrid
166 tony 106 Left = 8
167 tony 80 Height = 56
168 tony 106 Top = 96
169 tony 80 Width = 209
170     Color = clWindow
171     Columns = <
172     item
173     ButtonStyle = cbsCheckboxColumn
174     Title.Caption = 'SELECTED'
175     Width = 30
176     FieldName = 'SELECTED'
177     AutoSizeColumn = False
178     InitialSortColumn = False
179     DBLookupProperties.ItemHeight = 0
180     DBLookupProperties.ItemWidth = 0
181     DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
182     end
183     item
184 tony 143 ReadOnly = True
185 tony 80 Title.Caption = 'COLUMNNAME'
186     Width = 64
187     FieldName = 'COLUMNNAME'
188     AutoSizeColumn = True
189     InitialSortColumn = False
190     DBLookupProperties.ItemHeight = 0
191     DBLookupProperties.ItemWidth = 0
192     DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
193     end>
194     FixedCols = 0
195     Options = [dgEditing, dgColumnResize, dgColumnMove, dgRowLines, dgConfirmDelete, dgCancelOnExit, dgDisableDelete, dgDisableInsert]
196     Scrollbars = ssAutoVertical
197 tony 7 TabOrder = 2
198 tony 80 OnDblClick = PrimaryKeysGridDblClick
199     ExpandEditorPanelBelowRow = False
200     Descending = False
201     EditorBorderStyle = bsSingle
202     DefaultPositionAtEnd = False
203 tony 7 end
204 tony 80 object SelectSelectAll: TCheckBox
205     Left = 7
206     Height = 22
207 tony 106 Top = 342
208 tony 80 Width = 134
209     Caption = 'Select/Deselect All'
210     OnChange = SelectSelectAllChange
211     TabOrder = 3
212     end
213     object IncludeSysTables: TCheckBox
214 tony 106 Left = 7
215 tony 80 Height = 22
216     Top = 48
217     Width = 158
218     Caption = 'Include System Tables'
219     OnChange = IncludeSysTablesChange
220     TabOrder = 4
221     end
222 tony 7 end
223     object ExecutePage: TTabSheet
224     Caption = 'Procedures'
225 tony 105 ClientHeight = 373
226 tony 37 ClientWidth = 226
227 tony 7 OnShow = ExecutePageShow
228     object Label16: TLabel
229 tony 107 Left = 9
230 tony 80 Height = 14
231 tony 107 Top = 56
232 tony 37 Width = 100
233 tony 7 Caption = 'Procedure Name'
234     ParentColor = False
235     end
236     object Label17: TLabel
237 tony 107 Left = 9
238 tony 80 Height = 14
239 tony 107 Top = 111
240 tony 37 Width = 104
241 tony 7 Caption = 'Input Parameters'
242     ParentColor = False
243     end
244     object Label18: TLabel
245 tony 107 Left = 10
246 tony 80 Height = 14
247 tony 107 Top = 229
248 tony 37 Width = 114
249 tony 7 Caption = 'Output Parameters'
250     ParentColor = False
251     end
252 tony 80 object ProcedureNames: TIBLookupComboEditBox
253 tony 107 Left = 9
254 tony 37 Height = 27
255 tony 107 Top = 70
256 tony 7 Width = 201
257 tony 80 KeyField = 'RDB$PROCEDURE_NAME'
258     ListField = 'RDB$PROCEDURE_NAME'
259     ListFieldIndex = 0
260     LookupCache = False
261     OnDblClick = ProcedureNamesDblClick
262     ScrollListDataset = True
263 tony 141 Sorted = True
264 tony 80 TabOrder = 0
265     AutoInsert = False
266     AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
267 tony 37 ItemHeight = 0
268 tony 7 end
269 tony 80 object InputProcGrid: TIBDynamicGrid
270 tony 107 Left = 9
271 tony 80 Height = 96
272 tony 107 Top = 125
273 tony 80 Width = 201
274     Color = clWindow
275     Columns = <
276     item
277 tony 143 ReadOnly = True
278 tony 80 Title.Caption = 'COLUMNNAME'
279     Width = 64
280     FieldName = 'COLUMNNAME'
281     AutoSizeColumn = True
282     InitialSortColumn = False
283     DBLookupProperties.ItemHeight = 0
284     DBLookupProperties.ItemWidth = 0
285     DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
286     end>
287     FixedCols = 0
288     Options = [dgEditing, dgColumnResize, dgColumnMove, dgRowLines, dgConfirmDelete, dgCancelOnExit, dgDisableDelete, dgDisableInsert]
289     Scrollbars = ssAutoVertical
290 tony 7 TabOrder = 1
291 tony 80 OnDblClick = InputProcGridDblClick
292     ExpandEditorPanelBelowRow = False
293     Descending = False
294     EditorBorderStyle = bsSingle
295     DefaultPositionAtEnd = False
296 tony 7 end
297 tony 80 object OutputProcGrid: TIBDynamicGrid
298 tony 107 Left = 9
299 tony 80 Height = 104
300 tony 107 Top = 245
301 tony 80 Width = 201
302     Color = clWindow
303     Columns = <
304     item
305     ButtonStyle = cbsCheckboxColumn
306     Title.Caption = 'SELECTED'
307     Width = 30
308     FieldName = 'SELECTED'
309     AutoSizeColumn = False
310     InitialSortColumn = False
311     DBLookupProperties.ItemHeight = 0
312     DBLookupProperties.ItemWidth = 0
313     DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
314     end
315     item
316 tony 143 ReadOnly = True
317 tony 80 Title.Caption = 'COLUMNNAME'
318     Width = 64
319     FieldName = 'COLUMNNAME'
320     AutoSizeColumn = True
321     InitialSortColumn = False
322     DBLookupProperties.ItemHeight = 0
323     DBLookupProperties.ItemWidth = 0
324     DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
325     end>
326     FixedCols = 0
327     Options = [dgEditing, dgColumnResize, dgColumnMove, dgRowLines, dgConfirmDelete, dgCancelOnExit, dgDisableDelete, dgDisableInsert]
328     Scrollbars = ssAutoVertical
329 tony 7 TabOrder = 2
330 tony 80 OnDblClick = OutputProcGridDblClick
331     ExpandEditorPanelBelowRow = False
332     Descending = False
333     EditorBorderStyle = bsSingle
334     DefaultPositionAtEnd = False
335 tony 7 end
336 tony 107 object PackageNameLabel: TLabel
337     Left = 10
338     Height = 14
339     Top = 8
340     Width = 88
341     Caption = 'Package Name'
342     ParentColor = False
343     end
344     object PackageNames: TIBLookupComboEditBox
345     Left = 9
346     Height = 27
347     Top = 22
348     Width = 200
349     AutoComplete = False
350     KeyField = 'RDB$PACKAGE_NAME'
351     ListField = 'RDB$PACKAGE_NAME'
352     ListFieldIndex = 0
353     LookupCache = False
354     OnDblClick = PackageNamesDblClick
355     ScrollListDataset = True
356 tony 141 Sorted = True
357 tony 107 TabOrder = 3
358     AutoInsert = False
359     AutoCompleteText = [cbactEndOfLineComplete, cbactSearchAscending]
360     ItemHeight = 0
361     end
362 tony 7 end
363 tony 5 end
364 tony 19 object GenerateParams: TCheckBox
365     Left = 24
366 tony 37 Height = 22
367 tony 105 Top = 416
368 tony 37 Width = 171
369 tony 19 Caption = 'Allow DSQL Placeholders'
370 tony 80 TabOrder = 6
371     end
372     inline IBSQLEditFrame1: TIBSQLEditFrame
373     Left = 282
374 tony 105 Height = 389
375 tony 80 Top = 24
376 tony 263 Width = 496
377 tony 80 Anchors = [akTop, akLeft, akRight, akBottom]
378 tony 105 ClientHeight = 389
379 tony 263 ClientWidth = 496
380 tony 19 TabOrder = 7
381 tony 80 DesignLeft = 1974
382     DesignTop = 200
383     inherited SQLText: TSynEdit
384 tony 105 Height = 363
385 tony 263 Width = 496
386 tony 80 end
387     inherited ToolBar1: TToolBar
388 tony 263 Width = 496
389     inherited ToolButton3: TToolButton
390     Height = 22
391     end
392     inherited ToolButton7: TToolButton
393     Height = 22
394     end
395 tony 80 end
396     inherited FieldNameList: TIBQuery
397     ParamData = <
398     item
399     DataType = ftUnknown
400     Name = 'RDB$RELATION_NAME'
401     ParamType = ptInput
402     end>
403     end
404     inherited PrimaryKeys: TIBQuery
405     ParamData = <
406     item
407     DataType = ftUnknown
408     Name = 'RDB$RELATION_NAME'
409     ParamType = ptInput
410     end>
411     end
412     inherited ProcInputParams: TIBQuery
413     ParamData = <
414     item
415     DataType = ftUnknown
416     Name = 'RDB$PROCEDURE_NAME'
417     ParamType = ptInput
418     end>
419     end
420     inherited ProcOutputParams: TIBQuery
421     ParamData = <
422     item
423     DataType = ftUnknown
424     Name = 'RDB$PROCEDURE_NAME'
425     ParamType = ptInput
426     end>
427     end
428     inherited SQLTransaction: TIBTransaction
429     Params.Strings = ( )
430     end
431 tony 105 inherited IdentityCols: TIBQuery
432     ParamData = <
433     item
434     DataType = ftUnknown
435     Name = 'RDB$RELATION_NAME'
436     ParamType = ptInput
437     end>
438     end
439 tony 106 inherited ReadOnlyFields: TIBQuery
440     ParamData = <
441     item
442     DataType = ftUnknown
443     Name = 'RDB$RELATION_NAME'
444     ParamType = ptInput
445     end>
446     end
447 tony 107 inherited PackageNames: TIBQuery
448     BeforeClose = nil
449     end
450 tony 19 end
451 tony 5 end