trunk/design/ibselectsqleditor.lfm

object IBSelectSQLEditorForm: TIBSelectSQLEditorForm
  Left = 678
  Height = 487
  Top = 264
  Width = 747
  ActiveControl = PageControl
  Caption = 'Select SQL Editor'
  ClientHeight = 487
  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 = 429
    Width = 72
    Anchors = [akRight, akBottom]
    Caption = 'OK'
    Default = True
    ModalResult = 1
    TabOrder = 0
  end
  object Button2: TButton
    Left = 638
    Height = 30
    Top = 429
    Width = 72
    Anchors = [akRight, akBottom]
    Cancel = True
    Caption = 'Cancel'
    ModalResult = 2
    TabOrder = 1
  end
  object GenerateBtn: TButton
    Left = 278
    Height = 30
    Top = 429
    Width = 101
    Anchors = [akRight, akBottom]
    Caption = 'Generate SQL'
    OnClick = GenerateBtnClick
    TabOrder = 2
  end
  object TestBtn: TButton
    Left = 414
    Height = 30
    Top = 429
    Width = 66
    Anchors = [akRight, akBottom]
    Caption = 'Test'
    OnClick = TestBtnClick
    TabOrder = 3
  end
  object QuoteFields: TCheckBox
    Left = 24
    Height = 22
    Top = 440
    Width = 125
    Caption = '&Quote Identifiers'
    TabOrder = 4
  end
  object PageControl: TPageControl
    Left = 24
    Height = 405
    Top = 8
    Width = 232
    ActivePage = ExecutePage
    TabIndex = 1
    TabOrder = 5
    object SelectPage: TTabSheet
      Caption = 'Tables'
      ClientHeight = 373
      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 = 160
        Width = 33
        Caption = 'Fields'
        ParentColor = False
      end
      object Label4: TLabel
        Left = 8
        Height = 14
        Top = 80
        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 = 168
        Top = 174
        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 = 8
        Height = 56
        Top = 96
        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 = 342
        Width = 134
        Caption = 'Select/Deselect All'
        OnChange = SelectSelectAllChange
        TabOrder = 3
      end
      object IncludeSysTables: TCheckBox
        Left = 7
        Height = 22
        Top = 48
        Width = 158
        Caption = 'Include System Tables'
        OnChange = IncludeSysTablesChange
        TabOrder = 4
      end
    end
    object ExecutePage: TTabSheet
      Caption = 'Procedures'
      ClientHeight = 373
      ClientWidth = 226
      OnShow = ExecutePageShow
      object Label16: TLabel
        Left = 9
        Height = 14
        Top = 56
        Width = 100
        Caption = 'Procedure Name'
        ParentColor = False
      end
      object Label17: TLabel
        Left = 9
        Height = 14
        Top = 111
        Width = 104
        Caption = 'Input Parameters'
        ParentColor = False
      end
      object Label18: TLabel
        Left = 10
        Height = 14
        Top = 229
        Width = 114
        Caption = 'Output Parameters'
        ParentColor = False
      end
      object ProcedureNames: TIBLookupComboEditBox
        Left = 9
        Height = 27
        Top = 70
        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 = 9
        Height = 96
        Top = 125
        Width = 201
        Color = clWindow
        Columns = <        
          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 = 9
        Height = 104
        Top = 245
        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
      object PackageNameLabel: TLabel
        Left = 10
        Height = 14
        Top = 8
        Width = 88
        Caption = 'Package Name'
        ParentColor = False
      end
      object PackageNames: TIBLookupComboEditBox
        Left = 9
        Height = 27
        Top = 22
        Width = 200
        AutoComplete = False
        KeyField = 'RDB$PACKAGE_NAME'
        ListField = 'RDB$PACKAGE_NAME'
        ListFieldIndex = 0
        LookupCache = False
        OnDblClick = PackageNamesDblClick
        ScrollListDataset = True
        TabOrder = 3
        AutoInsert = False
        AutoCompleteText = [cbactEndOfLineComplete, cbactSearchAscending]
        ItemHeight = 0
      end
    end
  end
  object GenerateParams: TCheckBox
    Left = 24
    Height = 22
    Top = 416
    Width = 171
    Caption = 'Allow DSQL Placeholders'
    TabOrder = 6
  end
  inline IBSQLEditFrame1: TIBSQLEditFrame
    Left = 282
    Height = 389
    Top = 24
    Width = 448
    Anchors = [akTop, akLeft, akRight, akBottom]
    ClientHeight = 389
    ClientWidth = 448
    TabOrder = 7
    DesignLeft = 1974
    DesignTop = 200
    inherited SQLText: TSynEdit
      Height = 363
      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 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
    inherited IdentityCols: TIBQuery
      ParamData = <      
        item
          DataType = ftUnknown
          Name = 'RDB$RELATION_NAME'
          ParamType = ptInput
        end>
    end
    inherited ReadOnlyFields: TIBQuery
      ParamData = <      
        item
          DataType = ftUnknown
          Name = 'RDB$RELATION_NAME'
          ParamType = ptInput
        end>
    end
    inherited PackageNames: TIBQuery
      BeforeClose = nil
    end
  end
end
Revision:	107
Committed:	Thu Jan 18 14:37:40 2018 UTC (6 years, 11 months ago) by tony
File size:	12311 byte(s)
Log Message:	Fixes merged
#	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	7	Width = 747
6			ActiveControl = PageControl
7	tony	5	Caption = 'Select SQL Editor'
8	tony	105	ClientHeight = 487
9	tony	7	ClientWidth = 747
10	tony	5	OnShow = FormShow
11	tony	67	Position = poScreenCenter
12	tony	80	LCLVersion = '1.8.1.0'
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	7	Left = 550
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	7	Left = 638
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			Left = 278
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			Left = 414
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	107	ActivePage = ExecutePage
77			TabIndex = 1
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			TabOrder = 0
120			AutoInsert = False
121	tony	21	AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
122	tony	37	ItemHeight = 0
123	tony	7	end
124	tony	80	object FieldNamesGrid: TIBDynamicGrid
125	tony	7	Left = 7
126	tony	105	Height = 168
127	tony	106	Top = 174
128	tony	80	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	tony	7	TabOrder = 1
157	tony	80	OnDblClick = FieldNamesGridDblClick
158			ExpandEditorPanelBelowRow = False
159			Descending = False
160			EditorBorderStyle = bsSingle
161			DefaultPositionAtEnd = False
162	tony	7	end
163	tony	80	object PrimaryKeysGrid: TIBDynamicGrid
164	tony	106	Left = 8
165	tony	80	Height = 56
166	tony	106	Top = 96
167	tony	80	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	tony	7	TabOrder = 2
195	tony	80	OnDblClick = PrimaryKeysGridDblClick
196			ExpandEditorPanelBelowRow = False
197			Descending = False
198			EditorBorderStyle = bsSingle
199			DefaultPositionAtEnd = False
200	tony	7	end
201	tony	80	object SelectSelectAll: TCheckBox
202			Left = 7
203			Height = 22
204	tony	106	Top = 342
205	tony	80	Width = 134
206			Caption = 'Select/Deselect All'
207			OnChange = SelectSelectAllChange
208			TabOrder = 3
209			end
210			object IncludeSysTables: TCheckBox
211	tony	106	Left = 7
212	tony	80	Height = 22
213			Top = 48
214			Width = 158
215			Caption = 'Include System Tables'
216			OnChange = IncludeSysTablesChange
217			TabOrder = 4
218			end
219	tony	7	end
220			object ExecutePage: TTabSheet
221			Caption = 'Procedures'
222	tony	105	ClientHeight = 373
223	tony	37	ClientWidth = 226
224	tony	7	OnShow = ExecutePageShow
225			object Label16: TLabel
226	tony	107	Left = 9
227	tony	80	Height = 14
228	tony	107	Top = 56
229	tony	37	Width = 100
230	tony	7	Caption = 'Procedure Name'
231			ParentColor = False
232			end
233			object Label17: TLabel
234	tony	107	Left = 9
235	tony	80	Height = 14
236	tony	107	Top = 111
237	tony	37	Width = 104
238	tony	7	Caption = 'Input Parameters'
239			ParentColor = False
240			end
241			object Label18: TLabel
242	tony	107	Left = 10
243	tony	80	Height = 14
244	tony	107	Top = 229
245	tony	37	Width = 114
246	tony	7	Caption = 'Output Parameters'
247			ParentColor = False
248			end
249	tony	80	object ProcedureNames: TIBLookupComboEditBox
250	tony	107	Left = 9
251	tony	37	Height = 27
252	tony	107	Top = 70
253	tony	7	Width = 201
254	tony	80	KeyField = 'RDB$PROCEDURE_NAME'
255			ListField = 'RDB$PROCEDURE_NAME'
256			ListFieldIndex = 0
257			LookupCache = False
258			OnDblClick = ProcedureNamesDblClick
259			ScrollListDataset = True
260			TabOrder = 0
261			AutoInsert = False
262			AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
263	tony	37	ItemHeight = 0
264	tony	7	end
265	tony	80	object InputProcGrid: TIBDynamicGrid
266	tony	107	Left = 9
267	tony	80	Height = 96
268	tony	107	Top = 125
269	tony	80	Width = 201
270			Color = clWindow
271			Columns = <
272			item
273			Title.Caption = 'COLUMNNAME'
274			Width = 64
275			FieldName = 'COLUMNNAME'
276			AutoSizeColumn = True
277			InitialSortColumn = False
278			DBLookupProperties.ItemHeight = 0
279			DBLookupProperties.ItemWidth = 0
280			DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
281			end>
282			FixedCols = 0
283			Options = [dgEditing, dgColumnResize, dgColumnMove, dgRowLines, dgConfirmDelete, dgCancelOnExit, dgDisableDelete, dgDisableInsert]
284			Scrollbars = ssAutoVertical
285	tony	7	TabOrder = 1
286	tony	80	OnDblClick = InputProcGridDblClick
287			ExpandEditorPanelBelowRow = False
288			Descending = False
289			EditorBorderStyle = bsSingle
290			DefaultPositionAtEnd = False
291	tony	7	end
292	tony	80	object OutputProcGrid: TIBDynamicGrid
293	tony	107	Left = 9
294	tony	80	Height = 104
295	tony	107	Top = 245
296	tony	80	Width = 201
297			Color = clWindow
298			Columns = <
299			item
300			ButtonStyle = cbsCheckboxColumn
301			Title.Caption = 'SELECTED'
302			Width = 30
303			FieldName = 'SELECTED'
304			AutoSizeColumn = False
305			InitialSortColumn = False
306			DBLookupProperties.ItemHeight = 0
307			DBLookupProperties.ItemWidth = 0
308			DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
309			end
310			item
311			Title.Caption = 'COLUMNNAME'
312			Width = 64
313			FieldName = 'COLUMNNAME'
314			AutoSizeColumn = True
315			InitialSortColumn = False
316			DBLookupProperties.ItemHeight = 0
317			DBLookupProperties.ItemWidth = 0
318			DBLookupProperties.AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactSearchAscending]
319			end>
320			FixedCols = 0
321			Options = [dgEditing, dgColumnResize, dgColumnMove, dgRowLines, dgConfirmDelete, dgCancelOnExit, dgDisableDelete, dgDisableInsert]
322			Scrollbars = ssAutoVertical
323	tony	7	TabOrder = 2
324	tony	80	OnDblClick = OutputProcGridDblClick
325			ExpandEditorPanelBelowRow = False
326			Descending = False
327			EditorBorderStyle = bsSingle
328			DefaultPositionAtEnd = False
329	tony	7	end
330	tony	107	object PackageNameLabel: TLabel
331			Left = 10
332			Height = 14
333			Top = 8
334			Width = 88
335			Caption = 'Package Name'
336			ParentColor = False
337			end
338			object PackageNames: TIBLookupComboEditBox
339			Left = 9
340			Height = 27
341			Top = 22
342			Width = 200
343			AutoComplete = False
344			KeyField = 'RDB$PACKAGE_NAME'
345			ListField = 'RDB$PACKAGE_NAME'
346			ListFieldIndex = 0
347			LookupCache = False
348			OnDblClick = PackageNamesDblClick
349			ScrollListDataset = True
350			TabOrder = 3
351			AutoInsert = False
352			AutoCompleteText = [cbactEndOfLineComplete, cbactSearchAscending]
353			ItemHeight = 0
354			end
355	tony	7	end
356	tony	5	end
357	tony	19	object GenerateParams: TCheckBox
358			Left = 24
359	tony	37	Height = 22
360	tony	105	Top = 416
361	tony	37	Width = 171
362	tony	19	Caption = 'Allow DSQL Placeholders'
363	tony	80	TabOrder = 6
364			end
365			inline IBSQLEditFrame1: TIBSQLEditFrame
366			Left = 282
367	tony	105	Height = 389
368	tony	80	Top = 24
369			Width = 448
370			Anchors = [akTop, akLeft, akRight, akBottom]
371	tony	105	ClientHeight = 389
372	tony	80	ClientWidth = 448
373	tony	19	TabOrder = 7
374	tony	80	DesignLeft = 1974
375			DesignTop = 200
376			inherited SQLText: TSynEdit
377	tony	105	Height = 363
378	tony	80	Width = 448
379			end
380			inherited ToolBar1: TToolBar
381			Width = 448
382			end
383			inherited FieldNameList: TIBQuery
384			ParamData = <
385			item
386			DataType = ftUnknown
387			Name = 'RDB$RELATION_NAME'
388			ParamType = ptInput
389			end>
390			end
391			inherited PrimaryKeys: TIBQuery
392			ParamData = <
393			item
394			DataType = ftUnknown
395			Name = 'RDB$RELATION_NAME'
396			ParamType = ptInput
397			end>
398			end
399			inherited ProcInputParams: TIBQuery
400			ParamData = <
401			item
402			DataType = ftUnknown
403			Name = 'RDB$PROCEDURE_NAME'
404			ParamType = ptInput
405			end>
406			end
407			inherited ProcOutputParams: TIBQuery
408			ParamData = <
409			item
410			DataType = ftUnknown
411			Name = 'RDB$PROCEDURE_NAME'
412			ParamType = ptInput
413			end>
414			end
415			inherited SQLTransaction: TIBTransaction
416			Params.Strings = ( )
417			end
418	tony	105	inherited IdentityCols: TIBQuery
419			ParamData = <
420			item
421			DataType = ftUnknown
422			Name = 'RDB$RELATION_NAME'
423			ParamType = ptInput
424			end>
425			end
426	tony	106	inherited ReadOnlyFields: TIBQuery
427			ParamData = <
428			item
429			DataType = ftUnknown
430			Name = 'RDB$RELATION_NAME'
431			ParamType = ptInput
432			end>
433			end
434	tony	107	inherited PackageNames: TIBQuery
435			BeforeClose = nil
436			end
437	tony	19	end
438	tony	5	end