lazarus/tools/lazdatadesktop/frmgeneratesql.lfm

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