lazarus/components/editortoolbar/edttbconfigfrm.lfm

340 lines
8.3 KiB
Plaintext

object EdtTbConfigForm: TEdtTbConfigForm
Left = 375
Height = 457
Top = 200
Width = 772
Caption = 'EdtTbConfigForm'
ClientHeight = 457
ClientWidth = 772
OnCreate = FormCreate
LCLVersion = '1.3'
object lblMenuTree: TLabel
Left = 16
Height = 17
Top = 14
Width = 81
Caption = 'lblMenuTree'
ParentColor = False
end
object lblToolbar: TLabel
AnchorSideLeft.Control = lbToolbar
AnchorSideTop.Control = lblMenuTree
Left = 443
Height = 17
Top = 14
Width = 62
Caption = 'lblToolbar'
ParentColor = False
end
object btnRemove: TSpeedButton
AnchorSideLeft.Control = btnAdd
AnchorSideTop.Control = btnAdd
AnchorSideTop.Side = asrBottom
Left = 415
Height = 26
Top = 120
Width = 22
BorderSpacing.Top = 1
Enabled = False
OnClick = btnRemoveClick
ShowHint = True
ParentShowHint = False
end
object btnAdd: TSpeedButton
AnchorSideLeft.Control = Splitter1
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = TV
Left = 415
Height = 26
Top = 93
Width = 22
BorderSpacing.Left = 6
BorderSpacing.Top = 25
Enabled = False
OnClick = btnAddClick
ShowHint = True
ParentShowHint = False
end
object btnMoveUp: TSpeedButton
AnchorSideLeft.Control = btnRemove
AnchorSideTop.Control = btnRemove
AnchorSideTop.Side = asrBottom
Left = 415
Height = 26
Top = 171
Width = 22
BorderSpacing.Top = 25
Enabled = False
OnClick = btnMoveUpClick
ShowHint = True
ParentShowHint = False
end
object btnMoveDown: TSpeedButton
AnchorSideLeft.Control = btnMoveUp
AnchorSideTop.Control = btnMoveUp
AnchorSideTop.Side = asrBottom
Left = 415
Height = 26
Top = 198
Width = 22
BorderSpacing.Top = 1
Enabled = False
OnClick = btnMoveDownClick
ShowHint = True
ParentShowHint = False
end
object pnlButtons: TPanel
Left = 0
Height = 42
Top = 415
Width = 772
Align = alBottom
BevelOuter = bvNone
ClientHeight = 42
ClientWidth = 772
Color = clGreen
ParentColor = False
TabOrder = 4
object Bevel1: TBevel
Left = 0
Height = 2
Top = 0
Width = 772
Align = alTop
end
object btnOK: TButton
AnchorSideRight.Control = btnCancel
AnchorSideBottom.Control = pnlButtons
AnchorSideBottom.Side = asrBottom
Left = 595
Height = 25
Top = 11
Width = 75
Anchors = [akRight, akBottom]
AutoSize = True
BorderSpacing.Right = 6
BorderSpacing.Bottom = 6
BorderSpacing.InnerBorder = 4
Caption = 'btnOK'
Constraints.MaxHeight = 25
Constraints.MinHeight = 25
Constraints.MinWidth = 75
ModalResult = 1
OnClick = btnOKClick
TabOrder = 0
end
object btnCancel: TButton
AnchorSideRight.Control = pnlButtons
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = pnlButtons
AnchorSideBottom.Side = asrBottom
Left = 676
Height = 25
Top = 11
Width = 90
Anchors = [akRight, akBottom]
AutoSize = True
BorderSpacing.Right = 6
BorderSpacing.Bottom = 6
BorderSpacing.InnerBorder = 4
Cancel = True
Caption = 'btnCancel'
Constraints.MaxHeight = 25
Constraints.MinHeight = 25
Constraints.MinWidth = 75
ModalResult = 2
TabOrder = 1
end
object btnExpert: TButton
AnchorSideLeft.Control = pnlButtons
AnchorSideBottom.Control = pnlButtons
AnchorSideBottom.Side = asrBottom
Left = 6
Height = 25
Top = 11
Width = 75
Anchors = [akLeft, akBottom]
BorderSpacing.Left = 6
BorderSpacing.Bottom = 6
Caption = 'Expert'
OnClick = btnExpertClick
TabOrder = 2
Visible = False
end
object btnExpand: TButton
AnchorSideLeft.Control = btnExpert
AnchorSideLeft.Side = asrBottom
AnchorSideBottom.Control = pnlButtons
AnchorSideBottom.Side = asrBottom
Left = 87
Height = 25
Top = 11
Width = 75
Anchors = [akLeft, akBottom]
BorderSpacing.Left = 6
BorderSpacing.Bottom = 6
Caption = 'Expand'
OnClick = btnExpandClick
TabOrder = 3
Visible = False
end
object btnSections: TButton
AnchorSideLeft.Control = btnExpand
AnchorSideLeft.Side = asrBottom
AnchorSideBottom.Control = pnlButtons
AnchorSideBottom.Side = asrBottom
Left = 168
Height = 25
Top = 11
Width = 75
Anchors = [akLeft, akBottom]
BorderSpacing.Left = 6
BorderSpacing.Bottom = 6
Caption = 'Sections'
OnClick = btnSectionsClick
TabOrder = 4
Visible = False
end
object btnCompress: TButton
AnchorSideLeft.Control = btnSections
AnchorSideLeft.Side = asrBottom
AnchorSideBottom.Control = pnlButtons
AnchorSideBottom.Side = asrBottom
Left = 249
Height = 25
Top = 11
Width = 75
Anchors = [akLeft, akBottom]
BorderSpacing.Left = 6
BorderSpacing.Bottom = 6
Caption = 'Compress'
OnClick = btnCompressClick
TabOrder = 5
Visible = False
end
end
object btnAddDivider: TButton
AnchorSideLeft.Control = lblToolbar
AnchorSideBottom.Control = pnlButtons
Left = 443
Height = 25
Top = 384
Width = 116
Anchors = [akLeft, akBottom]
AutoSize = True
BorderSpacing.Bottom = 6
BorderSpacing.InnerBorder = 4
Caption = 'btnAddDivider'
Constraints.MaxHeight = 25
Constraints.MinHeight = 25
Constraints.MinWidth = 75
OnClick = btnAddDividerClick
TabOrder = 3
end
object lbToolbar: TListBox
AnchorSideLeft.Control = btnAdd
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = TV
AnchorSideBottom.Control = btnAddDivider
Left = 443
Height = 310
Top = 68
Width = 318
Anchors = [akTop, akLeft, akRight, akBottom]
BorderSpacing.Left = 6
BorderSpacing.Bottom = 6
ItemHeight = 0
OnSelectionChange = lbToolbarSelectionChange
TabOrder = 2
end
object TV: TTreeView
AnchorSideLeft.Control = lblMenuTree
AnchorSideTop.Control = FilterEdit
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Splitter1
AnchorSideBottom.Control = pnlButtons
Left = 16
Height = 341
Top = 68
Width = 381
Anchors = [akTop, akLeft, akRight, akBottom]
BorderSpacing.Top = 6
BorderSpacing.Right = 3
BorderSpacing.Bottom = 6
ReadOnly = True
ScrollBars = ssAutoBoth
TabOrder = 1
OnSelectionChanged = TVSelectionChanged
Options = [tvoAutoItemHeight, tvoHideSelection, tvoKeepCollapsedNodes, tvoReadOnly, tvoShowButtons, tvoShowLines, tvoShowRoot, tvoToolTips]
end
object FilterEdit: TTreeFilterEdit
AnchorSideLeft.Control = lblMenuTree
AnchorSideTop.Control = lblMenuTree
AnchorSideTop.Side = asrBottom
Left = 16
Height = 25
Top = 37
Width = 192
UseFormActivate = True
ButtonWidth = 23
NumGlyphs = 1
BorderSpacing.Top = 6
MaxLength = 0
ParentFont = False
TabOrder = 0
FilteredTreeview = TV
ExpandAllInitially = True
end
object cbPos: TComboBox
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Side = asrCenter
AnchorSideRight.Control = lbToolbar
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = pnlButtons
Left = 661
Height = 25
Top = 384
Width = 100
Anchors = [akRight, akBottom]
BorderSpacing.Bottom = 6
ItemHeight = 0
ItemIndex = 0
Items.Strings = (
'Top'
'Bottom'
'Right'
'Left'
)
OnChange = cbPosChange
TabOrder = 5
Text = 'Top'
end
object lblpos: TLabel
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = cbPos
AnchorSideTop.Side = asrCenter
AnchorSideRight.Control = cbPos
Left = 617
Height = 17
Top = 388
Width = 38
Anchors = [akTop, akRight]
BorderSpacing.Right = 6
Caption = 'lblpos'
ParentColor = False
end
object Splitter1: TSplitter
AnchorSideLeft.Control = TV
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = TV
AnchorSideBottom.Control = TV
AnchorSideBottom.Side = asrBottom
Left = 400
Height = 341
Top = 68
Width = 9
Align = alNone
Anchors = [akTop, akBottom]
end
end