mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-06 00:58:04 +02:00
104 lines
2.7 KiB
Plaintext
104 lines
2.7 KiB
Plaintext
object TabOrderDialog: TTabOrderDialog
|
|
Left = 349
|
|
Height = 419
|
|
Top = 112
|
|
Width = 440
|
|
ActiveControl = ItemTreeview
|
|
Caption = 'TabOrderDialog'
|
|
ClientHeight = 419
|
|
ClientWidth = 440
|
|
OnCreate = TabOrderDialogCREATE
|
|
OnShow = FormShow
|
|
LCLVersion = '1.7'
|
|
Visible = True
|
|
object ArrowUp: TSpeedButton
|
|
AnchorSideRight.Control = PanelSortByPosition
|
|
AnchorSideRight.Side = asrCenter
|
|
Left = 375
|
|
Height = 25
|
|
Top = 91
|
|
Width = 25
|
|
Anchors = [akTop, akRight]
|
|
BorderSpacing.Around = 6
|
|
OnClick = UpSpeedbuttonCLICK
|
|
ShowHint = True
|
|
ParentShowHint = False
|
|
end
|
|
object ArrowDown: TSpeedButton
|
|
AnchorSideRight.Control = PanelSortByPosition
|
|
AnchorSideRight.Side = asrCenter
|
|
Left = 375
|
|
Height = 25
|
|
Top = 147
|
|
Width = 25
|
|
Anchors = [akTop, akRight]
|
|
BorderSpacing.Around = 6
|
|
OnClick = DownSpeedbuttonCLICK
|
|
ShowHint = True
|
|
ParentShowHint = False
|
|
end
|
|
object ItemTreeview: TTreeView
|
|
AnchorSideLeft.Control = Owner
|
|
AnchorSideTop.Control = Owner
|
|
AnchorSideRight.Control = PanelSortByPosition
|
|
Left = 6
|
|
Height = 402
|
|
Top = 6
|
|
Width = 330
|
|
Anchors = [akTop, akLeft, akRight, akBottom]
|
|
BorderSpacing.Around = 6
|
|
HideSelection = False
|
|
ReadOnly = True
|
|
RightClickSelect = True
|
|
TabOrder = 0
|
|
OnKeyDown = ItemTreeviewKeyDown
|
|
OnSelectionChanged = ItemTreeviewSelectionChanged
|
|
Options = [tvoAutoItemHeight, tvoKeepCollapsedNodes, tvoReadOnly, tvoRightClickSelect, tvoShowButtons, tvoShowLines, tvoShowRoot, tvoToolTips]
|
|
end
|
|
object PanelSortByPosition: TPanel
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Control = Owner
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 342
|
|
Height = 58
|
|
Top = 192
|
|
Width = 93
|
|
Anchors = [akTop, akRight]
|
|
AutoSize = True
|
|
BorderSpacing.Around = 5
|
|
BevelOuter = bvLowered
|
|
ClientHeight = 58
|
|
ClientWidth = 93
|
|
TabOrder = 1
|
|
object SortByPositionButton: TBitBtn
|
|
AnchorSideLeft.Control = PanelSortByPosition
|
|
AnchorSideLeft.Side = asrCenter
|
|
AnchorSideTop.Control = PanelSortByPosition
|
|
Left = 34
|
|
Height = 25
|
|
Top = 4
|
|
Width = 25
|
|
BorderSpacing.Around = 3
|
|
GlyphShowMode = gsmAlways
|
|
OnClick = SortByPositionButtonClick
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
TabOrder = 0
|
|
end
|
|
object CheckBoxSortRecursivly: TCheckBox
|
|
AnchorSideLeft.Control = PanelSortByPosition
|
|
AnchorSideTop.Control = SortByPositionButton
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 4
|
|
Height = 22
|
|
Top = 32
|
|
Width = 85
|
|
BorderSpacing.Around = 3
|
|
Caption = 'recursively'
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
TabOrder = 1
|
|
end
|
|
end
|
|
end
|