mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-05-15 11:22:41 +02:00
287 lines
7.5 KiB
Plaintext
287 lines
7.5 KiB
Plaintext
object ImageListEditorDlg: TImageListEditorDlg
|
|
Left = 302
|
|
Height = 379
|
|
Top = 191
|
|
Width = 616
|
|
BorderIcons = [biSystemMenu, biHelp]
|
|
Caption = 'ImagesList Editor'
|
|
ClientHeight = 379
|
|
ClientWidth = 616
|
|
Constraints.MinHeight = 345
|
|
Constraints.MinWidth = 520
|
|
OnCreate = FormCreate
|
|
OnDestroy = FormDestroy
|
|
Position = poScreenCenter
|
|
LCLVersion = '0.9.29'
|
|
object GroupBoxR: TGroupBox
|
|
AnchorSideTop.Control = Owner
|
|
AnchorSideRight.Control = Owner
|
|
AnchorSideRight.Side = asrBottom
|
|
AnchorSideBottom.Control = BtnPanel
|
|
Left = 375
|
|
Height = 335
|
|
Top = 6
|
|
Width = 235
|
|
Anchors = [akTop, akLeft, akRight, akBottom]
|
|
BorderSpacing.Around = 6
|
|
Caption = 'Selected Image'
|
|
ClientHeight = 317
|
|
ClientWidth = 231
|
|
TabOrder = 1
|
|
object LabelTransparent: TLabel
|
|
Left = 110
|
|
Height = 14
|
|
Top = 211
|
|
Width = 92
|
|
Anchors = [akLeft, akBottom]
|
|
BorderSpacing.Around = 6
|
|
Caption = 'Transparent Color:'
|
|
ParentColor = False
|
|
end
|
|
object LabelSize: TLabel
|
|
Left = 6
|
|
Height = 14
|
|
Top = 6
|
|
Width = 1
|
|
ParentColor = False
|
|
end
|
|
object Preview: TScrollBox
|
|
Left = 6
|
|
Height = 169
|
|
Top = 32
|
|
Width = 218
|
|
Anchors = [akTop, akLeft, akRight, akBottom]
|
|
BorderSpacing.Around = 6
|
|
Color = clGrayText
|
|
ParentColor = False
|
|
TabOrder = 0
|
|
OnPaint = PreviewPaint
|
|
end
|
|
object RadioGroup: TRadioGroup
|
|
Left = 6
|
|
Height = 105
|
|
Top = 207
|
|
Width = 96
|
|
Anchors = [akLeft, akBottom]
|
|
AutoFill = True
|
|
BorderSpacing.Around = 6
|
|
Caption = 'Adjustment'
|
|
ChildSizing.LeftRightSpacing = 6
|
|
ChildSizing.TopBottomSpacing = 6
|
|
ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
|
|
ChildSizing.EnlargeVertical = crsHomogenousSpaceResize
|
|
ChildSizing.ShrinkHorizontal = crsScaleChilds
|
|
ChildSizing.ShrinkVertical = crsScaleChilds
|
|
ChildSizing.Layout = cclLeftToRightThenTopToBottom
|
|
ChildSizing.ControlsPerLine = 1
|
|
ClientHeight = 87
|
|
ClientWidth = 92
|
|
Enabled = False
|
|
ItemIndex = 0
|
|
Items.Strings = (
|
|
'None'
|
|
'Stretch'
|
|
'Crop'
|
|
'Center'
|
|
)
|
|
OnClick = ColorBoxTransparentClick
|
|
TabOrder = 1
|
|
end
|
|
object ColorBoxTransparent: TColorBox
|
|
AnchorSideTop.Control = LabelTransparent
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 110
|
|
Height = 22
|
|
Top = 231
|
|
Width = 96
|
|
Selected = clFuchsia
|
|
Style = [cbStandardColors, cbExtendedColors, cbIncludeDefault, cbCustomColor, cbPrettyNames]
|
|
Enabled = False
|
|
ItemHeight = 16
|
|
OnChange = ColorBoxTransparentClick
|
|
TabOrder = 2
|
|
end
|
|
end
|
|
object GroupBoxL: TGroupBox
|
|
AnchorSideLeft.Control = Owner
|
|
AnchorSideTop.Control = Owner
|
|
AnchorSideBottom.Control = BtnPanel
|
|
Left = 6
|
|
Height = 335
|
|
Top = 6
|
|
Width = 364
|
|
Anchors = [akTop, akLeft, akBottom]
|
|
BorderSpacing.Around = 6
|
|
Caption = 'Images'
|
|
ClientHeight = 317
|
|
ClientWidth = 360
|
|
TabOrder = 0
|
|
object TreeView: TTreeView
|
|
AnchorSideLeft.Control = GroupBoxL
|
|
AnchorSideTop.Control = GroupBoxL
|
|
Left = 6
|
|
Height = 306
|
|
Top = 6
|
|
Width = 186
|
|
Anchors = [akTop, akLeft, akRight, akBottom]
|
|
BorderSpacing.Around = 6
|
|
DefaultItemHeight = 16
|
|
HideSelection = False
|
|
Images = ImageList
|
|
ReadOnly = True
|
|
RowSelect = True
|
|
ShowButtons = False
|
|
ShowLines = False
|
|
ShowRoot = False
|
|
TabOrder = 0
|
|
OnDeletion = TreeViewDeletion
|
|
OnSelectionChanged = TreeViewSelectionChanged
|
|
Options = [tvoAutoItemHeight, tvoKeepCollapsedNodes, tvoReadOnly, tvoRowSelect, tvoToolTips]
|
|
end
|
|
object BtnAdd: TButton
|
|
Tag = 1
|
|
AnchorSideLeft.Control = TreeView
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = GroupBoxL
|
|
AnchorSideRight.Control = GroupBoxL
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 198
|
|
Height = 25
|
|
Top = 6
|
|
Width = 156
|
|
Anchors = [akTop, akLeft, akRight]
|
|
BorderSpacing.Around = 6
|
|
Caption = 'Add...'
|
|
OnClick = BtnAddClick
|
|
TabOrder = 1
|
|
end
|
|
object BtnClear: TButton
|
|
AnchorSideLeft.Control = TreeView
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = BtnDelete
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Control = GroupBoxL
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 198
|
|
Height = 25
|
|
Top = 68
|
|
Width = 156
|
|
Anchors = [akTop, akLeft, akRight]
|
|
BorderSpacing.Around = 6
|
|
Caption = 'Clear'
|
|
OnClick = BtnClearClick
|
|
TabOrder = 2
|
|
end
|
|
object BtnDelete: TButton
|
|
AnchorSideLeft.Control = TreeView
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = BtnAdd
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Control = GroupBoxL
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 198
|
|
Height = 25
|
|
Top = 37
|
|
Width = 156
|
|
Anchors = [akTop, akLeft, akRight]
|
|
BorderSpacing.Around = 6
|
|
Caption = '&Delete'
|
|
OnClick = BtnDeleteClick
|
|
TabOrder = 3
|
|
end
|
|
object BtnMoveUp: TButton
|
|
Tag = -1
|
|
AnchorSideLeft.Control = TreeView
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = BtnClear
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Control = GroupBoxL
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 198
|
|
Height = 25
|
|
Top = 99
|
|
Width = 156
|
|
Anchors = [akTop, akLeft, akRight]
|
|
BorderSpacing.Around = 6
|
|
Caption = 'Move Up'
|
|
OnClick = BtnMoveUpClick
|
|
TabOrder = 4
|
|
end
|
|
object BtnMoveDown: TButton
|
|
Tag = 1
|
|
AnchorSideLeft.Control = TreeView
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = BtnMoveUp
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Control = GroupBoxL
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 198
|
|
Height = 25
|
|
Top = 130
|
|
Width = 156
|
|
Anchors = [akTop, akLeft, akRight]
|
|
BorderSpacing.Around = 6
|
|
Caption = 'Move Down'
|
|
OnClick = BtnMoveUpClick
|
|
TabOrder = 5
|
|
end
|
|
object BtnSave: TButton
|
|
AnchorSideLeft.Control = TreeView
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = BtnMoveDown
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Control = GroupBoxL
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 198
|
|
Height = 25
|
|
Top = 161
|
|
Width = 156
|
|
Anchors = [akTop, akLeft, akRight]
|
|
BorderSpacing.Around = 6
|
|
Caption = 'Save...'
|
|
OnClick = BtnSaveClick
|
|
TabOrder = 6
|
|
end
|
|
object btnSaveAll: TButton
|
|
AnchorSideLeft.Control = TreeView
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideRight.Control = GroupBoxL
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 198
|
|
Height = 25
|
|
Top = 194
|
|
Width = 156
|
|
Anchors = [akTop, akLeft, akRight]
|
|
BorderSpacing.Around = 6
|
|
Caption = 'Save All...'
|
|
OnClick = btnSaveAllClick
|
|
TabOrder = 7
|
|
end
|
|
end
|
|
object BtnPanel: TButtonPanel
|
|
Left = 6
|
|
Height = 26
|
|
Top = 347
|
|
Width = 604
|
|
TabOrder = 2
|
|
ShowBevel = False
|
|
end
|
|
object ImageList: TImageList
|
|
left = 216
|
|
top = 246
|
|
end
|
|
object OpenDialog: TOpenPictureDialog
|
|
FilterIndex = 0
|
|
Options = [ofAllowMultiSelect, ofFileMustExist, ofEnableSizing, ofViewDetail, ofAutoPreview]
|
|
left = 216
|
|
top = 209
|
|
end
|
|
object SaveDialog: TSavePictureDialog
|
|
Title = 'Save file as'
|
|
FilterIndex = 0
|
|
Options = [ofEnableSizing, ofViewDetail, ofAutoPreview]
|
|
left = 252
|
|
top = 209
|
|
end
|
|
end
|