object GenerateSQLForm: TGenerateSQLForm Left = 274 Height = 395 Top = 144 Width = 593 ActiveControl = PCSQL Caption = 'Generate SQL statements' ClientHeight = 395 ClientWidth = 593 OnCreate = FormCreate LCLVersion = '0.9.25' object PCSQL: TPageControl Height = 359 Width = 593 ActivePage = TSFields Align = alClient TabIndex = 0 TabOrder = 0 OnChange = PCSQLChange OnPageChanged = PCSQLChange object TSFields: TTabSheet Caption = 'Table and &Fields' ChildSizing.EnlargeHorizontal = crsScaleChilds ChildSizing.EnlargeVertical = crsScaleChilds ChildSizing.ShrinkHorizontal = crsScaleChilds ChildSizing.ShrinkVertical = crsScaleChilds ChildSizing.ControlsPerLine = 3 ClientHeight = 326 ClientWidth = 589 OnResize = TSResize object POptions: TPanel Height = 326 Width = 254 Align = alLeft BevelOuter = bvNone ClientHeight = 326 ClientWidth = 254 Constraints.MinWidth = 180 TabOrder = 0 object LCBTables: TLabel Left = 4 Height = 16 Top = 5 Width = 238 Anchors = [akTop, akLeft, akRight] AutoSize = False Caption = 'Ta&ble' FocusControl = CBTables ParentColor = False end object LSEIndent: TLabel Left = 40 Height = 20 Top = 205 Width = 150 Alignment = taRightJustify Anchors = [akTop, akLeft, akRight] AutoSize = False Caption = 'I&ndent' Layout = tlCenter ParentColor = False end object LSELineLength: TLabel Left = 36 Height = 20 Top = 234 Width = 154 Alignment = taRightJustify Anchors = [akTop, akLeft, akRight] AutoSize = False Caption = 'Line Length' Layout = tlCenter ParentColor = False end object CBTables: TComboBox Left = 4 Height = 21 Top = 26 Width = 238 Anchors = [akTop, akLeft, akRight] AutoCompleteText = [cbactEndOfLineComplete, cbactSearchAscending] MaxLength = 0 OnChange = CBTablesChange Sorted = True Style = csDropDownList TabOrder = 0 end object BGenerate: TButton Left = 4 Height = 25 Top = 297 Width = 238 Anchors = [akLeft, akRight, akBottom] BorderSpacing.InnerBorder = 4 Caption = '&Generate SQL' Default = True OnClick = BGenerateClick TabOrder = 1 end object SEindent: TTISpinEdit Left = 204 Height = 23 Top = 202 Width = 34 Anchors = [akTop, akRight] Link.TIPropertyName = 'Indent' TabOrder = 2 end object SELineLength: TTISpinEdit Left = 205 Height = 23 Top = 231 Width = 34 Anchors = [akTop, akRight] Link.TIPropertyName = 'LineLength' TabOrder = 3 end object CLBOptions: TTICheckGroup Left = 6 Height = 144 Top = 50 Width = 234 Anchors = [akTop, akLeft, akRight] Caption = 'Options' Link.TIPropertyName = 'Options' Link.AliasValuesStrings = ( 'eoLineFeedAfterField=Linefeed after each field' 'eoUseOldInWhereParams=Use OLD prefix in where parameters' 'eoAndTermsInBrackets=Put brackets around AND Terms' 'eoQuoteFieldNames=Quote field names' 'eoLineFeedAfterAndTerm=Linefeed after AND terms' 'eoAddTerminator=Add terminator' ) end object CBIgnoreSelection: TCheckBox Left = 6 Height = 21 Top = 257 Width = 190 Caption = 'Create full table creation SQL' TabOrder = 5 end end object PKeyFields: TPanel AnchorSideLeft.Control = POptions AnchorSideLeft.Side = asrBottom AnchorSideRight.Control = PSelectFields Left = 254 Height = 326 Width = 167 Align = alClient BevelOuter = bvNone ClientHeight = 326 ClientWidth = 167 TabOrder = 1 object LLBKeyFields: TLabel Height = 26 Width = 167 Align = alTop Alignment = taCenter AutoSize = False Caption = '&Key fields' Layout = tlCenter ParentColor = False end object LBKeyFields: TListBox Left = 2 Height = 281 Top = 34 Width = 161 Anchors = [akTop, akLeft, akRight, akBottom] MultiSelect = True Sorted = True TabOrder = 0 TopIndex = -1 end end object PSelectFields: TPanel Left = 421 Height = 326 Width = 168 Align = alRight BevelOuter = bvNone ClientHeight = 326 ClientWidth = 168 TabOrder = 2 object Label2: TLabel Height = 26 Width = 168 Align = alTop Alignment = taCenter AutoSize = False Caption = 'Select/Update/Insert fields' Layout = tlCenter ParentColor = False end object LBFields: TListBox Left = 12 Height = 281 Top = 34 Width = 146 Anchors = [akTop, akLeft, akRight, akBottom] MultiSelect = True Sorted = True TabOrder = 0 TopIndex = -1 end end end object TSSelect: TTabSheet Caption = '&Select' ClientHeight = 327 ClientWidth = 593 object MSelect: TMemo Left = 8 Height = 311 Top = 8 Width = 577 Align = alClient BorderSpacing.Around = 8 Lines.Strings = ( '' ) TabOrder = 0 end end object TSInsert: TTabSheet Caption = '&Insert' ClientHeight = 326 ClientWidth = 589 object MInsert: TMemo Left = 8 Height = 310 Top = 8 Width = 573 Align = alClient BorderSpacing.Around = 8 Lines.Strings = ( '' ) TabOrder = 0 end end object TSUpdate: TTabSheet Caption = '&Update' ClientHeight = 327 ClientWidth = 593 object MUpdate: TMemo Left = 8 Height = 311 Top = 8 Width = 577 Align = alClient BorderSpacing.Around = 8 Lines.Strings = ( '' ) TabOrder = 0 end end object TSDelete: TTabSheet Caption = '&Delete' ClientHeight = 327 ClientWidth = 593 object MDelete: TMemo Left = 8 Height = 311 Top = 8 Width = 577 Align = alClient BorderSpacing.Around = 8 Lines.Strings = ( '' ) TabOrder = 0 end end object TSCreate: TTabSheet Caption = 'Create table' ClientHeight = 327 ClientWidth = 593 object MCreate: TMemo Left = 8 Height = 311 Top = 8 Width = 577 Align = alClient BorderSpacing.Around = 8 Lines.Strings = ( '' ) TabOrder = 0 end end end object PButtons: TPanel Height = 36 Top = 359 Width = 593 Align = alBottom BevelOuter = bvLowered ClientHeight = 36 ClientWidth = 593 TabOrder = 1 object BOK: TButton Left = 503 Height = 25 Top = 6 Width = 83 Anchors = [akTop, akRight] BorderSpacing.InnerBorder = 4 Caption = '&Ok' ModalResult = 1 TabOrder = 0 end object BCancel: TButton Left = 415 Height = 25 Top = 6 Width = 83 Anchors = [akTop, akRight] BorderSpacing.InnerBorder = 4 Cancel = True Caption = '&Cancel' ModalResult = 2 TabOrder = 1 end end end