object frmTableEditor: TfrmTableEditor Left = 0 Height = 501 Top = 0 Width = 700 ClientHeight = 501 ClientWidth = 700 LCLVersion = '4.4.0.0' ParentFont = False TabOrder = 0 object SplitterTopBottom: TSplitter AnchorSideTop.Control = PageControlMain AnchorSideTop.Side = asrBottom Cursor = crVSplit Left = 0 Height = 8 Top = 170 Width = 700 Align = alTop ResizeAnchor = akTop end object PageControlMain: TPageControl Left = 0 Height = 170 Top = 0 Width = 700 ActivePage = tabBasic Align = alTop AutoSize = True Images = MainForm.ImageListMain TabIndex = 0 TabOrder = 0 OnChange = PageControlMainChange object tabBasic: TTabSheet Caption = 'Basic' ClientHeight = 142 ClientWidth = 692 ImageIndex = 14 object lblName: TLabel AnchorSideLeft.Control = tabBasic AnchorSideTop.Control = tabBasic Left = 5 Height = 15 Top = 5 Width = 35 BorderSpacing.Around = 5 Caption = 'Name:' end object lblComment: TLabel AnchorSideLeft.Control = tabBasic AnchorSideTop.Control = editName AnchorSideTop.Side = asrBottom Left = 5 Height = 15 Top = 33 Width = 57 BorderSpacing.Around = 5 Caption = 'Comment:' end object editName: TEdit AnchorSideTop.Control = tabBasic AnchorSideRight.Control = tabBasic AnchorSideRight.Side = asrBottom Left = 96 Height = 23 Top = 5 Width = 591 Anchors = [akTop, akLeft, akRight] BorderSpacing.Around = 5 TabOrder = 0 Text = 'editName' TextHint = 'Enter table name' OnChange = Modification end object memoComment: TMemo AnchorSideTop.Control = editName AnchorSideTop.Side = asrBottom AnchorSideRight.Control = tabBasic AnchorSideRight.Side = asrBottom AnchorSideBottom.Control = tabBasic AnchorSideBottom.Side = asrBottom Left = 96 Height = 104 Top = 33 Width = 591 Anchors = [akTop, akLeft, akRight, akBottom] BorderSpacing.Around = 5 Lines.Strings = ( 'memoComment' ) MaxLength = 60 ScrollBars = ssVertical TabOrder = 1 OnChange = Modification end end object tabOptions: TTabSheet Caption = 'Options' ClientHeight = 142 ClientWidth = 692 ImageIndex = 39 object lblAutoinc: TLabel AnchorSideLeft.Control = tabOptions AnchorSideTop.Control = tabOptions Left = 5 Height = 15 Top = 5 Width = 86 BorderSpacing.Around = 5 Caption = 'Auto increment:' end object lblCollation: TLabel AnchorSideLeft.Control = tabOptions AnchorSideTop.Control = tabOptions Left = 285 Height = 15 Top = 5 Width = 90 BorderSpacing.Left = 280 BorderSpacing.Around = 5 Caption = 'Default collation:' end object lblAvgRowLen: TLabel AnchorSideLeft.Control = tabOptions AnchorSideTop.Control = editAutoInc AnchorSideTop.Side = asrBottom Left = 5 Height = 15 Top = 33 Width = 106 BorderSpacing.Around = 5 Caption = 'Average row length:' end object lblEngine: TLabel AnchorSideLeft.Control = tabOptions AnchorSideTop.Control = comboCollation AnchorSideTop.Side = asrBottom Left = 285 Height = 15 Top = 33 Width = 39 BorderSpacing.Left = 280 BorderSpacing.Around = 5 Caption = 'Engine:' end object lblMaxRows: TLabel AnchorSideLeft.Control = tabOptions AnchorSideTop.Control = editAvgRowLen AnchorSideTop.Side = asrBottom Left = 5 Height = 15 Top = 61 Width = 114 BorderSpacing.Around = 5 Caption = 'Maximum row count:' end object lblUnion: TLabel AnchorSideLeft.Control = tabOptions AnchorSideTop.Control = comboEngine AnchorSideTop.Side = asrBottom Left = 285 Height = 15 Top = 61 Width = 69 BorderSpacing.Left = 280 BorderSpacing.Around = 5 Caption = 'Union tables:' end object lblRowFormat: TLabel AnchorSideLeft.Control = tabOptions AnchorSideTop.Control = chkChecksum AnchorSideTop.Side = asrBottom Left = 5 Height = 15 Top = 113 Width = 65 BorderSpacing.Around = 5 Caption = 'Row format:' end object lblInsertMethod: TLabel AnchorSideLeft.Control = tabOptions AnchorSideTop.Control = memoUnionTables AnchorSideTop.Side = asrBottom Left = 285 Height = 15 Top = 110 Width = 85 BorderSpacing.Left = 280 BorderSpacing.Around = 5 Caption = 'INSERT method:' end object editAutoInc: TEdit AnchorSideLeft.Control = tabOptions AnchorSideTop.Control = tabOptions Left = 141 Height = 23 Top = 5 Width = 120 BorderSpacing.Left = 136 BorderSpacing.Around = 5 TabOrder = 0 OnChange = editNumEditChange end object comboCollation: TComboBox AnchorSideTop.Control = tabOptions Left = 404 Height = 23 Top = 5 Width = 130 BorderSpacing.Around = 5 DropDownCount = 16 ItemHeight = 15 Sorted = True Style = csDropDownList TabOrder = 5 OnChange = chkCharsetConvertClick end object chkCharsetConvert: TCheckBox AnchorSideLeft.Control = comboCollation AnchorSideLeft.Side = asrBottom AnchorSideTop.Control = tabOptions Left = 539 Height = 19 Top = 5 Width = 86 BorderSpacing.Around = 5 Caption = 'Convert data' TabOrder = 6 OnClick = chkCharsetConvertClick end object editAvgRowLen: TEdit AnchorSideLeft.Control = tabOptions AnchorSideTop.Control = editAutoInc AnchorSideTop.Side = asrBottom Left = 141 Height = 23 Top = 33 Width = 120 BorderSpacing.Left = 136 BorderSpacing.Around = 5 TabOrder = 1 OnChange = editNumEditChange end object comboEngine: TComboBox AnchorSideTop.Control = comboCollation AnchorSideTop.Side = asrBottom Left = 404 Height = 23 Top = 33 Width = 221 BorderSpacing.Around = 5 ItemHeight = 15 Style = csDropDownList TabOrder = 7 OnSelect = comboEngineSelect end object editMaxRows: TEdit AnchorSideLeft.Control = tabOptions AnchorSideTop.Control = editAvgRowLen AnchorSideTop.Side = asrBottom Left = 141 Height = 23 Top = 61 Width = 120 BorderSpacing.Left = 136 BorderSpacing.Around = 5 TabOrder = 2 OnChange = editNumEditChange end object memoUnionTables: TMemo AnchorSideTop.Control = comboEngine AnchorSideTop.Side = asrBottom Left = 404 Height = 44 Top = 61 Width = 221 BorderSpacing.Around = 5 Lines.Strings = ( 'memoUnion' ) TabOrder = 8 OnChange = Modification end object chkChecksum: TCheckBox AnchorSideLeft.Control = tabOptions AnchorSideTop.Control = editMaxRows AnchorSideTop.Side = asrBottom Left = 5 Height = 19 Top = 89 Width = 123 Alignment = taLeftJustify BorderSpacing.Around = 5 Caption = 'Checksum for rows:' TabOrder = 3 OnClick = Modification end object comboRowFormat: TComboBox AnchorSideLeft.Control = tabOptions AnchorSideTop.Control = chkChecksum AnchorSideTop.Side = asrBottom Left = 141 Height = 23 Top = 113 Width = 120 BorderSpacing.Left = 136 BorderSpacing.Around = 5 ItemHeight = 15 Style = csDropDownList TabOrder = 4 OnChange = Modification end object comboInsertMethod: TComboBox AnchorSideTop.Control = memoUnionTables AnchorSideTop.Side = asrBottom Left = 404 Height = 23 Top = 110 Width = 221 BorderSpacing.Around = 5 ItemHeight = 15 Style = csDropDownList TabOrder = 9 OnClick = Modification end end object tabIndexes: TTabSheet Caption = 'Indexes' ClientHeight = 142 ClientWidth = 692 ImageIndex = 13 object treeIndexes: TLazVirtualStringTree Left = 67 Height = 142 Top = 0 Width = 625 Align = alClient DragMode = dmAutomatic DragType = dtVCL EditDelay = 0 Header.AutoSizeIndex = 0 Header.Columns = < item Options = [coEnabled, coParentBidiMode, coParentColor, coResizable, coShowDropMark, coVisible, coAllowFocus] Position = 0 Text = 'Name' Width = 241 end item Options = [coEnabled, coParentBidiMode, coParentColor, coResizable, coShowDropMark, coVisible, coAllowFocus] Position = 1 Text = 'Type / Length' Width = 100 end item Position = 2 Text = 'Algorithm' Width = 80 end item Position = 3 Text = 'Comment' Width = 120 end item Position = 4 Text = 'Direction' Width = 80 end> Header.Options = [hoAutoResize, hoColumnResize, hoDrag, hoShowSortGlyphs, hoVisible, hoDisableAnimatedResize] Header.PopupMenu = MainForm.popupListHeader Images = MainForm.ImageListMain PopupMenu = popupProperties TabOrder = 1 TreeOptions.AutoOptions = [toAutoDropExpand, toAutoScrollOnExpand, toAutoTristateTracking, toAutoChangeScale] TreeOptions.MiscOptions = [toAcceptOLEDrop, toEditable, toFullRepaintOnResize, toGridExtensions, toInitOnSave, toToggleOnDblClick, toWheelPanning, toEditOnClick] TreeOptions.PaintOptions = [toHotTrack, toShowButtons, toShowDropmark, toShowRoot, toShowTreeLines, toThemeAware, toUseBlendedImages, toFullVertGridLines, toUseExplorerTheme, toHideTreeLinesIfThemed] TreeOptions.SelectionOptions = [toExtendedFocus, toRightClickSelect] OnBeforePaint = treeIndexesBeforePaint OnClick = AnyTreeClick OnCreateEditor = treeIndexesCreateEditor OnDragOver = treeIndexesDragOver OnDragDrop = treeIndexesDragDrop OnEditing = treeIndexesEditing OnFocusChanged = treeIndexesFocusChanged OnGetText = treeIndexesGetText OnGetImageIndex = treeIndexesGetImageIndex OnInitChildren = treeIndexesInitChildren OnInitNode = treeIndexesInitNode OnNewText = treeIndexesNewText OnStructureChange = AnyTreeStructureChange end object tlbIndexes: TToolBar Left = 0 Height = 142 Top = 0 Width = 67 Align = alLeft AutoSize = True ButtonHeight = 28 ButtonWidth = 66 Caption = 'tlbIndexes' Images = MainForm.ImageListMain List = True ShowCaptions = True TabOrder = 0 object btnAddIndex: TToolButton Left = 1 Hint = 'Add index' Top = 2 Caption = 'Add' ImageIndex = 45 Wrap = True OnClick = btnAddIndexClick end object btnRemoveIndex: TToolButton Left = 1 Hint = 'Remove index' Top = 30 Caption = 'Remove' ImageIndex = 46 Wrap = True OnClick = btnRemoveIndexClick end object btnClearIndexes: TToolButton Left = 1 Hint = 'Clear indexes' Top = 58 Caption = 'Clear' ImageIndex = 26 Wrap = True OnClick = btnClearIndexesClick end object btnMoveUpIndex: TToolButton Left = 1 Hint = 'Move up' Top = 86 Caption = 'Up' ImageIndex = 74 Wrap = True OnClick = btnMoveUpIndexClick end object btnMoveDownIndex: TToolButton Left = 1 Hint = 'Move down' Top = 114 Caption = 'Down' ImageIndex = 75 OnClick = btnMoveDownIndexClick end end end object tabForeignKeys: TTabSheet Caption = 'Foreign keys' ClientHeight = 142 ClientWidth = 692 ImageIndex = 136 object tlbForeignKeys: TToolBar Left = 0 Height = 142 Top = 0 Width = 67 Align = alLeft AutoSize = True ButtonHeight = 28 ButtonWidth = 66 Caption = 'tlbForeignKeys' Images = MainForm.ImageListMain List = True ShowCaptions = True TabOrder = 0 object btnAddForeignKey: TToolButton Left = 1 Top = 2 Caption = 'Add' ImageIndex = 45 Wrap = True OnClick = btnAddForeignKeyClick end object btnRemoveForeignKey: TToolButton Left = 1 Top = 30 Caption = 'Remove' Enabled = False ImageIndex = 46 Wrap = True OnClick = btnRemoveForeignKeyClick end object btnClearForeignKeys: TToolButton Left = 1 Top = 58 Caption = 'Clear' Enabled = False ImageIndex = 26 OnClick = btnClearForeignKeysClick end end object listForeignKeys: TLazVirtualStringTree Left = 67 Height = 142 Top = 0 Width = 625 Align = alClient EditDelay = 0 Header.AutoSizeIndex = -1 Header.Columns = < item Options = [coDraggable, coEnabled, coParentBidiMode, coParentColor, coResizable, coShowDropMark, coVisible, coAllowFocus] Position = 0 Text = 'Key name' Width = 196 end item Options = [coDraggable, coEnabled, coParentBidiMode, coParentColor, coResizable, coShowDropMark, coVisible, coAllowFocus] Position = 1 Text = 'Columns' Width = 80 end item Options = [coDraggable, coEnabled, coParentBidiMode, coParentColor, coResizable, coShowDropMark, coVisible, coAllowFocus] Position = 2 Text = 'Reference table' Width = 100 end item Options = [coDraggable, coEnabled, coParentBidiMode, coParentColor, coResizable, coShowDropMark, coVisible, coAllowFocus] Position = 3 Text = 'Foreign columns' Width = 80 end item Options = [coDraggable, coEnabled, coParentBidiMode, coParentColor, coResizable, coShowDropMark, coVisible, coAllowFocus] Position = 4 Text = 'On UPDATE' Width = 80 end item Options = [coDraggable, coEnabled, coParentBidiMode, coParentColor, coResizable, coShowDropMark, coVisible, coAllowFocus] Position = 5 Text = 'On DELETE' Width = 85 end> Header.Options = [hoAutoResize, hoColumnResize, hoDrag, hoShowSortGlyphs, hoVisible, hoDisableAnimatedResize] Header.PopupMenu = MainForm.popupListHeader Images = MainForm.ImageListMain PopupMenu = popupProperties TabOrder = 1 TreeOptions.MiscOptions = [toAcceptOLEDrop, toEditable, toFullRepaintOnResize, toGridExtensions, toInitOnSave, toToggleOnDblClick, toWheelPanning, toEditOnClick] TreeOptions.PaintOptions = [toShowButtons, toShowDropmark, toShowTreeLines, toThemeAware, toUseBlendedImages, toUseExplorerTheme, toHideTreeLinesIfThemed] TreeOptions.SelectionOptions = [toExtendedFocus] OnBeforePaint = listForeignKeysBeforePaint OnClick = AnyTreeClick OnCreateEditor = listForeignKeysCreateEditor OnEditing = listForeignKeysEditing OnFocusChanged = listForeignKeysFocusChanged OnGetText = listForeignKeysGetText OnGetImageIndex = listForeignKeysGetImageIndex OnNewText = listForeignKeysNewText OnStructureChange = AnyTreeStructureChange end end object tabCheckConstraints: TTabSheet Caption = 'Check constraints' ClientHeight = 142 ClientWidth = 692 ImageIndex = 55 object tlbCheckConstraints: TToolBar Left = 0 Height = 142 Top = 0 Width = 67 Align = alLeft AutoSize = True ButtonHeight = 28 ButtonWidth = 66 Caption = 'tlbCheckConstraints' Images = MainForm.ImageListMain List = True ShowCaptions = True TabOrder = 0 object btnAddCheckConstraint: TToolButton Left = 1 Top = 2 Caption = 'Add' ImageIndex = 45 Wrap = True OnClick = btnAddCheckConstraintClick end object btnRemoveCheckConstraint: TToolButton Left = 1 Top = 30 Caption = 'Remove' Enabled = False ImageIndex = 46 Wrap = True OnClick = btnRemoveCheckConstraintClick end object btnClearCheckConstraints: TToolButton Left = 1 Top = 58 Caption = 'Clear' Enabled = False ImageIndex = 26 OnClick = btnClearCheckConstraintsClick end end object listCheckConstraints: TLazVirtualStringTree Left = 67 Height = 142 Top = 0 Width = 625 Align = alClient EditDelay = 0 Header.AutoSizeIndex = 1 Header.Columns = < item Options = [coDraggable, coEnabled, coParentBidiMode, coParentColor, coResizable, coShowDropMark, coVisible, coAllowFocus, coEditable] Position = 0 Text = 'Name' Width = 200 end item Options = [coDraggable, coEnabled, coParentBidiMode, coParentColor, coResizable, coShowDropMark, coVisible, coAllowFocus, coEditable] Position = 1 Text = 'Check clause' Width = 421 end> Header.Options = [hoAutoResize, hoColumnResize, hoDrag, hoShowSortGlyphs, hoVisible, hoDisableAnimatedResize] Header.PopupMenu = MainForm.popupListHeader Images = MainForm.ImageListMain PopupMenu = popupProperties TabOrder = 1 TreeOptions.MiscOptions = [toAcceptOLEDrop, toEditable, toFullRepaintOnResize, toGridExtensions, toInitOnSave, toToggleOnDblClick, toWheelPanning, toEditOnClick] TreeOptions.PaintOptions = [toShowButtons, toShowDropmark, toShowTreeLines, toThemeAware, toUseBlendedImages, toUseExplorerTheme, toHideTreeLinesIfThemed] TreeOptions.SelectionOptions = [toExtendedFocus] OnBeforePaint = listCheckConstraintsBeforePaint OnClick = AnyTreeClick OnCreateEditor = listCheckConstraintsCreateEditor OnFocusChanged = listCheckConstraintsFocusChanged OnGetText = listCheckConstraintsGetText OnGetImageIndex = listCheckConstraintsGetImageIndex OnNewText = listCheckConstraintsNewText OnStructureChange = AnyTreeStructureChange end end object tabPartitions: TTabSheet Caption = 'Partitions' ClientHeight = 142 ClientWidth = 692 ImageIndex = 186 inline SynMemoPartitions: TSynEdit Left = 0 Height = 142 Top = 0 Width = 692 Align = alClient Font.Height = -13 Font.Name = 'Courier New' Font.Pitch = fpFixed Font.Quality = fqNonAntialiased ParentColor = False ParentFont = False TabOrder = 0 Gutter.LeftOffset = 2 Gutter.Width = 59 Gutter.MouseActions = <> RightGutter.Width = 0 RightGutter.MouseActions = <> Highlighter = MainForm.SynSQLSynUsed Keystrokes = <> MouseActions = <> MouseTextActions = <> MouseSelActions = <> Lines.Strings = ( 'SynMemoPartitions' ) Options = [eoAutoIndent, eoGroupUndo, eoKeepCaretX, eoShowScrollHint, eoSmartTabs, eoTabsToSpaces, eoDragDropEditing] MouseOptions = [emDragDropEditing] VisibleSpecialChars = [vscSpace, vscTabAtLast] ReadOnly = True SelectedColor.BackPriority = 50 SelectedColor.ForePriority = 50 SelectedColor.FramePriority = 50 SelectedColor.BoldPriority = 50 SelectedColor.ItalicPriority = 50 SelectedColor.UnderlinePriority = 50 SelectedColor.StrikeOutPriority = 50 BracketHighlightStyle = sbhsBoth BracketMatchColor.Background = clNone BracketMatchColor.Foreground = clNone BracketMatchColor.Style = [fsBold] FoldedCodeColor.Background = clNone FoldedCodeColor.Foreground = clGray FoldedCodeColor.FrameColor = clGray MouseLinkColor.Background = clNone MouseLinkColor.Foreground = clBlue LineHighlightColor.Background = clNone LineHighlightColor.Foreground = clNone inline SynLeftGutterPartList1: TSynGutterPartList object SynGutterMarks1: TSynGutterMarks Width = 24 MouseActions = <> MaxExtraMarksColums = 0 Options = [sgmoDeDuplicateMarksOnOverflow] MarkupInfo.Background = clBtnFace MarkupInfo.Foreground = clNone end object SynGutterLineNumber1: TSynGutterLineNumber Width = 17 MouseActions = <> MarkupInfo.Background = clBtnFace MarkupInfo.Foreground = clNone DigitCount = 2 ShowOnlyLineNumbersMultiplesOf = 1 ZeroStart = False LeadingZeros = False end object SynGutterChanges1: TSynGutterChanges Width = 4 MouseActions = <> ModifiedColor = 59900 SavedColor = clGreen MarkupInfo.Background = clNone MarkupInfo.Foreground = clGreen MarkupInfo.FrameColor = 59900 end object SynGutterSeparator1: TSynGutterSeparator Width = 2 MouseActions = <> MarkupInfo.Background = clWhite MarkupInfo.Foreground = clGray end object SynGutterCodeFolding1: TSynGutterCodeFolding MouseActions = <> MarkupInfo.Background = clNone MarkupInfo.Foreground = clGray MouseActionsExpanded = <> MouseActionsCollapsed = <> end end end end object tabCREATEcode: TTabSheet Caption = 'CREATE code' ClientHeight = 142 ClientWidth = 692 ImageIndex = 119 inline SynMemoCREATEcode: TSynEdit Left = 0 Height = 142 Top = 0 Width = 692 Align = alClient Font.Height = -13 Font.Name = 'Courier New' Font.Pitch = fpFixed Font.Quality = fqNonAntialiased ParentColor = False ParentFont = False TabOrder = 0 Gutter.LeftOffset = 2 Gutter.Width = 59 Gutter.MouseActions = <> RightGutter.Width = 0 RightGutter.MouseActions = <> Highlighter = MainForm.SynSQLSynUsed Keystrokes = <> MouseActions = <> MouseTextActions = <> MouseSelActions = <> Lines.Strings = ( 'SynMemoALTERcode' ) Options = [eoAutoIndent, eoGroupUndo, eoKeepCaretX, eoShowScrollHint, eoSmartTabs, eoTabsToSpaces, eoDragDropEditing] MouseOptions = [emDragDropEditing] VisibleSpecialChars = [vscSpace, vscTabAtLast] ReadOnly = True SelectedColor.BackPriority = 50 SelectedColor.ForePriority = 50 SelectedColor.FramePriority = 50 SelectedColor.BoldPriority = 50 SelectedColor.ItalicPriority = 50 SelectedColor.UnderlinePriority = 50 SelectedColor.StrikeOutPriority = 50 BracketHighlightStyle = sbhsBoth BracketMatchColor.Background = clNone BracketMatchColor.Foreground = clNone BracketMatchColor.Style = [fsBold] FoldedCodeColor.Background = clNone FoldedCodeColor.Foreground = clGray FoldedCodeColor.FrameColor = clGray MouseLinkColor.Background = clNone MouseLinkColor.Foreground = clBlue LineHighlightColor.Background = clNone LineHighlightColor.Foreground = clNone inline SynLeftGutterPartList1: TSynGutterPartList object SynGutterMarks1: TSynGutterMarks Width = 24 MouseActions = <> MaxExtraMarksColums = 0 Options = [sgmoDeDuplicateMarksOnOverflow] MarkupInfo.Background = clBtnFace MarkupInfo.Foreground = clNone end object SynGutterLineNumber1: TSynGutterLineNumber Width = 17 MouseActions = <> MarkupInfo.Background = clBtnFace MarkupInfo.Foreground = clNone DigitCount = 2 ShowOnlyLineNumbersMultiplesOf = 1 ZeroStart = False LeadingZeros = False end object SynGutterChanges1: TSynGutterChanges Width = 4 MouseActions = <> ModifiedColor = 59900 SavedColor = clGreen MarkupInfo.Background = clNone MarkupInfo.Foreground = clGreen MarkupInfo.FrameColor = 59900 end object SynGutterSeparator1: TSynGutterSeparator Width = 2 MouseActions = <> MarkupInfo.Background = clWhite MarkupInfo.Foreground = clGray end object SynGutterCodeFolding1: TSynGutterCodeFolding MouseActions = <> MarkupInfo.Background = clNone MarkupInfo.Foreground = clGray MouseActionsExpanded = <> MouseActionsCollapsed = <> end end end end object tabALTERCode: TTabSheet Caption = 'ALTER code' ClientHeight = 142 ClientWidth = 692 ImageIndex = 119 inline SynMemoALTERcode: TSynEdit Left = 0 Height = 142 Top = 0 Width = 692 Align = alClient Font.Height = -13 Font.Name = 'Courier New' Font.Pitch = fpFixed Font.Quality = fqNonAntialiased ParentColor = False ParentFont = False TabOrder = 0 Gutter.LeftOffset = 2 Gutter.Width = 59 Gutter.MouseActions = <> RightGutter.Width = 0 RightGutter.MouseActions = <> Highlighter = MainForm.SynSQLSynUsed Keystrokes = <> MouseActions = <> MouseTextActions = <> MouseSelActions = <> Lines.Strings = ( 'SynMemoALTERcode' ) Options = [eoAutoIndent, eoGroupUndo, eoKeepCaretX, eoShowScrollHint, eoSmartTabs, eoTabsToSpaces, eoDragDropEditing] MouseOptions = [emDragDropEditing] VisibleSpecialChars = [vscSpace, vscTabAtLast] ReadOnly = True SelectedColor.BackPriority = 50 SelectedColor.ForePriority = 50 SelectedColor.FramePriority = 50 SelectedColor.BoldPriority = 50 SelectedColor.ItalicPriority = 50 SelectedColor.UnderlinePriority = 50 SelectedColor.StrikeOutPriority = 50 BracketHighlightStyle = sbhsBoth BracketMatchColor.Background = clNone BracketMatchColor.Foreground = clNone BracketMatchColor.Style = [fsBold] FoldedCodeColor.Background = clNone FoldedCodeColor.Foreground = clGray FoldedCodeColor.FrameColor = clGray MouseLinkColor.Background = clNone MouseLinkColor.Foreground = clBlue LineHighlightColor.Background = clNone LineHighlightColor.Foreground = clNone inline SynLeftGutterPartList1: TSynGutterPartList object SynGutterMarks1: TSynGutterMarks Width = 24 MouseActions = <> MaxExtraMarksColums = 0 Options = [sgmoDeDuplicateMarksOnOverflow] MarkupInfo.Background = clBtnFace MarkupInfo.Foreground = clNone end object SynGutterLineNumber1: TSynGutterLineNumber Width = 17 MouseActions = <> MarkupInfo.Background = clBtnFace MarkupInfo.Foreground = clNone DigitCount = 2 ShowOnlyLineNumbersMultiplesOf = 1 ZeroStart = False LeadingZeros = False end object SynGutterChanges1: TSynGutterChanges Width = 4 MouseActions = <> ModifiedColor = 59900 SavedColor = clGreen MarkupInfo.Background = clNone MarkupInfo.Foreground = clGreen MarkupInfo.FrameColor = 59900 end object SynGutterSeparator1: TSynGutterSeparator Width = 2 MouseActions = <> MarkupInfo.Background = clWhite MarkupInfo.Foreground = clGray end object SynGutterCodeFolding1: TSynGutterCodeFolding MouseActions = <> MarkupInfo.Background = clNone MarkupInfo.Foreground = clGray MouseActionsExpanded = <> MouseActionsCollapsed = <> end end end end end object pnlColumnsTop: TPanel AnchorSideLeft.Control = Owner AnchorSideTop.Control = SplitterTopBottom AnchorSideTop.Side = asrBottom AnchorSideRight.Control = Owner AnchorSideRight.Side = asrBottom Left = 0 Height = 28 Top = 178 Width = 700 Align = alTop Alignment = taLeftJustify AutoSize = True BevelOuter = bvNone Caption = 'Columns:' ClientHeight = 28 ClientWidth = 700 TabOrder = 1 object tlbColumns: TToolBar Left = 0 Height = 28 Top = 0 Width = 700 Align = alClient AutoSize = True ButtonHeight = 28 ButtonWidth = 66 Caption = 'Columns:' EdgeBorders = [] Images = MainForm.ImageListMain List = True ShowCaptions = True TabOrder = 0 object btnAddColumn: TToolButton Left = 1 Hint = 'Add column' Top = 0 Caption = 'Add' ImageIndex = 45 OnClick = btnAddColumnClick end object btnRemoveColumn: TToolButton Left = 67 Hint = 'Remove column' Top = 0 Caption = 'Remove' ImageIndex = 46 OnClick = btnRemoveColumnClick end object btnMoveUpColumn: TToolButton Left = 139 Hint = 'Move up' Top = 0 Caption = 'Up' ImageIndex = 74 OnClick = btnMoveUpColumnClick end object btnMoveDownColumn: TToolButton Left = 205 Hint = 'Move down' Top = 0 Caption = 'Down' ImageIndex = 75 OnClick = btnMoveDownColumnClick end end end object listColumns: TLazVirtualStringTree AnchorSideBottom.Control = btnSave Left = 0 Height = 260 Top = 206 Width = 700 Align = alTop Anchors = [akTop, akLeft, akRight, akBottom] Constraints.MinHeight = 20 DragMode = dmAutomatic DragType = dtVCL EditDelay = 0 Header.AutoSizeIndex = -1 Header.Columns = < item Alignment = taRightJustify MinWidth = 20 Position = 0 Text = '#' Width = 20 end item MinWidth = 50 Position = 1 Text = 'Name' Width = 100 end item Position = 2 Text = 'Datatype' Width = 90 end item Position = 3 Text = 'Length/Set' Width = 90 end item Position = 4 Text = 'Unsigned' Width = 60 end item Position = 5 Text = 'Allow NULL' Width = 65 end item Position = 6 Text = 'Zerofill' end item Position = 7 Text = 'Default' Width = 100 end item Position = 8 Text = 'Comment' Width = 130 end item Position = 9 Text = 'Collation' Width = 100 end item Position = 10 Text = 'Expression' Width = 100 end item Position = 11 Text = 'Virtuality' Width = 100 end item Hint = 'Spatial reference system' Position = 12 Text = 'SRID' end item Hint = 'Hide in certain contexts' Position = 13 Text = 'Invisible' end item Hint = 'Storage-Engine Independent Column Compression' Position = 14 Text = 'Compressed' end> Header.Options = [hoColumnResize, hoDblClickResize, hoDrag, hoHotTrack, hoShowSortGlyphs, hoVisible, hoDisableAnimatedResize] Header.PopupMenu = MainForm.popupListHeader Images = MainForm.ImageListMain IncrementalSearch = isAll PopupMenu = popupColumns TabOrder = 2 TreeOptions.AutoOptions = [toAutoDropExpand, toAutoScrollOnExpand, toAutoTristateTracking, toAutoChangeScale] TreeOptions.MiscOptions = [toAcceptOLEDrop, toCheckSupport, toEditable, toFullRepaintOnResize, toGridExtensions, toInitOnSave, toWheelPanning, toFullRowDrag, toEditOnClick] TreeOptions.PaintOptions = [toHotTrack, toShowDropmark, toThemeAware, toUseBlendedImages, toUseExplorerTheme, toHideTreeLinesIfThemed] TreeOptions.SelectionOptions = [toExtendedFocus, toFullRowSelect, toMultiSelect] WantTabs = True OnAfterCellPaint = listColumnsAfterCellPaint OnBeforeCellPaint = listColumnsBeforeCellPaint OnChange = listColumnsChange OnClick = listColumnsClick OnCreateEditor = listColumnsCreateEditor OnDragOver = listColumnsDragOver OnDragDrop = listColumnsDragDrop OnEditing = listColumnsEditing OnFocusChanged = listColumnsFocusChanged OnGetText = listColumnsGetText OnPaintText = listColumnsPaintText OnGetNodeDataSize = listColumnsGetNodeDataSize OnHeaderClick = listColumnsHeaderClick OnInitNode = listColumnsInitNode OnKeyPress = listColumnsKeyPress OnNewText = listColumnsNewText end object btnSave: TButton AnchorSideLeft.Control = btnDiscard AnchorSideLeft.Side = asrBottom AnchorSideBottom.Control = Owner AnchorSideBottom.Side = asrBottom Left = 165 Height = 25 Top = 471 Width = 75 Anchors = [akLeft, akBottom] BorderSpacing.Around = 5 Caption = 'Save' Default = True TabOrder = 5 OnClick = btnSaveClick end object btnDiscard: TButton AnchorSideLeft.Control = btnHelp AnchorSideLeft.Side = asrBottom AnchorSideBottom.Control = Owner AnchorSideBottom.Side = asrBottom Left = 85 Height = 25 Top = 471 Width = 75 Anchors = [akLeft, akBottom] BorderSpacing.Around = 5 Caption = 'Discard' TabOrder = 4 OnClick = btnDiscardClick end object btnHelp: TButton AnchorSideLeft.Control = Owner AnchorSideBottom.Control = Owner AnchorSideBottom.Side = asrBottom Left = 5 Height = 25 Top = 471 Width = 75 Anchors = [akLeft, akBottom] BorderSpacing.Around = 5 Caption = 'Help' TabOrder = 3 OnClick = btnHelpClick end object popupProperties: TPopupMenu Images = MainForm.ImageListMain OnPopup = popupPropertiesPopup Left = 400 Top = 360 object Copy1: TMenuItem Action = MainForm.actCopy end object menuAddProperty: TMenuItem Caption = 'Add' ImageIndex = 45 ShortCut = 16429 OnClick = menuAddPropertyClick end object menuAddIndexColumn: TMenuItem Caption = 'Add column' ImageIndex = 91 ShortCut = 24621 OnClick = menuAddIndexColumnClick end object menuRemoveProperty: TMenuItem Caption = 'Remove' ImageIndex = 46 ShortCut = 16430 OnClick = menuRemovePropertyClick end object menuClearProperties: TMenuItem Caption = 'Clear' ImageIndex = 26 ShortCut = 24622 OnClick = menuClearPropertiesClick end object menuMoveUpIndex: TMenuItem Caption = 'Up' ImageIndex = 74 ShortCut = 16469 OnClick = btnMoveUpIndexClick end object menuMoveDownIndex: TMenuItem Caption = 'Down' ImageIndex = 75 ShortCut = 16452 OnClick = btnMoveDownIndexClick end end object popupColumns: TPopupMenu Images = MainForm.ImageListMain OnPopup = popupColumnsPopup Left = 312 Top = 360 object menuCopyColumnCell: TMenuItem Action = MainForm.actCopy end object menuCopyColumns: TMenuItem Caption = 'Copy selected columns' ImageIndex = 155 OnClick = menuCopyColumnsClick end object menuPasteColumns: TMenuItem Caption = 'Paste columns' ImageIndex = 156 OnClick = menuPasteColumnsClick end object N2: TMenuItem Caption = '-' end object menuAddColumn: TMenuItem Caption = 'Add column' ImageIndex = 45 ShortCut = 16429 OnClick = btnAddColumnClick end object menuRemoveColumn: TMenuItem Caption = 'Remove column' ImageIndex = 46 ShortCut = 16430 OnClick = btnRemoveColumnClick end object menuMoveUpColumn: TMenuItem Caption = 'Move up' ImageIndex = 74 ShortCut = 16469 OnClick = btnMoveUpColumnClick end object menuMoveDownColumn: TMenuItem Caption = 'Move down' ImageIndex = 75 ShortCut = 16452 OnClick = btnMoveDownColumnClick end object N1: TMenuItem Caption = '-' end object menuCreateIndex: TMenuItem Caption = 'Create new index' ImageIndex = 13 end object menuAddToIndex: TMenuItem Caption = 'Add to index' ImageIndex = 13 end end end