mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-07 03:06:12 +02:00
279 lines
7.2 KiB
Plaintext
279 lines
7.2 KiB
Plaintext
object ListViewItemsEditorForm: TListViewItemsEditorForm
|
|
Left = 293
|
|
Height = 246
|
|
Top = 179
|
|
Width = 510
|
|
ActiveControl = BtnOK
|
|
BorderIcons = [biSystemMenu, biHelp]
|
|
Caption = 'ListView Items Editor'
|
|
ClientHeight = 246
|
|
ClientWidth = 510
|
|
Constraints.MinHeight = 200
|
|
Constraints.MinWidth = 400
|
|
OnCreate = FormCreate
|
|
Position = poScreenCenter
|
|
LCLVersion = '0.9.27'
|
|
object BtnOK: TBitBtn
|
|
AnchorSideRight.Control = BtnCancel
|
|
AnchorSideBottom.Control = Owner
|
|
AnchorSideBottom.Side = asrBottom
|
|
Left = 183
|
|
Height = 36
|
|
Top = 204
|
|
Width = 75
|
|
Anchors = [akRight, akBottom]
|
|
AutoSize = True
|
|
BorderSpacing.Around = 6
|
|
Caption = '&OK'
|
|
Constraints.MinHeight = 25
|
|
Constraints.MinWidth = 75
|
|
Kind = bkOK
|
|
ModalResult = 1
|
|
NumGlyphs = 0
|
|
TabOrder = 0
|
|
end
|
|
object BtnCancel: TBitBtn
|
|
AnchorSideRight.Control = BtnApply
|
|
AnchorSideBottom.Control = Owner
|
|
AnchorSideBottom.Side = asrBottom
|
|
Left = 264
|
|
Height = 32
|
|
Top = 208
|
|
Width = 78
|
|
Anchors = [akRight, akBottom]
|
|
AutoSize = True
|
|
BorderSpacing.Around = 6
|
|
Cancel = True
|
|
Caption = 'Cancel'
|
|
Constraints.MinHeight = 25
|
|
Constraints.MinWidth = 75
|
|
Kind = bkCancel
|
|
ModalResult = 2
|
|
NumGlyphs = 0
|
|
TabOrder = 1
|
|
end
|
|
object BtnApply: TBitBtn
|
|
AnchorSideRight.Control = BtnHelp
|
|
AnchorSideBottom.Control = Owner
|
|
AnchorSideBottom.Side = asrBottom
|
|
Left = 348
|
|
Height = 29
|
|
Top = 211
|
|
Width = 75
|
|
Anchors = [akRight, akBottom]
|
|
AutoSize = True
|
|
BorderSpacing.Around = 6
|
|
Caption = '&Apply'
|
|
Constraints.MinHeight = 25
|
|
Constraints.MinWidth = 75
|
|
NumGlyphs = 0
|
|
OnClick = btnApplyClick
|
|
TabOrder = 2
|
|
end
|
|
object BtnHelp: TBitBtn
|
|
AnchorSideRight.Control = Owner
|
|
AnchorSideRight.Side = asrBottom
|
|
AnchorSideBottom.Control = Owner
|
|
AnchorSideBottom.Side = asrBottom
|
|
Left = 429
|
|
Height = 36
|
|
Top = 204
|
|
Width = 75
|
|
Anchors = [akRight, akBottom]
|
|
AutoSize = True
|
|
BorderSpacing.Around = 6
|
|
Caption = '&Help'
|
|
Constraints.MinHeight = 25
|
|
Constraints.MinWidth = 75
|
|
Kind = bkHelp
|
|
NumGlyphs = 0
|
|
TabOrder = 3
|
|
end
|
|
object GroupBox1: TGroupBox
|
|
AnchorSideLeft.Control = Owner
|
|
AnchorSideTop.Control = Owner
|
|
AnchorSideBottom.Control = BtnOK
|
|
Left = 6
|
|
Height = 192
|
|
Top = 6
|
|
Width = 295
|
|
Anchors = [akTop, akLeft, akBottom]
|
|
BorderSpacing.Around = 6
|
|
Caption = 'Items'
|
|
ClientHeight = 173
|
|
ClientWidth = 291
|
|
TabOrder = 4
|
|
object TreeView1: TTreeView
|
|
AnchorSideLeft.Control = GroupBox1
|
|
AnchorSideTop.Control = GroupBox1
|
|
AnchorSideBottom.Control = GroupBox1
|
|
AnchorSideBottom.Side = asrBottom
|
|
Left = 5
|
|
Height = 163
|
|
Top = 5
|
|
Width = 160
|
|
Anchors = [akTop, akLeft, akRight, akBottom]
|
|
BorderSpacing.Left = 5
|
|
BorderSpacing.Top = 5
|
|
BorderSpacing.Bottom = 5
|
|
DefaultItemHeight = 19
|
|
HideSelection = False
|
|
ReadOnly = True
|
|
TabOrder = 0
|
|
OnSelectionChanged = TreeView1SelectionChanged
|
|
Options = [tvoAutoItemHeight, tvoKeepCollapsedNodes, tvoReadOnly, 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 = 171
|
|
Height = 25
|
|
Top = 6
|
|
Width = 114
|
|
Anchors = [akTop, akLeft, akRight]
|
|
BorderSpacing.Around = 6
|
|
Caption = '&New Item'
|
|
Default = True
|
|
OnClick = BtnNewItemClick
|
|
TabOrder = 1
|
|
end
|
|
object BtnNewSubItem: TButton
|
|
AnchorSideLeft.Control = TreeView1
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = BtnNewItem
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Control = GroupBox1
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 171
|
|
Height = 25
|
|
Top = 37
|
|
Width = 114
|
|
Anchors = [akTop, akLeft, akRight]
|
|
BorderSpacing.Around = 6
|
|
Caption = 'N&ew SubItem'
|
|
OnClick = BtnNewItemClick
|
|
TabOrder = 2
|
|
end
|
|
object BtnDelete: TButton
|
|
AnchorSideLeft.Control = TreeView1
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = BtnNewSubItem
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Control = GroupBox1
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 171
|
|
Height = 25
|
|
Top = 68
|
|
Width = 114
|
|
Anchors = [akTop, akLeft, akRight]
|
|
BorderSpacing.Around = 6
|
|
Caption = '&Delete'
|
|
OnClick = btnDeleteClick
|
|
TabOrder = 3
|
|
end
|
|
end
|
|
object GroupBox2: TGroupBox
|
|
AnchorSideLeft.Control = GroupBox1
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = Owner
|
|
AnchorSideRight.Control = Owner
|
|
AnchorSideRight.Side = asrBottom
|
|
AnchorSideBottom.Control = BtnOK
|
|
Left = 307
|
|
Height = 192
|
|
Top = 6
|
|
Width = 197
|
|
Anchors = [akTop, akLeft, akRight, akBottom]
|
|
BorderSpacing.Around = 6
|
|
Caption = 'Item Properties'
|
|
ClientHeight = 173
|
|
ClientWidth = 193
|
|
TabOrder = 5
|
|
object LabelCaption: TLabel
|
|
AnchorSideLeft.Control = GroupBox2
|
|
AnchorSideTop.Control = GroupBox2
|
|
Left = 6
|
|
Height = 18
|
|
Top = 6
|
|
Width = 54
|
|
BorderSpacing.Left = 6
|
|
BorderSpacing.Top = 6
|
|
Caption = 'Caption:'
|
|
FocusControl = edtText
|
|
ParentColor = False
|
|
end
|
|
object LabelImageIndex: TLabel
|
|
AnchorSideLeft.Control = LabelCaption
|
|
AnchorSideTop.Control = edtText
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 6
|
|
Height = 18
|
|
Top = 55
|
|
Width = 83
|
|
BorderSpacing.Top = 6
|
|
Caption = 'Image Index:'
|
|
FocusControl = edtIndexImg
|
|
ParentColor = False
|
|
end
|
|
object LabelStateIndex: TLabel
|
|
AnchorSideLeft.Control = LabelImageIndex
|
|
AnchorSideTop.Control = edtIndexImg
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 6
|
|
Height = 18
|
|
Top = 104
|
|
Width = 78
|
|
BorderSpacing.Top = 6
|
|
Caption = 'State Index:'
|
|
FocusControl = edtIndexState
|
|
ParentColor = False
|
|
Visible = False
|
|
end
|
|
object edtText: TEdit
|
|
AnchorSideLeft.Control = LabelCaption
|
|
AnchorSideTop.Control = LabelCaption
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Control = GroupBox2
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 6
|
|
Height = 23
|
|
Top = 26
|
|
Width = 182
|
|
Anchors = [akTop, akLeft, akRight]
|
|
BorderSpacing.Top = 2
|
|
BorderSpacing.Right = 5
|
|
OnChange = Edit1Change
|
|
TabOrder = 0
|
|
end
|
|
object edtIndexImg: TEdit
|
|
AnchorSideLeft.Control = edtText
|
|
AnchorSideTop.Control = LabelImageIndex
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 6
|
|
Height = 23
|
|
Top = 75
|
|
Width = 48
|
|
BorderSpacing.Top = 2
|
|
OnEditingDone = edtIndexStateEditingDone
|
|
TabOrder = 1
|
|
end
|
|
object edtIndexState: TEdit
|
|
AnchorSideLeft.Control = edtIndexImg
|
|
AnchorSideTop.Control = LabelStateIndex
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 6
|
|
Height = 23
|
|
Top = 124
|
|
Width = 48
|
|
BorderSpacing.Top = 2
|
|
OnEditingDone = edtIndexStateEditingDone
|
|
TabOrder = 2
|
|
Visible = False
|
|
end
|
|
end
|
|
end
|