lazarus/ide/desktopmanager.lfm

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