lazarus/ide/toolbarconfig.lfm

223 lines
5.5 KiB
Plaintext

object ToolBarConfig: TToolBarConfig
Left = 246
Height = 457
Top = 129
Width = 696
Caption = 'ToolBarConfig'
ClientHeight = 457
ClientWidth = 696
Constraints.MinHeight = 350
Constraints.MinWidth = 500
Position = poScreenCenter
LCLVersion = '4.99.0.0'
OnClose = FormClose
OnCreate = FormCreate
OnDestroy = FormDestroy
object lblMenuTree: TLabel
AnchorSideLeft.Control = TV
AnchorSideLeft.Side = asrCenter
AnchorSideTop.Control = Owner
Left = 147
Height = 15
Top = 6
Width = 70
BorderSpacing.Top = 6
BorderSpacing.Bottom = 6
Caption = 'lblMenuTree'
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
end
object lblToolbar: TLabel
AnchorSideLeft.Control = lvToolbar
AnchorSideLeft.Side = asrCenter
AnchorSideTop.Control = lblMenuTree
Left = 523
Height = 15
Top = 6
Width = 54
BorderSpacing.Bottom = 6
Caption = 'lblToolbar'
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
end
object btnRemove: TSpeedButton
AnchorSideLeft.Control = btnAdd
AnchorSideTop.Control = btnAdd
AnchorSideTop.Side = asrBottom
Left = 372
Height = 26
Top = 115
Width = 26
BorderSpacing.Top = 3
Enabled = False
ShowHint = True
ParentShowHint = False
OnClick = btnRemoveClick
end
object btnAdd: TSpeedButton
AnchorSideLeft.Control = Splitter1
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = TV
Left = 372
Height = 26
Top = 86
Width = 26
BorderSpacing.Left = 3
BorderSpacing.Top = 30
Enabled = False
ShowHint = True
ParentShowHint = False
OnClick = btnAddClick
end
object btnMoveUp: TSpeedButton
AnchorSideLeft.Control = btnAdd
AnchorSideTop.Control = btnRemove
AnchorSideTop.Side = asrBottom
Left = 372
Height = 26
Top = 166
Width = 26
BorderSpacing.Top = 25
Enabled = False
ShowHint = True
ParentShowHint = False
OnClick = btnMoveUpClick
end
object btnMoveDown: TSpeedButton
AnchorSideLeft.Control = btnAdd
AnchorSideTop.Control = btnMoveUp
AnchorSideTop.Side = asrBottom
Left = 372
Height = 26
Top = 195
Width = 26
BorderSpacing.Top = 3
Enabled = False
ShowHint = True
ParentShowHint = False
OnClick = btnMoveDownClick
end
object TV: TTreeView
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = FilterEdit
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Splitter1
Left = 8
Height = 353
Top = 56
Width = 349
Anchors = [akTop, akLeft, akRight, akBottom]
BorderSpacing.Left = 8
BorderSpacing.Top = 6
BorderSpacing.Right = 3
BorderSpacing.Bottom = 6
HideSelection = False
ReadOnly = True
ScrollBars = ssAutoBoth
TabOrder = 1
Options = [tvoAutoItemHeight, tvoKeepCollapsedNodes, tvoReadOnly, tvoShowButtons, tvoShowLines, tvoShowRoot, tvoToolTips]
OnDblClick = TVDblClick
OnSelectionChanged = TVSelectionChanged
end
object FilterEdit: TTreeFilterEdit
AnchorSideLeft.Control = TV
AnchorSideTop.Control = lblMenuTree
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = TV
AnchorSideRight.Side = asrBottom
Left = 8
Height = 23
Top = 27
Width = 349
ButtonWidth = 23
Anchors = [akTop, akLeft, akRight]
NumGlyphs = 1
MaxLength = 0
ParentFont = False
TabOrder = 0
FilteredTreeview = TV
OnFilterNode = FilterEditFilterNode
end
object Splitter1: TSplitter
AnchorSideLeft.Control = TV
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = TV
AnchorSideBottom.Control = TV
AnchorSideBottom.Side = asrBottom
Left = 360
Height = 353
Top = 56
Width = 9
Align = alNone
Anchors = [akTop, akBottom]
end
object lvToolbar: TListView
AnchorSideLeft.Control = btnAdd
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = TV
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = TV
AnchorSideBottom.Side = asrBottom
Left = 413
Height = 353
Top = 56
Width = 275
Anchors = [akTop, akLeft, akRight, akBottom]
BorderSpacing.Left = 15
BorderSpacing.Right = 8
Columns = <
item
AutoSize = True
Caption = 'Name'
Width = 47
end>
HideSelection = False
ReadOnly = True
ScrollBars = ssAutoBoth
ShowColumnHeaders = False
TabOrder = 3
ViewStyle = vsReport
OnDblClick = lvToolbarDblClick
OnEnter = lvToolbarEnterExit
OnExit = lvToolbarEnterExit
OnSelectItem = lvToolbarSelectItem
end
object btnAddDivider: TSpeedButton
AnchorSideLeft.Control = btnAdd
AnchorSideTop.Control = btnMoveDown
AnchorSideTop.Side = asrBottom
AnchorSideBottom.Control = lvToolbar
AnchorSideBottom.Side = asrBottom
Left = 372
Height = 26
Top = 353
Width = 26
Anchors = [akLeft, akBottom]
BorderSpacing.Bottom = 30
ShowHint = True
ParentShowHint = False
OnClick = btnAddDividerClick
end
object pnlButtons: TButtonPanel
Left = 6
Height = 34
Top = 417
Width = 684
OKButton.Name = 'OKButton'
OKButton.DefaultCaption = True
HelpButton.Name = 'HelpButton'
HelpButton.DefaultCaption = True
HelpButton.OnClick = btnHelpClick
CloseButton.Name = 'CloseButton'
CloseButton.DefaultCaption = True
CancelButton.Name = 'CancelButton'
CancelButton.DefaultCaption = True
TabOrder = 4
ShowButtons = [pbOK, pbCancel, pbHelp]
ShowGlyphs = [pbOK, pbCancel, pbHelp]
end
end