mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-06-01 20:12:36 +02:00
340 lines
8.3 KiB
Plaintext
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
|