Files
HeidiSQL/source/table_editor.lfm

1272 lines
39 KiB
Plaintext

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