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 = ExecutePage TabIndex = 1 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