mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-06-19 16:28:27 +02:00
481 lines
13 KiB
Plaintext
481 lines
13 KiB
Plaintext
object WindowOptionsFrame: TWindowOptionsFrame
|
|
Left = 0
|
|
Height = 545
|
|
Top = 0
|
|
Width = 562
|
|
ClientHeight = 545
|
|
ClientWidth = 562
|
|
TabOrder = 0
|
|
DesignLeft = 407
|
|
DesignTop = 219
|
|
object SingleTaskBarButtonCheckBox: TCheckBox
|
|
AnchorSideLeft.Control = Owner
|
|
AnchorSideTop.Control = lblShowingWindows
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 0
|
|
Height = 24
|
|
Top = 20
|
|
Width = 224
|
|
Caption = 'SingleTaskBarButtonCheckBox'
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
TabOrder = 0
|
|
end
|
|
object HideIDEOnRunCheckBox: TCheckBox
|
|
AnchorSideLeft.Control = Owner
|
|
AnchorSideTop.Control = SingleTaskBarButtonCheckBox
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 0
|
|
Height = 24
|
|
Top = 44
|
|
Width = 187
|
|
Caption = 'HideIDEOnRunCheckBox'
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
TabOrder = 1
|
|
end
|
|
object WindowPositionsPanel: TPanel
|
|
AnchorSideLeft.Control = Owner
|
|
AnchorSideTop.Control = lblWindowPosition
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Control = Owner
|
|
AnchorSideRight.Side = asrBottom
|
|
AnchorSideBottom.Control = Owner
|
|
AnchorSideBottom.Side = asrBottom
|
|
Left = 0
|
|
Height = 354
|
|
Top = 191
|
|
Width = 562
|
|
Anchors = [akTop, akLeft, akRight, akBottom]
|
|
BorderSpacing.Top = 1
|
|
Caption = 'WindowPositionsPanel'
|
|
ClientHeight = 354
|
|
ClientWidth = 562
|
|
TabOrder = 2
|
|
object LeftLabel: TLabel
|
|
AnchorSideTop.Control = LeftEdit
|
|
AnchorSideTop.Side = asrCenter
|
|
AnchorSideRight.Control = LeftEdit
|
|
Left = 281
|
|
Height = 20
|
|
Top = 238
|
|
Width = 61
|
|
Anchors = [akTop, akRight]
|
|
BorderSpacing.Right = 3
|
|
Caption = 'LeftLabel'
|
|
ParentColor = False
|
|
end
|
|
object TopLabel: TLabel
|
|
AnchorSideTop.Control = TopEdit
|
|
AnchorSideTop.Side = asrCenter
|
|
AnchorSideRight.Control = TopEdit
|
|
Left = 280
|
|
Height = 20
|
|
Top = 272
|
|
Width = 62
|
|
Anchors = [akTop, akRight]
|
|
BorderSpacing.Right = 3
|
|
Caption = 'TopLabel'
|
|
ParentColor = False
|
|
end
|
|
object WidthLabel: TLabel
|
|
AnchorSideTop.Control = WidthEdit
|
|
AnchorSideTop.Side = asrCenter
|
|
AnchorSideRight.Control = WidthEdit
|
|
Left = 401
|
|
Height = 20
|
|
Top = 238
|
|
Width = 76
|
|
Anchors = [akTop, akRight]
|
|
BorderSpacing.Right = 3
|
|
Caption = 'WidthLabel'
|
|
ParentColor = False
|
|
end
|
|
object HeightLabel: TLabel
|
|
AnchorSideTop.Control = HeightEdit
|
|
AnchorSideTop.Side = asrCenter
|
|
AnchorSideRight.Control = HeightEdit
|
|
Left = 396
|
|
Height = 20
|
|
Top = 272
|
|
Width = 81
|
|
Anchors = [akTop, akRight]
|
|
BorderSpacing.Right = 3
|
|
Caption = 'HeightLabel'
|
|
ParentColor = False
|
|
end
|
|
object WindowPositionsListBox: TListBox
|
|
AnchorSideLeft.Control = WindowPositionsPanel
|
|
AnchorSideTop.Control = WindowPositionsPanel
|
|
AnchorSideRight.Control = WindowPositionsPanel
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 7
|
|
Height = 120
|
|
Top = 3
|
|
Width = 548
|
|
Anchors = [akTop, akLeft, akRight]
|
|
BorderSpacing.Left = 6
|
|
BorderSpacing.Top = 2
|
|
BorderSpacing.Right = 6
|
|
ItemHeight = 0
|
|
OnSelectionChange = WindowPositionsListBoxSelectionChange
|
|
ParentShowHint = False
|
|
ScrollWidth = 300
|
|
ShowHint = True
|
|
TabOrder = 0
|
|
end
|
|
object LetWindowManagerDecideRadioButton: TRadioButton
|
|
AnchorSideLeft.Control = WindowPositionsPanel
|
|
AnchorSideTop.Control = RestoreWindowGeometryRadioButton
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 7
|
|
Height = 24
|
|
Top = 261
|
|
Width = 288
|
|
BorderSpacing.Left = 6
|
|
BorderSpacing.Top = 3
|
|
Caption = 'LetWindowManagerDecideRadioButton'
|
|
OnClick = WindowGeometryRadioButtonClick
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
TabOrder = 1
|
|
end
|
|
object FixedDefaultRadioButton: TRadioButton
|
|
AnchorSideLeft.Control = WindowPositionsPanel
|
|
AnchorSideTop.Control = LetWindowManagerDecideRadioButton
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 7
|
|
Height = 24
|
|
Top = 288
|
|
Width = 191
|
|
BorderSpacing.Left = 6
|
|
BorderSpacing.Top = 3
|
|
Caption = 'FixedDefaultRadioButton'
|
|
OnClick = WindowGeometryRadioButtonClick
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
TabOrder = 2
|
|
end
|
|
object RestoreWindowGeometryRadioButton: TRadioButton
|
|
AnchorSideLeft.Control = WindowPositionsPanel
|
|
AnchorSideTop.Control = SplitterPanel
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 7
|
|
Height = 24
|
|
Top = 234
|
|
Width = 277
|
|
BorderSpacing.Left = 6
|
|
BorderSpacing.Top = 4
|
|
Caption = 'RestoreWindowGeometryRadioButton'
|
|
Checked = True
|
|
OnClick = CustomGeometryRadioButtonClick
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
TabOrder = 3
|
|
TabStop = True
|
|
end
|
|
object CustomGeometryRadioButton: TRadioButton
|
|
AnchorSideLeft.Control = WindowPositionsPanel
|
|
AnchorSideTop.Control = FixedDefaultRadioButton
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 7
|
|
Height = 24
|
|
Top = 315
|
|
Width = 222
|
|
BorderSpacing.Left = 6
|
|
BorderSpacing.Top = 3
|
|
Caption = 'CustomGeometryRadioButton'
|
|
OnClick = CustomGeometryRadioButtonClick
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
TabOrder = 4
|
|
end
|
|
object LeftEdit: TSpinEdit
|
|
AnchorSideTop.Control = RestoreWindowGeometryRadioButton
|
|
AnchorSideRight.Control = WidthEdit
|
|
Left = 345
|
|
Height = 28
|
|
Top = 234
|
|
Width = 75
|
|
Anchors = [akTop, akRight]
|
|
BorderSpacing.Right = 60
|
|
MaxValue = 4096
|
|
MinValue = -5000
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
TabOrder = 5
|
|
end
|
|
object TopEdit: TSpinEdit
|
|
AnchorSideTop.Control = LeftEdit
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Control = HeightEdit
|
|
Left = 345
|
|
Height = 28
|
|
Top = 268
|
|
Width = 75
|
|
Anchors = [akTop, akRight]
|
|
BorderSpacing.Top = 6
|
|
BorderSpacing.Right = 60
|
|
MaxValue = 4096
|
|
MinValue = -5000
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
TabOrder = 6
|
|
end
|
|
object WidthEdit: TSpinEdit
|
|
AnchorSideTop.Control = LeftEdit
|
|
AnchorSideRight.Control = WindowPositionsPanel
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 480
|
|
Height = 28
|
|
Top = 234
|
|
Width = 75
|
|
Anchors = [akTop, akRight]
|
|
BorderSpacing.Right = 6
|
|
MaxValue = 4096
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
TabOrder = 7
|
|
end
|
|
object HeightEdit: TSpinEdit
|
|
AnchorSideTop.Control = WidthEdit
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Control = WindowPositionsPanel
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 480
|
|
Height = 28
|
|
Top = 268
|
|
Width = 75
|
|
Anchors = [akTop, akRight]
|
|
BorderSpacing.Top = 6
|
|
BorderSpacing.Right = 6
|
|
MaxValue = 4096
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
TabOrder = 8
|
|
end
|
|
object GetWindowPositionButton: TButton
|
|
AnchorSideTop.Control = ApplyButton
|
|
AnchorSideRight.Control = ApplyButton
|
|
Left = 239
|
|
Height = 30
|
|
Top = 308
|
|
Width = 201
|
|
Anchors = [akTop, akRight]
|
|
AutoSize = True
|
|
BorderSpacing.Right = 6
|
|
Caption = 'GetWindowPositionButton'
|
|
Constraints.MinWidth = 75
|
|
OnClick = GetWindowPositionButtonClick
|
|
TabOrder = 9
|
|
end
|
|
object ApplyButton: TButton
|
|
AnchorSideTop.Control = HeightEdit
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Control = WindowPositionsPanel
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 446
|
|
Height = 30
|
|
Top = 308
|
|
Width = 109
|
|
Anchors = [akTop, akRight]
|
|
AutoSize = True
|
|
BorderSpacing.Top = 12
|
|
BorderSpacing.Right = 6
|
|
Caption = 'ApplyButton'
|
|
Constraints.MinWidth = 75
|
|
OnClick = ApplyButtonClick
|
|
TabOrder = 10
|
|
end
|
|
object SplitterPanel: TPanel
|
|
AnchorSideLeft.Control = WindowPositionsPanel
|
|
AnchorSideTop.Control = lblWindowCaption
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Control = WindowPositionsPanel
|
|
AnchorSideRight.Side = asrBottom
|
|
AnchorSideBottom.Control = WindowPositionsPanel
|
|
AnchorSideBottom.Side = asrBottom
|
|
Left = 5
|
|
Height = 78
|
|
Top = 152
|
|
Width = 556
|
|
Anchors = [akTop, akLeft, akRight]
|
|
BorderSpacing.Left = 4
|
|
BorderSpacing.Top = 3
|
|
BevelOuter = bvNone
|
|
BorderWidth = 1
|
|
BorderStyle = bsSingle
|
|
Caption = ' '
|
|
ClientHeight = 74
|
|
ClientWidth = 552
|
|
TabOrder = 11
|
|
Visible = False
|
|
object SplitterList: TListBox
|
|
AnchorSideLeft.Control = SplitterPanel
|
|
AnchorSideTop.Control = SplitterPanel
|
|
AnchorSideBottom.Control = SplitterPanel
|
|
AnchorSideBottom.Side = asrBottom
|
|
Left = 1
|
|
Height = 72
|
|
Top = 1
|
|
Width = 275
|
|
Anchors = [akTop, akLeft, akBottom]
|
|
ItemHeight = 0
|
|
OnSelectionChange = SplitterListSelectionChange
|
|
ParentShowHint = False
|
|
ScrollWidth = 273
|
|
ShowHint = True
|
|
TabOrder = 0
|
|
end
|
|
object SplitLabel: TLabel
|
|
AnchorSideTop.Control = SplitEdit
|
|
AnchorSideTop.Side = asrCenter
|
|
AnchorSideRight.Control = SplitEdit
|
|
Left = 407
|
|
Height = 20
|
|
Top = 40
|
|
Width = 66
|
|
Anchors = [akTop, akRight]
|
|
BorderSpacing.Right = 3
|
|
Caption = 'SplitLabel'
|
|
ParentColor = False
|
|
end
|
|
object SplitEdit: TSpinEdit
|
|
AnchorSideRight.Control = SplitterPanel
|
|
AnchorSideRight.Side = asrBottom
|
|
AnchorSideBottom.Control = SplitterPanel
|
|
AnchorSideBottom.Side = asrBottom
|
|
Left = 476
|
|
Height = 28
|
|
Top = 36
|
|
Width = 75
|
|
Anchors = [akRight, akBottom]
|
|
BorderSpacing.Bottom = 9
|
|
MaxValue = 5000
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
TabOrder = 1
|
|
end
|
|
object dropSplitterPlacement: TComboBox
|
|
AnchorSideLeft.Control = SplitterList
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = SplitterPanel
|
|
AnchorSideRight.Control = SplitterPanel
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 282
|
|
Height = 28
|
|
Top = 1
|
|
Width = 269
|
|
Anchors = [akTop, akLeft, akRight]
|
|
BorderSpacing.Left = 6
|
|
ItemHeight = 20
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
Style = csDropDownList
|
|
TabOrder = 2
|
|
end
|
|
end
|
|
object lblWindowCaption: TDividerBevel
|
|
AnchorSideLeft.Control = WindowPositionsPanel
|
|
AnchorSideTop.Control = WindowPositionsListBox
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Control = WindowPositionsPanel
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 1
|
|
Height = 20
|
|
Top = 129
|
|
Width = 560
|
|
Caption = 'lblWindowCaption'
|
|
Anchors = [akTop, akLeft, akRight]
|
|
BorderSpacing.Top = 6
|
|
Font.Style = [fsUnderline]
|
|
ParentColor = False
|
|
ParentFont = False
|
|
end
|
|
end
|
|
object TitleStartsWithProjectCheckBox: TCheckBox
|
|
AnchorSideLeft.Control = Owner
|
|
AnchorSideTop.Control = HideIDEOnRunCheckBox
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 0
|
|
Height = 24
|
|
Top = 68
|
|
Width = 231
|
|
Caption = 'TitleStartsWithProjectCheckBox'
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
TabOrder = 3
|
|
end
|
|
object ProjectDirInIdeTitleCheckBox: TCheckBox
|
|
AnchorSideLeft.Control = Owner
|
|
AnchorSideTop.Control = TitleStartsWithProjectCheckBox
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 0
|
|
Height = 24
|
|
Top = 92
|
|
Width = 216
|
|
Caption = 'ProjectDirInIdeTitleCheckBox'
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
TabOrder = 4
|
|
end
|
|
object TitleIncludesBuildMode: TCheckBox
|
|
AnchorSideLeft.Control = Owner
|
|
AnchorSideTop.Control = ProjectDirInIdeTitleCheckBox
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 0
|
|
Height = 24
|
|
Top = 116
|
|
Width = 180
|
|
Caption = 'TitleIncludesBuildMode'
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
TabOrder = 5
|
|
end
|
|
object NameForDesignedFormList: TCheckBox
|
|
AnchorSideLeft.Control = Owner
|
|
AnchorSideTop.Control = TitleIncludesBuildMode
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 0
|
|
Height = 24
|
|
Top = 140
|
|
Width = 204
|
|
Caption = 'NameForDesignedFormList'
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
TabOrder = 6
|
|
end
|
|
object lblShowingWindows: TDividerBevel
|
|
AnchorSideLeft.Control = Owner
|
|
AnchorSideTop.Control = Owner
|
|
AnchorSideRight.Control = Owner
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 0
|
|
Height = 20
|
|
Top = 0
|
|
Width = 562
|
|
Caption = 'lblShowingWindows'
|
|
Anchors = [akTop, akLeft, akRight]
|
|
Font.Style = [fsBold]
|
|
ParentFont = False
|
|
end
|
|
object lblWindowPosition: TDividerBevel
|
|
AnchorSideLeft.Control = Owner
|
|
AnchorSideTop.Control = NameForDesignedFormList
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Control = Owner
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 0
|
|
Height = 20
|
|
Top = 170
|
|
Width = 562
|
|
Caption = 'lblWindowPosition'
|
|
Anchors = [akTop, akLeft, akRight]
|
|
BorderSpacing.Top = 6
|
|
Font.Style = [fsBold]
|
|
ParentFont = False
|
|
end
|
|
end
|