mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-09-07 14:00:18 +02:00
130 lines
3.4 KiB
Plaintext
130 lines
3.4 KiB
Plaintext
object IconFolderForm: TIconFolderForm
|
|
Left = 314
|
|
Height = 336
|
|
Top = 130
|
|
Width = 563
|
|
Caption = 'Icon folders'
|
|
ClientHeight = 336
|
|
ClientWidth = 563
|
|
OnCreate = FormCreate
|
|
object ButtonPanel1: TButtonPanel
|
|
Left = 6
|
|
Height = 46
|
|
Top = 284
|
|
Width = 551
|
|
OKButton.Name = 'OKButton'
|
|
OKButton.DefaultCaption = True
|
|
HelpButton.Name = 'HelpButton'
|
|
HelpButton.DefaultCaption = True
|
|
CloseButton.Name = 'CloseButton'
|
|
CloseButton.DefaultCaption = True
|
|
CancelButton.Name = 'CancelButton'
|
|
CancelButton.DefaultCaption = True
|
|
TabOrder = 0
|
|
ShowButtons = [pbOK, pbCancel]
|
|
end
|
|
object FolderPanel: TGroupBox
|
|
AnchorSideLeft.Control = Owner
|
|
AnchorSideTop.Control = Owner
|
|
AnchorSideRight.Control = Owner
|
|
AnchorSideRight.Side = asrBottom
|
|
AnchorSideBottom.Control = ButtonPanel1
|
|
Left = 8
|
|
Height = 268
|
|
Top = 8
|
|
Width = 547
|
|
Anchors = [akTop, akLeft, akRight, akBottom]
|
|
BorderSpacing.Around = 8
|
|
Caption = 'Icon folders'
|
|
ClientHeight = 251
|
|
ClientWidth = 545
|
|
TabOrder = 1
|
|
object clbFolders: TCheckListBox
|
|
AnchorSideLeft.Control = FolderPanel
|
|
AnchorSideTop.Control = FolderPanel
|
|
AnchorSideRight.Control = FolderPanel
|
|
AnchorSideRight.Side = asrBottom
|
|
AnchorSideBottom.Control = btnAddFolder
|
|
Left = 8
|
|
Height = 203
|
|
Top = 4
|
|
Width = 529
|
|
Anchors = [akTop, akLeft, akRight, akBottom]
|
|
BorderSpacing.Left = 8
|
|
BorderSpacing.Top = 4
|
|
BorderSpacing.Right = 8
|
|
ItemHeight = 0
|
|
TabOrder = 0
|
|
TopIndex = -1
|
|
OnSelectionChange = clbFoldersSelectionChange
|
|
end
|
|
object btnDeleteFolder: TButton
|
|
AnchorSideLeft.Control = btnAddFolder
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = btnAddFolder
|
|
AnchorSideBottom.Side = asrBottom
|
|
Left = 67
|
|
Height = 32
|
|
Top = 213
|
|
Width = 54
|
|
AutoSize = True
|
|
Caption = 'Delete'
|
|
Enabled = False
|
|
TabOrder = 2
|
|
OnClick = btnDeleteFolderClick
|
|
end
|
|
object btnMoveFolderUp: TButton
|
|
AnchorSideLeft.Control = btnDeleteFolder
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = btnAddFolder
|
|
AnchorSideRight.Side = asrBottom
|
|
AnchorSideBottom.Side = asrBottom
|
|
Left = 127
|
|
Height = 32
|
|
Top = 213
|
|
Width = 66
|
|
AutoSize = True
|
|
BorderSpacing.Left = 6
|
|
Caption = 'Move up'
|
|
Enabled = False
|
|
TabOrder = 3
|
|
OnClick = btnMoveFolderUpClick
|
|
end
|
|
object btnMoveFolderDown: TButton
|
|
AnchorSideLeft.Control = btnMoveFolderUp
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = btnAddFolder
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 199
|
|
Height = 32
|
|
Top = 213
|
|
Width = 83
|
|
AutoSize = True
|
|
BorderSpacing.Left = 6
|
|
Caption = 'Move down'
|
|
Enabled = False
|
|
TabOrder = 4
|
|
OnClick = btnMoveFolderDownClick
|
|
end
|
|
object btnAddFolder: TButton
|
|
AnchorSideLeft.Control = FolderPanel
|
|
AnchorSideBottom.Control = FolderPanel
|
|
AnchorSideBottom.Side = asrBottom
|
|
Left = 6
|
|
Height = 32
|
|
Top = 213
|
|
Width = 55
|
|
Anchors = [akLeft, akBottom]
|
|
AutoSize = True
|
|
BorderSpacing.Around = 6
|
|
Caption = 'Add ...'
|
|
TabOrder = 1
|
|
OnClick = btnAddFolderClick
|
|
end
|
|
end
|
|
object SelectDirectoryDialog: TSelectDirectoryDialog
|
|
Left = 115
|
|
Top = 141
|
|
end
|
|
end
|