mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-05-20 21:22:44 +02:00
306 lines
7.6 KiB
Plaintext
306 lines
7.6 KiB
Plaintext
object TreeViewItemsEditorForm: TTreeViewItemsEditorForm
|
|
Left = 304
|
|
Height = 261
|
|
Top = 189
|
|
Width = 510
|
|
HorzScrollBar.Page = 509
|
|
VertScrollBar.Page = 260
|
|
ActiveControl = BtnOK
|
|
BorderIcons = [biSystemMenu, biHelp]
|
|
Caption = 'TreeView Items Editor'
|
|
ClientHeight = 261
|
|
ClientWidth = 510
|
|
Constraints.MinHeight = 240
|
|
Constraints.MinWidth = 400
|
|
OnCreate = FormCreate
|
|
Position = poScreenCenter
|
|
object BtnOK: TBitBtn
|
|
Left = 189
|
|
Height = 25
|
|
Top = 229
|
|
Width = 75
|
|
Anchors = [akRight, akBottom]
|
|
Caption = '&OK'
|
|
Kind = bkOK
|
|
ModalResult = 1
|
|
NumGlyphs = 0
|
|
TabOrder = 0
|
|
end
|
|
object BtnCancel: TBitBtn
|
|
Left = 269
|
|
Height = 25
|
|
Top = 229
|
|
Width = 75
|
|
Anchors = [akRight, akBottom]
|
|
Cancel = True
|
|
Caption = 'Cancel'
|
|
Kind = bkCancel
|
|
ModalResult = 2
|
|
NumGlyphs = 0
|
|
TabOrder = 1
|
|
end
|
|
object BtnApply: TBitBtn
|
|
Left = 349
|
|
Height = 25
|
|
Top = 229
|
|
Width = 75
|
|
Anchors = [akRight, akBottom]
|
|
Caption = '&Apply'
|
|
NumGlyphs = 0
|
|
OnClick = btnApplyClick
|
|
TabOrder = 2
|
|
end
|
|
object BtnHelp: TBitBtn
|
|
Left = 429
|
|
Height = 25
|
|
Top = 229
|
|
Width = 75
|
|
Anchors = [akRight, akBottom]
|
|
Caption = '&Help'
|
|
Kind = bkHelp
|
|
NumGlyphs = 0
|
|
TabOrder = 3
|
|
end
|
|
object GroupBox1: TGroupBox
|
|
Left = 8
|
|
Height = 213
|
|
Top = 8
|
|
Width = 293
|
|
Anchors = [akTop, akLeft, akRight, akBottom]
|
|
Caption = 'Items'
|
|
ClientHeight = 194
|
|
ClientWidth = 289
|
|
TabOrder = 4
|
|
object TreeView1: TTreeView
|
|
AnchorSideLeft.Control = GroupBox1
|
|
AnchorSideTop.Control = GroupBox1
|
|
AnchorSideBottom.Control = GroupBox1
|
|
AnchorSideBottom.Side = asrBottom
|
|
Left = 5
|
|
Height = 184
|
|
Top = 5
|
|
Width = 166
|
|
Anchors = [akTop, akLeft, akRight, akBottom]
|
|
BorderSpacing.Left = 5
|
|
BorderSpacing.Top = 5
|
|
BorderSpacing.Bottom = 5
|
|
DefaultItemHeight = 19
|
|
HideSelection = False
|
|
TabOrder = 0
|
|
OnSelectionChanged = TreeView1SelectionChanged
|
|
Options = [tvoAutoItemHeight, tvoKeepCollapsedNodes, tvoShowButtons, tvoShowLines, tvoShowRoot, tvoToolTips]
|
|
end
|
|
object BtnNewItem: TButton
|
|
Tag = 1
|
|
AnchorSideLeft.Control = TreeView1
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = GroupBox1
|
|
AnchorSideRight.Control = GroupBox1
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 176
|
|
Height = 25
|
|
Top = 5
|
|
Width = 108
|
|
Anchors = [akTop, akLeft, akRight]
|
|
BorderSpacing.Left = 5
|
|
BorderSpacing.Top = 5
|
|
BorderSpacing.Right = 5
|
|
Caption = '&New Item'
|
|
Default = True
|
|
OnClick = BtnNewItemClick
|
|
TabOrder = 1
|
|
end
|
|
object BtnNewSubItem: TButton
|
|
AnchorSideLeft.Control = BtnNewItem
|
|
AnchorSideTop.Control = BtnNewItem
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Control = BtnNewItem
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 176
|
|
Height = 25
|
|
Top = 35
|
|
Width = 108
|
|
Anchors = [akTop, akLeft, akRight]
|
|
BorderSpacing.Top = 5
|
|
Caption = 'N&ew SubItem'
|
|
OnClick = BtnNewItemClick
|
|
TabOrder = 2
|
|
end
|
|
object BtnDelete: TButton
|
|
AnchorSideLeft.Control = BtnNewSubItem
|
|
AnchorSideTop.Control = BtnNewSubItem
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Control = BtnNewSubItem
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 176
|
|
Height = 25
|
|
Top = 65
|
|
Width = 108
|
|
Anchors = [akTop, akLeft, akRight]
|
|
BorderSpacing.Top = 5
|
|
Caption = '&Delete'
|
|
OnClick = btnDeleteClick
|
|
TabOrder = 3
|
|
end
|
|
object BtnLoad: TButton
|
|
AnchorSideLeft.Control = BtnDelete
|
|
AnchorSideTop.Control = BtnDelete
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Control = BtnDelete
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 176
|
|
Height = 25
|
|
Top = 95
|
|
Width = 108
|
|
Anchors = [akTop, akLeft, akRight]
|
|
BorderSpacing.Top = 5
|
|
Caption = '&Load'
|
|
OnClick = btnLoadClick
|
|
TabOrder = 4
|
|
end
|
|
object BtnSave: TButton
|
|
AnchorSideLeft.Control = BtnLoad
|
|
AnchorSideTop.Control = BtnLoad
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Control = BtnLoad
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 176
|
|
Height = 25
|
|
Top = 125
|
|
Width = 108
|
|
Anchors = [akTop, akLeft, akRight]
|
|
BorderSpacing.Top = 5
|
|
Caption = '&Save'
|
|
OnClick = btnSaveClick
|
|
TabOrder = 5
|
|
end
|
|
end
|
|
object GroupBox2: TGroupBox
|
|
Left = 299
|
|
Height = 213
|
|
Top = 8
|
|
Width = 205
|
|
Anchors = [akTop, akRight, akBottom]
|
|
Caption = 'Item Properties'
|
|
ClientHeight = 194
|
|
ClientWidth = 201
|
|
TabOrder = 5
|
|
object LabelText: TLabel
|
|
AnchorSideLeft.Control = GroupBox2
|
|
AnchorSideTop.Control = GroupBox2
|
|
Left = 5
|
|
Height = 14
|
|
Top = 5
|
|
Width = 27
|
|
BorderSpacing.Left = 5
|
|
BorderSpacing.Top = 5
|
|
Caption = 'Text:'
|
|
FocusControl = edtText
|
|
ParentColor = False
|
|
end
|
|
object LabelImageIndex: TLabel
|
|
AnchorSideLeft.Control = LabelText
|
|
AnchorSideTop.Control = edtText
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 5
|
|
Height = 14
|
|
Top = 49
|
|
Width = 66
|
|
BorderSpacing.Top = 5
|
|
Caption = 'Image Index:'
|
|
FocusControl = edtIndexImg
|
|
ParentColor = False
|
|
end
|
|
object LabelSelectedIndex: TLabel
|
|
AnchorSideLeft.Control = LabelImageIndex
|
|
AnchorSideTop.Control = edtIndexImg
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 5
|
|
Height = 14
|
|
Top = 93
|
|
Width = 75
|
|
BorderSpacing.Top = 5
|
|
Caption = 'Selected index:'
|
|
FocusControl = edtIndexSel
|
|
ParentColor = False
|
|
end
|
|
object LabelStateIndex: TLabel
|
|
AnchorSideLeft.Control = LabelSelectedIndex
|
|
AnchorSideTop.Control = edtIndexSel
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 5
|
|
Height = 14
|
|
Top = 137
|
|
Width = 62
|
|
BorderSpacing.Top = 5
|
|
Caption = 'State Index:'
|
|
FocusControl = edtIndexState
|
|
ParentColor = False
|
|
end
|
|
object edtText: TEdit
|
|
AnchorSideLeft.Control = LabelText
|
|
AnchorSideTop.Control = LabelText
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Control = GroupBox2
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 5
|
|
Height = 23
|
|
Top = 21
|
|
Width = 191
|
|
Anchors = [akTop, akLeft, akRight]
|
|
BorderSpacing.Top = 2
|
|
BorderSpacing.Right = 5
|
|
OnChange = Edit1Change
|
|
TabOrder = 0
|
|
end
|
|
object edtIndexImg: TEdit
|
|
AnchorSideLeft.Control = LabelImageIndex
|
|
AnchorSideTop.Control = LabelImageIndex
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 5
|
|
Height = 23
|
|
Top = 65
|
|
Width = 48
|
|
BorderSpacing.Top = 2
|
|
OnEditingDone = edtIndexStateEditingDone
|
|
TabOrder = 1
|
|
end
|
|
object edtIndexSel: TEdit
|
|
AnchorSideLeft.Control = LabelSelectedIndex
|
|
AnchorSideTop.Control = LabelSelectedIndex
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 5
|
|
Height = 23
|
|
Top = 109
|
|
Width = 48
|
|
BorderSpacing.Top = 2
|
|
OnEditingDone = edtIndexStateEditingDone
|
|
TabOrder = 2
|
|
end
|
|
object edtIndexState: TEdit
|
|
AnchorSideLeft.Control = LabelStateIndex
|
|
AnchorSideTop.Control = LabelStateIndex
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 5
|
|
Height = 23
|
|
Top = 153
|
|
Width = 48
|
|
BorderSpacing.Top = 2
|
|
OnEditingDone = edtIndexStateEditingDone
|
|
TabOrder = 3
|
|
end
|
|
end
|
|
object OpenDialog1: TOpenDialog
|
|
Title = 'Open'
|
|
FilterIndex = 0
|
|
left = 176
|
|
top = 234
|
|
end
|
|
object SaveDialog1: TSaveDialog
|
|
Title = 'Save'
|
|
FilterIndex = 0
|
|
left = 176
|
|
top = 234
|
|
end
|
|
end
|