object IBUpdateSQLEditorForm: TIBUpdateSQLEditorForm Left = 350 Height = 410 Top = 324 Width = 662 ActiveControl = PageControl BorderIcons = [biSystemMenu] BorderStyle = bsDialog Caption = 'UpdateSQL Editor' ClientHeight = 410 ClientWidth = 662 OnClose = FormClose OnShow = FormShow LCLVersion = '0.9.28.2' object PageControl: TPageControl Left = 7 Height = 352 Top = 8 Width = 641 ActivePage = SQLPage Anchors = [akTop, akLeft, akRight, akBottom] TabIndex = 1 TabOrder = 0 object FieldsPage: TTabSheet Caption = 'Options' ClientHeight = 316 ClientWidth = 635 object GroupBox1: TGroupBox Left = 8 Height = 311 Top = 4 Width = 617 Anchors = [akTop, akLeft, akRight, akBottom] Caption = ' SQL Generation ' ClientHeight = 291 ClientWidth = 613 TabOrder = 0 object Label1: TLabel Left = 12 Height = 19 Top = 18 Width = 103 Caption = 'Table &Name:' FocusControl = TableNamesCombo ParentColor = False end object Label3: TLabel Left = 228 Height = 19 Top = 19 Width = 87 Caption = '&Key Fields:' FocusControl = PrimaryKeyList ParentColor = False end object Label4: TLabel Left = 371 Height = 19 Top = 19 Width = 113 Caption = 'Update &Fields:' FocusControl = FieldList ParentColor = False end object TableNamesCombo: TComboBox Left = 9 Height = 30 Top = 35 Width = 171 ItemHeight = 0 OnCloseUp = TableNamesComboCloseUp TabOrder = 0 end object PrimaryKeyList: TListBox Left = 228 Height = 230 Top = 36 Width = 136 Anchors = [akTop, akLeft, akBottom] ItemHeight = 0 MultiSelect = True TabOrder = 3 TopIndex = -1 end object FieldList: TListBox Left = 371 Height = 230 Hint = 'Select Fields to include in Update and Insert Statements, or leave unselected to select all' Top = 35 Width = 136 Anchors = [akTop, akLeft, akBottom] ItemHeight = 0 MultiSelect = True ParentShowHint = False ShowHint = True TabOrder = 4 TopIndex = -1 end object GenerateButton: TButton Left = 9 Height = 25 Top = 83 Width = 168 Caption = '&Generate SQL' OnClick = GenerateButtonClick TabOrder = 1 end object QuoteFields: TCheckBox Left = 9 Height = 22 Top = 131 Width = 144 Caption = '&Quote Identifiers' TabOrder = 2 end end end object SQLPage: TTabSheet Caption = 'SQL' ClientHeight = 316 ClientWidth = 635 OnShow = SQLPageShow object Label2: TLabel Left = 10 Height = 19 Top = 81 Width = 80 Caption = 'S&QL Text:' FocusControl = SQLMemo ParentColor = False end object SQLMemo: TMemo Left = 9 Height = 204 Top = 105 Width = 615 Anchors = [akTop, akLeft, akRight, akBottom] OnChange = SQLMemoChange ScrollBars = ssVertical TabOrder = 0 end object StatementType: TRadioGroup Left = 10 Height = 54 Top = 9 Width = 303 AutoFill = True AutoSize = True Caption = 'Statement Type' ChildSizing.LeftRightSpacing = 6 ChildSizing.TopBottomSpacing = 6 ChildSizing.EnlargeHorizontal = crsHomogenousChildResize ChildSizing.EnlargeVertical = crsHomogenousChildResize ChildSizing.ShrinkHorizontal = crsScaleChilds ChildSizing.ShrinkVertical = crsScaleChilds ChildSizing.Layout = cclLeftToRightThenTopToBottom ChildSizing.ControlsPerLine = 4 ClientHeight = 34 ClientWidth = 299 Columns = 4 ItemIndex = 0 Items.Strings = ( '&Modify' '&Insert' '&Delete' '&Refresh' ) OnClick = StatementTypeClick TabOrder = 1 end object Button1: TButton Left = 541 Height = 25 Top = 31 Width = 75 Anchors = [akTop, akRight] Caption = 'Test' OnClick = Button1Click TabOrder = 2 end end end object OkButton: TButton Left = 480 Height = 25 Top = 376 Width = 75 Anchors = [akRight, akBottom] Caption = '&OK' Default = True ModalResult = 1 TabOrder = 1 end object CancelButton: TButton Left = 573 Height = 25 Top = 376 Width = 75 Anchors = [akRight, akBottom] Cancel = True Caption = 'Cancel' ModalResult = 2 TabOrder = 2 end end