journaling/design/ibselectsqleditor.lfm

object IBSelectSQLEditorForm: TIBSelectSQLEditorForm
  Left = 784
  Height = 487
  Top = 248
  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 = SelectPage
    TabIndex = 0
    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 = 74
        Width = 33
        Caption = 'Fields'
        ParentColor = False
      end
      object Label4: TLabel
        Left = 7
        Height = 14
        Top = 288
        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 = 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 = 304
        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 = 256
        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 = 373
      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 = 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 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
    inherited IdentityCols: TIBQuery
      ParamData = <      
        item
          DataType = ftUnknown
          Name = 'RDB$RELATION_NAME'
          ParamType = ptInput
        end>
    end
  end
end
Revision:	105
Committed:	Thu Jan 18 14:37:32 2018 UTC (6 years, 11 months ago) by tony
Original Path:	*ibx/trunk/design/ibselectsqleditor.lfm*
File size:	12228 byte(s)
Log Message:	Property Editor Fixes
#	User	Rev	Content
1	tony	5	object IBSelectSQLEditorForm: TIBSelectSQLEditorForm
2	tony	105	Left = 784
3			Height = 487
4			Top = 248
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	105	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	80	Top = 74
96	tony	19	Width = 33
97	tony	7	Caption = 'Fields'
98			ParentColor = False
99			end
100			object Label4: TLabel
101			Left = 7
102	tony	67	Height = 14
103	tony	105	Top = 288
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	80	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	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	7	Left = 7
165	tony	80	Height = 56
166	tony	105	Top = 304
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	105	Top = 256
205	tony	80	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	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			Left = 7
227	tony	80	Height = 14
228	tony	7	Top = 3
229	tony	37	Width = 100
230	tony	7	Caption = 'Procedure Name'
231			ParentColor = False
232			end
233			object Label17: TLabel
234			Left = 7
235	tony	80	Height = 14
236			Top = 58
237	tony	37	Width = 104
238	tony	7	Caption = 'Input Parameters'
239			ParentColor = False
240			end
241			object Label18: TLabel
242			Left = 8
243	tony	80	Height = 14
244			Top = 176
245	tony	37	Width = 114
246	tony	7	Caption = 'Output Parameters'
247			ParentColor = False
248			end
249	tony	80	object SelectProcedure: TLabel
250	tony	7	Left = 7
251	tony	80	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	tony	37	Height = 27
265	tony	80	Top = 17
266	tony	7	Width = 201
267	tony	80	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	tony	37	ItemHeight = 0
277	tony	7	end
278	tony	80	object InputProcGrid: TIBDynamicGrid
279	tony	7	Left = 7
280	tony	80	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	tony	7	TabOrder = 1
310	tony	80	OnDblClick = InputProcGridDblClick
311			ExpandEditorPanelBelowRow = False
312			Descending = False
313			EditorBorderStyle = bsSingle
314			DefaultPositionAtEnd = False
315	tony	7	end
316	tony	80	object OutputProcGrid: TIBDynamicGrid
317	tony	7	Left = 7
318	tony	80	Height = 104
319	tony	7	Top = 192
320	tony	80	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	tony	7	TabOrder = 2
348	tony	80	OnDblClick = OutputProcGridDblClick
349			ExpandEditorPanelBelowRow = False
350			Descending = False
351			EditorBorderStyle = bsSingle
352			DefaultPositionAtEnd = False
353	tony	7	end
354			end
355	tony	5	end
356	tony	19	object GenerateParams: TCheckBox
357			Left = 24
358	tony	37	Height = 22
359	tony	105	Top = 416
360	tony	37	Width = 171
361	tony	19	Caption = 'Allow DSQL Placeholders'
362	tony	80	TabOrder = 6
363			end
364			inline IBSQLEditFrame1: TIBSQLEditFrame
365			Left = 282
366	tony	105	Height = 389
367	tony	80	Top = 24
368			Width = 448
369			Anchors = [akTop, akLeft, akRight, akBottom]
370	tony	105	ClientHeight = 389
371	tony	80	ClientWidth = 448
372	tony	19	TabOrder = 7
373	tony	80	DesignLeft = 1974
374			DesignTop = 200
375			inherited SQLText: TSynEdit
376	tony	105	Height = 363
377	tony	80	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	tony	105	inherited IdentityCols: TIBQuery
421			ParamData = <
422			item
423			DataType = ftUnknown
424			Name = 'RDB$RELATION_NAME'
425			ParamType = ptInput
426			end>
427			end
428	tony	19	end
429	tony	5	end