mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-10 10:28:21 +02:00
267 lines
6.4 KiB
Plaintext
267 lines
6.4 KiB
Plaintext
object DesktopForm: TDesktopForm
|
|
Left = 334
|
|
Height = 292
|
|
Top = 319
|
|
Width = 377
|
|
BorderIcons = [biSystemMenu]
|
|
Caption = 'DesktopForm'
|
|
ClientHeight = 292
|
|
ClientWidth = 377
|
|
OnCreate = FormCreate
|
|
OnShow = FormShow
|
|
Position = poScreenCenter
|
|
LCLVersion = '1.5'
|
|
object ButtonPanel1: TButtonPanel
|
|
Left = 6
|
|
Height = 34
|
|
Top = 252
|
|
Width = 365
|
|
OKButton.Name = 'OKButton'
|
|
OKButton.Caption = 'OK'
|
|
OKButton.DefaultCaption = False
|
|
HelpButton.Name = 'HelpButton'
|
|
HelpButton.DefaultCaption = True
|
|
HelpButton.OnClick = HelpButtonClick
|
|
CloseButton.Name = 'CloseButton'
|
|
CloseButton.DefaultCaption = True
|
|
CancelButton.Name = 'CancelButton'
|
|
CancelButton.Caption = 'Close'
|
|
CancelButton.DefaultCaption = False
|
|
TabOrder = 3
|
|
ShowButtons = [pbClose, pbHelp]
|
|
object ExportBitBtn: TBitBtn
|
|
Left = 93
|
|
Height = 26
|
|
Top = 8
|
|
Width = 91
|
|
Align = alCustom
|
|
AutoSize = True
|
|
Caption = 'ExportBitBtn'
|
|
Constraints.MinWidth = 25
|
|
OnClick = ExportBitBtnClick
|
|
TabOrder = 4
|
|
end
|
|
object ImportBitBtn: TBitBtn
|
|
Left = 190
|
|
Height = 26
|
|
Top = 8
|
|
Width = 94
|
|
Align = alCustom
|
|
AutoSize = True
|
|
Caption = 'ImportBitBtn'
|
|
Constraints.MinWidth = 25
|
|
OnClick = ImportActionClick
|
|
TabOrder = 5
|
|
end
|
|
end
|
|
object DesktopListBox: TListBox
|
|
AnchorSideLeft.Control = LblGrayedInfo
|
|
AnchorSideRight.Control = LblGrayedInfo
|
|
AnchorSideRight.Side = asrBottom
|
|
AnchorSideBottom.Control = AutoSaveActiveDesktopCheckBox
|
|
Left = 11
|
|
Height = 190
|
|
Top = 8
|
|
Width = 320
|
|
Anchors = [akTop, akLeft, akRight, akBottom]
|
|
BorderSpacing.Bottom = 6
|
|
ItemHeight = 18
|
|
OnDblClick = SetActiveDesktopActionClick
|
|
OnDrawItem = DesktopListBoxDrawItem
|
|
OnKeyPress = DesktopListBoxKeyPress
|
|
OnSelectionChange = DesktopListBoxSelectionChange
|
|
Style = lbOwnerDrawFixed
|
|
TabOrder = 0
|
|
end
|
|
object AutoSaveActiveDesktopCheckBox: TCheckBox
|
|
AnchorSideLeft.Control = LblGrayedInfo
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideBottom.Control = LblGrayedInfo
|
|
Left = 11
|
|
Height = 19
|
|
Top = 204
|
|
Width = 151
|
|
Anchors = [akLeft, akBottom]
|
|
BorderSpacing.Top = 6
|
|
BorderSpacing.Bottom = 6
|
|
Caption = 'Auto save active desktop'
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
TabOrder = 1
|
|
end
|
|
object ToolBar1: TToolBar
|
|
Left = 340
|
|
Height = 241
|
|
Top = 8
|
|
Width = 30
|
|
Align = alNone
|
|
Anchors = [akTop, akRight, akBottom]
|
|
Caption = 'ToolBar1'
|
|
EdgeBorders = []
|
|
TabOrder = 2
|
|
object SaveTB: TToolButton
|
|
Left = 1
|
|
Top = 0
|
|
Action = SaveAction
|
|
OnClick = SaveActionClick
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
end
|
|
object ToolButton1: TToolButton
|
|
Left = 1
|
|
Height = 5
|
|
Top = 22
|
|
Width = 23
|
|
Caption = 'ToolButton1'
|
|
Style = tbsDivider
|
|
end
|
|
object SetActiveDesktopTB: TToolButton
|
|
Left = 1
|
|
Top = 27
|
|
Action = SetActiveDesktopAction
|
|
OnClick = SetActiveDesktopActionClick
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
end
|
|
object SetDebugDesktopTB: TToolButton
|
|
Left = 1
|
|
Top = 54
|
|
Action = SetDebugDesktopAction
|
|
OnClick = SetDebugDesktopActionClick
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
end
|
|
object RenameTB: TToolButton
|
|
Left = 1
|
|
Top = 76
|
|
Action = RenameAction
|
|
OnClick = RenameActionClick
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
end
|
|
object DeleteTB: TToolButton
|
|
Left = 1
|
|
Top = 98
|
|
Action = DeleteAction
|
|
OnClick = DeleteActionClick
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
end
|
|
object MoveUpTB: TToolButton
|
|
Tag = -1
|
|
Left = 1
|
|
Top = 125
|
|
Action = MoveUpAction
|
|
OnClick = MoveUpDownActionClick
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
end
|
|
object MoveDownTB: TToolButton
|
|
Tag = 1
|
|
Left = 1
|
|
Top = 147
|
|
Action = MoveDownAction
|
|
OnClick = MoveUpDownActionClick
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
end
|
|
object ToolButton2: TToolButton
|
|
Left = 1
|
|
Height = 5
|
|
Top = 120
|
|
Width = 23
|
|
Caption = 'ToolButton2'
|
|
Style = tbsDivider
|
|
end
|
|
object ToolButton3: TToolButton
|
|
Left = 1
|
|
Height = 5
|
|
Top = 49
|
|
Width = 23
|
|
Caption = 'ToolButton3'
|
|
Style = tbsDivider
|
|
end
|
|
end
|
|
object LblGrayedInfo: TLabel
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 11
|
|
Height = 15
|
|
Top = 229
|
|
Width = 320
|
|
Anchors = [akLeft, akRight, akBottom]
|
|
BorderSpacing.Top = 3
|
|
Caption = 'Grayed desktops are for undocked environment.'
|
|
ParentColor = False
|
|
WordWrap = True
|
|
end
|
|
object ExportMenu: TPopupMenu
|
|
left = 48
|
|
top = 24
|
|
object ExportItem: TMenuItem
|
|
Action = ExportAction
|
|
OnClick = ExportActionClick
|
|
end
|
|
object ExportAllItem: TMenuItem
|
|
Action = ExportAllAction
|
|
OnClick = ExportAllActionClick
|
|
end
|
|
end
|
|
object ActionList1: TActionList
|
|
left = 128
|
|
top = 32
|
|
object SaveAction: TAction
|
|
Caption = 'SaveAction'
|
|
OnExecute = SaveActionClick
|
|
ShortCut = 16467
|
|
end
|
|
object SetActiveDesktopAction: TAction
|
|
Caption = 'SetActiveDesktopAction'
|
|
OnExecute = SetActiveDesktopActionClick
|
|
ShortCut = 16397
|
|
end
|
|
object SetDebugDesktopAction: TAction
|
|
Caption = 'SetDebugDesktopAction'
|
|
OnExecute = SetDebugDesktopActionClick
|
|
ShortCut = 16452
|
|
end
|
|
object RenameAction: TAction
|
|
Caption = 'RenameAction'
|
|
OnExecute = RenameActionClick
|
|
ShortCut = 16466
|
|
end
|
|
object DeleteAction: TAction
|
|
Caption = 'DeleteAction'
|
|
OnExecute = DeleteActionClick
|
|
ShortCut = 16430
|
|
end
|
|
object MoveUpAction: TAction
|
|
Tag = -1
|
|
Caption = 'MoveUpAction'
|
|
OnExecute = MoveUpDownActionClick
|
|
ShortCut = 16422
|
|
end
|
|
object MoveDownAction: TAction
|
|
Tag = 1
|
|
Caption = 'MoveDownAction'
|
|
OnExecute = MoveUpDownActionClick
|
|
ShortCut = 16424
|
|
end
|
|
object ExportAction: TAction
|
|
Caption = 'ExportAction'
|
|
OnExecute = ExportActionClick
|
|
ShortCut = 16453
|
|
end
|
|
object ExportAllAction: TAction
|
|
Caption = 'ExportAllAction'
|
|
OnExecute = ExportAllActionClick
|
|
ShortCut = 24645
|
|
end
|
|
object ImportAction: TAction
|
|
Caption = 'ImportAction'
|
|
OnExecute = ImportActionClick
|
|
ShortCut = 16457
|
|
end
|
|
end
|
|
end
|