mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-06-03 04:58:22 +02:00
414 lines
9.6 KiB
Plaintext
414 lines
9.6 KiB
Plaintext
object EdtTbConfigForm: TEdtTbConfigForm
|
|
Left = 375
|
|
Height = 457
|
|
Top = 200
|
|
Width = 772
|
|
Caption = 'EdtTbConfigForm'
|
|
ClientHeight = 457
|
|
ClientWidth = 772
|
|
OnCreate = FormCreate
|
|
OnDestroy = FormDestroy
|
|
LCLVersion = '1.3'
|
|
object lblMenuTree: TLabel
|
|
AnchorSideLeft.Control = TV
|
|
AnchorSideLeft.Side = asrCenter
|
|
Left = 166
|
|
Height = 17
|
|
Top = 14
|
|
Width = 80
|
|
Caption = 'lblMenuTree'
|
|
ParentColor = False
|
|
end
|
|
object lblToolbar: TLabel
|
|
AnchorSideLeft.Control = lvToolbar
|
|
AnchorSideLeft.Side = asrCenter
|
|
AnchorSideTop.Control = lblMenuTree
|
|
Left = 572
|
|
Height = 17
|
|
Top = 14
|
|
Width = 61
|
|
Caption = 'lblToolbar'
|
|
ParentColor = False
|
|
end
|
|
object btnRemove: TSpeedButton
|
|
AnchorSideLeft.Control = btnAdd
|
|
AnchorSideTop.Control = btnAdd
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 415
|
|
Height = 26
|
|
Top = 122
|
|
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 = 95
|
|
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 = 173
|
|
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 = 200
|
|
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 = 2
|
|
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 btnHelp: TBitBtn
|
|
AnchorSideBottom.Control = pnlButtons
|
|
AnchorSideBottom.Side = asrBottom
|
|
Left = 16
|
|
Height = 25
|
|
Top = 11
|
|
Width = 75
|
|
Anchors = [akLeft, akBottom]
|
|
BorderSpacing.Bottom = 6
|
|
Caption = 'Help'
|
|
OnClick = btnHelpClick
|
|
TabOrder = 2
|
|
end
|
|
object cbProfile: TComboBox
|
|
AnchorSideLeft.Control = pnlButtons
|
|
AnchorSideLeft.Side = asrCenter
|
|
AnchorSideBottom.Control = pnlButtons
|
|
AnchorSideBottom.Side = asrCenter
|
|
Left = 336
|
|
Height = 27
|
|
Top = 7
|
|
Width = 100
|
|
Anchors = [akLeft, akBottom]
|
|
BorderSpacing.Bottom = 6
|
|
ItemHeight = 17
|
|
ItemIndex = 0
|
|
Items.Strings = (
|
|
'All'
|
|
'Design'
|
|
'Debug'
|
|
'HTML'
|
|
'Custom'
|
|
''
|
|
)
|
|
OnChange = cbProfileChange
|
|
TabOrder = 3
|
|
Text = 'All'
|
|
end
|
|
object lblProfile: TLabel
|
|
AnchorSideTop.Control = cbProfile
|
|
AnchorSideTop.Side = asrCenter
|
|
AnchorSideRight.Control = cbProfile
|
|
Left = 284
|
|
Height = 17
|
|
Top = 12
|
|
Width = 42
|
|
Anchors = [akTop, akRight]
|
|
BorderSpacing.Right = 10
|
|
Caption = 'Profile'
|
|
ParentColor = False
|
|
end
|
|
end
|
|
object TV: TTreeView
|
|
AnchorSideLeft.Control = FilterEdit
|
|
AnchorSideTop.Control = FilterEdit
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Control = Splitter1
|
|
AnchorSideBottom.Control = pnlButtons
|
|
Left = 16
|
|
Height = 339
|
|
Top = 70
|
|
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
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 16
|
|
Height = 27
|
|
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 = lvToolbar
|
|
AnchorSideRight.Side = asrBottom
|
|
AnchorSideBottom.Control = pnlButtons
|
|
Left = 661
|
|
Height = 27
|
|
Top = 382
|
|
Width = 100
|
|
Anchors = [akRight, akBottom]
|
|
BorderSpacing.Bottom = 6
|
|
ItemHeight = 17
|
|
ItemIndex = 0
|
|
Items.Strings = (
|
|
'Top'
|
|
'Bottom'
|
|
'Right'
|
|
'Left'
|
|
)
|
|
OnChange = cbPosChange
|
|
TabOrder = 3
|
|
Text = 'Top'
|
|
end
|
|
object lblpos: TLabel
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = cbPos
|
|
AnchorSideTop.Side = asrCenter
|
|
AnchorSideRight.Control = cbPos
|
|
Left = 618
|
|
Height = 17
|
|
Top = 387
|
|
Width = 37
|
|
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 = 339
|
|
Top = 70
|
|
Width = 9
|
|
Align = alNone
|
|
Anchors = [akTop, akBottom]
|
|
end
|
|
object lvToolbar: TListView
|
|
AnchorSideLeft.Control = btnAdd
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = TV
|
|
AnchorSideBottom.Control = pnlButtons
|
|
Left = 443
|
|
Height = 308
|
|
Top = 70
|
|
Width = 318
|
|
Anchors = [akTop, akLeft, akBottom]
|
|
BorderSpacing.Left = 6
|
|
BorderSpacing.Bottom = 37
|
|
Columns = <
|
|
item
|
|
AutoSize = True
|
|
Caption = 'Name'
|
|
Width = 100
|
|
end
|
|
item
|
|
AutoSize = True
|
|
Caption = 'Profile'
|
|
Visible = False
|
|
Width = 0
|
|
end>
|
|
PopupMenu = puMenuItems
|
|
ScrollBars = ssAutoBoth
|
|
ShowColumnHeaders = False
|
|
TabOrder = 5
|
|
ViewStyle = vsReport
|
|
OnSelectItem = lvToolbarSelectItem
|
|
end
|
|
object sbAddDivider: TSpeedButton
|
|
AnchorSideLeft.Control = btnAdd
|
|
AnchorSideTop.Control = btnMoveDown
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 415
|
|
Height = 26
|
|
Top = 276
|
|
Width = 22
|
|
BorderSpacing.Top = 50
|
|
OnClick = btnAddDividerClick
|
|
ShowHint = True
|
|
ParentShowHint = False
|
|
end
|
|
object lbSelect: TLabel
|
|
AnchorSideLeft.Control = lvToolbar
|
|
AnchorSideTop.Control = FilterEdit
|
|
AnchorSideRight.Control = lvToolbar
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 706
|
|
Height = 17
|
|
Top = 37
|
|
Width = 55
|
|
Anchors = [akTop, akRight]
|
|
Caption = 'lbSelect'
|
|
ParentColor = False
|
|
Visible = False
|
|
end
|
|
object btnClear: TSpeedButton
|
|
AnchorSideLeft.Control = btnAdd
|
|
AnchorSideBottom.Control = lvToolbar
|
|
AnchorSideBottom.Side = asrBottom
|
|
Left = 415
|
|
Height = 26
|
|
Top = 352
|
|
Width = 23
|
|
Anchors = [akLeft, akBottom]
|
|
Enabled = False
|
|
OnClick = btnClearClick
|
|
ShowHint = True
|
|
ParentShowHint = False
|
|
end
|
|
object btnShow: TButton
|
|
Left = 443
|
|
Height = 25
|
|
Top = 384
|
|
Width = 50
|
|
Caption = 'Show'
|
|
OnClick = btnShowClick
|
|
TabOrder = 6
|
|
Visible = False
|
|
end
|
|
object btnHide: TButton
|
|
Left = 496
|
|
Height = 25
|
|
Top = 384
|
|
Width = 50
|
|
Caption = 'Hide'
|
|
OnClick = btnHideClick
|
|
TabOrder = 7
|
|
Visible = False
|
|
end
|
|
object puMenuItems: TPopupMenu
|
|
OnPopup = puMenuItemsPopup
|
|
left = 421
|
|
top = 16
|
|
object miAll: TMenuItem
|
|
AutoCheck = True
|
|
Caption = 'All'
|
|
OnClick = miAllClick
|
|
end
|
|
object miDesign: TMenuItem
|
|
AutoCheck = True
|
|
Caption = 'Design'
|
|
OnClick = miDesignClick
|
|
end
|
|
object miDebug: TMenuItem
|
|
AutoCheck = True
|
|
Caption = 'Debug'
|
|
OnClick = miDebugClick
|
|
end
|
|
object miHTML: TMenuItem
|
|
AutoCheck = True
|
|
Caption = 'HTML'
|
|
OnClick = miHTMLClick
|
|
end
|
|
object miCustom: TMenuItem
|
|
AutoCheck = True
|
|
Caption = 'Custom'
|
|
OnClick = miCustomClick
|
|
end
|
|
end
|
|
end
|