journaling/design/ibselectsqleditor.lfm

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