mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-06-03 12:58:17 +02:00

implemented TButtonPanel in the remaining forms and slightly improved anchoring where appropriate git-svn-id: trunk@16996 -
693 lines
20 KiB
Plaintext
693 lines
20 KiB
Plaintext
object BuildFileDialog: TBuildFileDialog
|
|
Left = 317
|
|
Height = 417
|
|
Top = 153
|
|
Width = 451
|
|
HelpContext = 0
|
|
ActiveControl = Notebook1
|
|
Align = alNone
|
|
AllowDropFiles = False
|
|
AutoScroll = True
|
|
AutoSize = False
|
|
BorderIcons = [biSystemMenu]
|
|
BorderStyle = bsSizeable
|
|
Caption = 'BuildFileDialog'
|
|
ChildSizing.LeftRightSpacing = 0
|
|
ChildSizing.TopBottomSpacing = 0
|
|
ChildSizing.HorizontalSpacing = 0
|
|
ChildSizing.VerticalSpacing = 0
|
|
ChildSizing.ControlsPerLine = 0
|
|
ClientHeight = 417
|
|
ClientWidth = 451
|
|
DockSite = False
|
|
DragKind = dkDrag
|
|
DragMode = dmManual
|
|
Enabled = True
|
|
Font.Height = 0
|
|
Font.Style = []
|
|
FormStyle = fsNormal
|
|
KeyPreview = True
|
|
OnCreate = BuildFileDialogCREATE
|
|
OnKeyDown = BuildFileDialogKEYDOWN
|
|
ParentBiDiMode = True
|
|
ParentFont = False
|
|
Position = poScreenCenter
|
|
ShowInTaskBar = stDefault
|
|
UseDockManager = False
|
|
LCLVersion = '0.9.27'
|
|
WindowState = wsNormal
|
|
object Notebook1: TNotebook
|
|
Left = 0
|
|
Height = 363
|
|
Top = 0
|
|
Width = 451
|
|
HelpContext = 0
|
|
TabStop = True
|
|
Align = alClient
|
|
BorderSpacing.Left = 0
|
|
BorderSpacing.Top = 0
|
|
BorderSpacing.Right = 0
|
|
BorderSpacing.Bottom = 6
|
|
BorderSpacing.Around = 0
|
|
BorderSpacing.CellAlignHorizontal = ccaFill
|
|
BorderSpacing.CellAlignVertical = ccaFill
|
|
DragCursor = crDrag
|
|
DragMode = dmManual
|
|
Enabled = True
|
|
Options = []
|
|
PageIndex = 2
|
|
ParentFont = True
|
|
ShowTabs = True
|
|
TabOrder = 0
|
|
object GeneralPage: TPage
|
|
HelpContext = 0
|
|
Caption = 'Options'
|
|
ChildSizing.LeftRightSpacing = 0
|
|
ChildSizing.TopBottomSpacing = 0
|
|
ChildSizing.HorizontalSpacing = 0
|
|
ChildSizing.VerticalSpacing = 0
|
|
ChildSizing.ControlsPerLine = 0
|
|
ClientWidth = 447
|
|
ClientHeight = 332
|
|
ImageIndex = -1
|
|
ParentFont = True
|
|
ParentShowHint = True
|
|
object WhenFileIsActiveGroupbox: TGroupBox
|
|
Left = 6
|
|
Height = 81
|
|
Top = 6
|
|
Width = 435
|
|
HelpContext = 0
|
|
Align = alTop
|
|
AutoSize = True
|
|
BorderSpacing.Left = 0
|
|
BorderSpacing.Top = 0
|
|
BorderSpacing.Right = 0
|
|
BorderSpacing.Bottom = 0
|
|
BorderSpacing.Around = 6
|
|
BorderSpacing.CellAlignHorizontal = ccaFill
|
|
BorderSpacing.CellAlignVertical = ccaFill
|
|
Caption = 'When this file is active in source editor ...'
|
|
ChildSizing.LeftRightSpacing = 0
|
|
ChildSizing.TopBottomSpacing = 0
|
|
ChildSizing.HorizontalSpacing = 0
|
|
ChildSizing.VerticalSpacing = 0
|
|
ChildSizing.ControlsPerLine = 0
|
|
ClientHeight = 62
|
|
ClientWidth = 431
|
|
Ctl3D = False
|
|
DockSite = False
|
|
DragCursor = crDrag
|
|
DragKind = dkDrag
|
|
DragMode = dmManual
|
|
Enabled = True
|
|
ParentBidiMode = True
|
|
ParentColor = True
|
|
ParentCtl3D = False
|
|
ParentFont = True
|
|
ParentShowHint = True
|
|
TabOrder = 0
|
|
TabStop = False
|
|
Visible = True
|
|
object OverrideBuildProjectCheckbox: TCheckBox
|
|
Left = 6
|
|
Height = 22
|
|
Top = 6
|
|
Width = 419
|
|
HelpContext = 0
|
|
Align = alTop
|
|
AllowGrayed = False
|
|
AutoSize = True
|
|
BorderSpacing.Left = 0
|
|
BorderSpacing.Top = 0
|
|
BorderSpacing.Right = 0
|
|
BorderSpacing.Bottom = 0
|
|
BorderSpacing.Around = 6
|
|
BorderSpacing.CellAlignHorizontal = ccaFill
|
|
BorderSpacing.CellAlignVertical = ccaFill
|
|
Caption = 'On build project execute the Build File command instead'
|
|
Checked = False
|
|
DragCursor = crDrag
|
|
DragKind = dkDrag
|
|
DragMode = dmManual
|
|
Enabled = True
|
|
ParentColor = True
|
|
ParentFont = True
|
|
ParentShowHint = True
|
|
ParentBidiMode = True
|
|
State = cbUnchecked
|
|
TabOrder = 0
|
|
TabStop = True
|
|
UseOnChange = False
|
|
Visible = True
|
|
end
|
|
object OverrideRunProjectCheckbox: TCheckBox
|
|
Left = 6
|
|
Height = 22
|
|
Top = 34
|
|
Width = 419
|
|
HelpContext = 0
|
|
Align = alTop
|
|
AllowGrayed = False
|
|
AutoSize = True
|
|
BorderSpacing.Left = 0
|
|
BorderSpacing.Top = 0
|
|
BorderSpacing.Right = 0
|
|
BorderSpacing.Bottom = 0
|
|
BorderSpacing.Around = 6
|
|
BorderSpacing.CellAlignHorizontal = ccaFill
|
|
BorderSpacing.CellAlignVertical = ccaFill
|
|
Caption = 'On run project execute the Run File command instead'
|
|
Checked = False
|
|
DragCursor = crDrag
|
|
DragKind = dkDrag
|
|
DragMode = dmManual
|
|
Enabled = True
|
|
ParentColor = True
|
|
ParentFont = True
|
|
ParentShowHint = True
|
|
ParentBidiMode = True
|
|
State = cbUnchecked
|
|
TabOrder = 1
|
|
TabStop = True
|
|
UseOnChange = False
|
|
Visible = True
|
|
end
|
|
end
|
|
end
|
|
object BuildPage: TPage
|
|
HelpContext = 0
|
|
Caption = 'Build'
|
|
ChildSizing.LeftRightSpacing = 0
|
|
ChildSizing.TopBottomSpacing = 0
|
|
ChildSizing.HorizontalSpacing = 0
|
|
ChildSizing.VerticalSpacing = 0
|
|
ChildSizing.ControlsPerLine = 0
|
|
ClientWidth = 447
|
|
ClientHeight = 332
|
|
ImageIndex = -1
|
|
ParentFont = True
|
|
ParentShowHint = True
|
|
object BuildCommandGroupbox: TGroupBox
|
|
Left = 6
|
|
Height = 80
|
|
Top = 72
|
|
Width = 435
|
|
HelpContext = 0
|
|
Align = alTop
|
|
AutoSize = False
|
|
BorderSpacing.Left = 0
|
|
BorderSpacing.Top = 0
|
|
BorderSpacing.Right = 0
|
|
BorderSpacing.Bottom = 0
|
|
BorderSpacing.Around = 6
|
|
BorderSpacing.CellAlignHorizontal = ccaFill
|
|
BorderSpacing.CellAlignVertical = ccaFill
|
|
Caption = 'Build Command'
|
|
ChildSizing.LeftRightSpacing = 0
|
|
ChildSizing.TopBottomSpacing = 0
|
|
ChildSizing.HorizontalSpacing = 0
|
|
ChildSizing.VerticalSpacing = 0
|
|
ChildSizing.ControlsPerLine = 0
|
|
ClientHeight = 61
|
|
ClientWidth = 431
|
|
Ctl3D = False
|
|
DockSite = False
|
|
DragCursor = crDrag
|
|
DragKind = dkDrag
|
|
DragMode = dmManual
|
|
Enabled = True
|
|
ParentBidiMode = True
|
|
ParentColor = True
|
|
ParentCtl3D = False
|
|
ParentFont = True
|
|
ParentShowHint = True
|
|
TabOrder = 0
|
|
TabStop = False
|
|
Visible = True
|
|
object BuildCommandMemo: TMemo
|
|
Left = 6
|
|
Height = 49
|
|
Top = 6
|
|
Width = 419
|
|
HelpContext = 0
|
|
Align = alClient
|
|
Alignment = taLeftJustify
|
|
BorderSpacing.Left = 0
|
|
BorderSpacing.Top = 0
|
|
BorderSpacing.Right = 0
|
|
BorderSpacing.Bottom = 0
|
|
BorderSpacing.Around = 6
|
|
BorderSpacing.CellAlignHorizontal = ccaFill
|
|
BorderSpacing.CellAlignVertical = ccaFill
|
|
DragCursor = crDrag
|
|
DragMode = dmManual
|
|
Enabled = True
|
|
Lines.Strings = (
|
|
'CompileCommandMemo'
|
|
)
|
|
MaxLength = -1
|
|
ParentBidiMode = True
|
|
ParentFont = True
|
|
ReadOnly = False
|
|
ScrollBars = ssNone
|
|
TabOrder = 0
|
|
TabStop = True
|
|
Visible = True
|
|
WantReturns = True
|
|
WantTabs = False
|
|
end
|
|
end
|
|
object BuildScanForFPCMsgCheckbox: TCheckBox
|
|
Left = 6
|
|
Height = 22
|
|
Top = 158
|
|
Width = 435
|
|
HelpContext = 0
|
|
Align = alTop
|
|
AllowGrayed = False
|
|
AutoSize = True
|
|
BorderSpacing.Left = 0
|
|
BorderSpacing.Top = 0
|
|
BorderSpacing.Right = 0
|
|
BorderSpacing.Bottom = 0
|
|
BorderSpacing.Around = 6
|
|
BorderSpacing.CellAlignHorizontal = ccaFill
|
|
BorderSpacing.CellAlignVertical = ccaFill
|
|
Caption = 'Scan for FPC messages'
|
|
Checked = False
|
|
DragCursor = crDrag
|
|
DragKind = dkDrag
|
|
DragMode = dmManual
|
|
Enabled = True
|
|
ParentColor = True
|
|
ParentFont = True
|
|
ParentShowHint = True
|
|
ParentBidiMode = True
|
|
State = cbUnchecked
|
|
TabOrder = 1
|
|
TabStop = True
|
|
UseOnChange = False
|
|
Visible = True
|
|
end
|
|
object BuildScanForMakeMsgCheckbox: TCheckBox
|
|
Left = 6
|
|
Height = 22
|
|
Top = 186
|
|
Width = 435
|
|
HelpContext = 0
|
|
Align = alTop
|
|
AllowGrayed = False
|
|
AutoSize = True
|
|
BorderSpacing.Left = 0
|
|
BorderSpacing.Top = 0
|
|
BorderSpacing.Right = 0
|
|
BorderSpacing.Bottom = 0
|
|
BorderSpacing.Around = 6
|
|
BorderSpacing.CellAlignHorizontal = ccaFill
|
|
BorderSpacing.CellAlignVertical = ccaFill
|
|
Caption = 'Scan for Make messages'
|
|
Checked = False
|
|
DragCursor = crDrag
|
|
DragKind = dkDrag
|
|
DragMode = dmManual
|
|
Enabled = True
|
|
ParentColor = True
|
|
ParentFont = True
|
|
ParentShowHint = True
|
|
ParentBidiMode = True
|
|
State = cbUnchecked
|
|
TabOrder = 2
|
|
TabStop = True
|
|
UseOnChange = False
|
|
Visible = True
|
|
end
|
|
object BuildWorkingDirGroupbox: TGroupBox
|
|
Left = 6
|
|
Height = 60
|
|
Top = 6
|
|
Width = 435
|
|
HelpContext = 0
|
|
Align = alTop
|
|
AutoSize = True
|
|
BorderSpacing.Left = 0
|
|
BorderSpacing.Top = 0
|
|
BorderSpacing.Right = 0
|
|
BorderSpacing.Bottom = 0
|
|
BorderSpacing.Around = 6
|
|
BorderSpacing.CellAlignHorizontal = ccaFill
|
|
BorderSpacing.CellAlignVertical = ccaFill
|
|
Caption = 'Working directory (Leave empty for file path)'
|
|
ChildSizing.LeftRightSpacing = 0
|
|
ChildSizing.TopBottomSpacing = 0
|
|
ChildSizing.HorizontalSpacing = 0
|
|
ChildSizing.VerticalSpacing = 0
|
|
ChildSizing.ControlsPerLine = 0
|
|
ClientHeight = 41
|
|
ClientWidth = 431
|
|
Ctl3D = False
|
|
DockSite = False
|
|
DragCursor = crDrag
|
|
DragKind = dkDrag
|
|
DragMode = dmManual
|
|
Enabled = True
|
|
ParentBidiMode = True
|
|
ParentColor = True
|
|
ParentCtl3D = False
|
|
ParentFont = True
|
|
ParentShowHint = True
|
|
TabOrder = 3
|
|
TabStop = False
|
|
Visible = True
|
|
object BuildWorkDirCombobox: TComboBox
|
|
AnchorSideLeft.Control = BuildWorkingDirGroupbox
|
|
AnchorSideTop.Control = BuildWorkingDirGroupbox
|
|
AnchorSideRight.Control = BuildBrowseWorkDirButton
|
|
Left = 6
|
|
Height = 29
|
|
Top = 6
|
|
Width = 388
|
|
HelpContext = 0
|
|
TabStop = True
|
|
Align = alNone
|
|
Anchors = [akTop, akLeft, akRight]
|
|
ArrowKeysTraverseList = True
|
|
AutoComplete = False
|
|
AutoCompleteText = [cbactEndOfLineComplete, cbactSearchAscending]
|
|
AutoDropDown = False
|
|
AutoSelect = False
|
|
AutoSize = True
|
|
BorderSpacing.Left = 0
|
|
BorderSpacing.Top = 0
|
|
BorderSpacing.Right = 0
|
|
BorderSpacing.Bottom = 0
|
|
BorderSpacing.Around = 6
|
|
BorderSpacing.CellAlignHorizontal = ccaFill
|
|
BorderSpacing.CellAlignVertical = ccaFill
|
|
CharCase = ecNormal
|
|
Ctl3D = False
|
|
DragCursor = crDrag
|
|
DragMode = dmManual
|
|
DropDownCount = 8
|
|
Enabled = True
|
|
ItemHeight = 0
|
|
ItemIndex = -1
|
|
ItemWidth = 0
|
|
MaxLength = 0
|
|
ParentBidiMode = True
|
|
ParentColor = False
|
|
ParentCtl3D = False
|
|
ParentFont = True
|
|
ParentShowHint = True
|
|
Sorted = False
|
|
Style = csDropDown
|
|
TabOrder = 0
|
|
Text = 'BuildWorkDirCombobox'
|
|
Visible = True
|
|
end
|
|
object BuildBrowseWorkDirButton: TButton
|
|
AnchorSideTop.Control = BuildWorkingDirGroupbox
|
|
AnchorSideRight.Control = BuildWorkingDirGroupbox
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 400
|
|
Height = 25
|
|
Top = 6
|
|
Width = 25
|
|
HelpContext = 0
|
|
Align = alNone
|
|
Anchors = [akTop, akRight]
|
|
AutoSize = False
|
|
BorderSpacing.Left = 0
|
|
BorderSpacing.Top = 0
|
|
BorderSpacing.Right = 0
|
|
BorderSpacing.Bottom = 0
|
|
BorderSpacing.Around = 6
|
|
BorderSpacing.CellAlignHorizontal = ccaFill
|
|
BorderSpacing.CellAlignVertical = ccaFill
|
|
Cancel = False
|
|
Caption = '...'
|
|
Default = False
|
|
DragCursor = crDrag
|
|
DragMode = dmManual
|
|
Enabled = True
|
|
ParentBidiMode = True
|
|
ModalResult = 0
|
|
OnClick = BuildBrowseWorkDirButtonCLICK
|
|
ParentFont = True
|
|
ParentShowHint = True
|
|
TabOrder = 1
|
|
TabStop = True
|
|
Visible = True
|
|
end
|
|
end
|
|
end
|
|
object RunPage: TPage
|
|
HelpContext = 0
|
|
Caption = 'Run'
|
|
ChildSizing.LeftRightSpacing = 0
|
|
ChildSizing.TopBottomSpacing = 0
|
|
ChildSizing.HorizontalSpacing = 0
|
|
ChildSizing.VerticalSpacing = 0
|
|
ChildSizing.ControlsPerLine = 0
|
|
ClientWidth = 447
|
|
ClientHeight = 332
|
|
ImageIndex = -1
|
|
ParentFont = True
|
|
ParentShowHint = True
|
|
object AlwaysCompileFirstCheckbox: TCheckBox
|
|
Left = 6
|
|
Height = 22
|
|
Top = 6
|
|
Width = 435
|
|
HelpContext = 0
|
|
Align = alTop
|
|
AllowGrayed = False
|
|
AutoSize = True
|
|
BorderSpacing.Left = 0
|
|
BorderSpacing.Top = 0
|
|
BorderSpacing.Right = 0
|
|
BorderSpacing.Bottom = 0
|
|
BorderSpacing.Around = 6
|
|
BorderSpacing.CellAlignHorizontal = ccaFill
|
|
BorderSpacing.CellAlignVertical = ccaFill
|
|
Caption = 'Always Build before Run'
|
|
Checked = False
|
|
DragCursor = crDrag
|
|
DragKind = dkDrag
|
|
DragMode = dmManual
|
|
Enabled = True
|
|
ParentColor = True
|
|
ParentFont = True
|
|
ParentShowHint = True
|
|
ParentBidiMode = True
|
|
State = cbUnchecked
|
|
TabOrder = 0
|
|
TabStop = True
|
|
UseOnChange = False
|
|
Visible = True
|
|
end
|
|
object RunCommandGroupbox: TGroupBox
|
|
Left = 6
|
|
Height = 98
|
|
Top = 100
|
|
Width = 435
|
|
HelpContext = 0
|
|
Align = alTop
|
|
AutoSize = False
|
|
BorderSpacing.Left = 0
|
|
BorderSpacing.Top = 0
|
|
BorderSpacing.Right = 0
|
|
BorderSpacing.Bottom = 0
|
|
BorderSpacing.Around = 6
|
|
BorderSpacing.CellAlignHorizontal = ccaFill
|
|
BorderSpacing.CellAlignVertical = ccaFill
|
|
Caption = 'Run Command'
|
|
ChildSizing.LeftRightSpacing = 0
|
|
ChildSizing.TopBottomSpacing = 0
|
|
ChildSizing.HorizontalSpacing = 0
|
|
ChildSizing.VerticalSpacing = 0
|
|
ChildSizing.ControlsPerLine = 0
|
|
ClientHeight = 79
|
|
ClientWidth = 431
|
|
Ctl3D = False
|
|
DockSite = False
|
|
DragCursor = crDrag
|
|
DragKind = dkDrag
|
|
DragMode = dmManual
|
|
Enabled = True
|
|
ParentBidiMode = True
|
|
ParentColor = True
|
|
ParentCtl3D = False
|
|
ParentFont = True
|
|
ParentShowHint = True
|
|
TabOrder = 1
|
|
TabStop = False
|
|
Visible = True
|
|
object RunCommandMemo: TMemo
|
|
Left = 6
|
|
Height = 67
|
|
Top = 6
|
|
Width = 419
|
|
HelpContext = 0
|
|
Align = alClient
|
|
Alignment = taLeftJustify
|
|
BorderSpacing.Left = 0
|
|
BorderSpacing.Top = 0
|
|
BorderSpacing.Right = 0
|
|
BorderSpacing.Bottom = 0
|
|
BorderSpacing.Around = 6
|
|
BorderSpacing.CellAlignHorizontal = ccaFill
|
|
BorderSpacing.CellAlignVertical = ccaFill
|
|
DragCursor = crDrag
|
|
DragMode = dmManual
|
|
Enabled = True
|
|
Lines.Strings = (
|
|
'CompileCommandMemo'
|
|
)
|
|
MaxLength = -1
|
|
ParentBidiMode = True
|
|
ParentFont = True
|
|
ReadOnly = False
|
|
ScrollBars = ssNone
|
|
TabOrder = 0
|
|
TabStop = True
|
|
Visible = True
|
|
WantReturns = True
|
|
WantTabs = False
|
|
end
|
|
end
|
|
object RunWorkDirGroupbox: TGroupBox
|
|
Left = 6
|
|
Height = 60
|
|
Top = 34
|
|
Width = 435
|
|
HelpContext = 0
|
|
Align = alTop
|
|
AutoSize = True
|
|
BorderSpacing.Left = 0
|
|
BorderSpacing.Top = 0
|
|
BorderSpacing.Right = 0
|
|
BorderSpacing.Bottom = 0
|
|
BorderSpacing.Around = 6
|
|
BorderSpacing.CellAlignHorizontal = ccaFill
|
|
BorderSpacing.CellAlignVertical = ccaFill
|
|
Caption = 'Working Directory (Leave empty for file path)'
|
|
ChildSizing.LeftRightSpacing = 0
|
|
ChildSizing.TopBottomSpacing = 0
|
|
ChildSizing.HorizontalSpacing = 0
|
|
ChildSizing.VerticalSpacing = 0
|
|
ChildSizing.ControlsPerLine = 0
|
|
ClientHeight = 41
|
|
ClientWidth = 431
|
|
Ctl3D = False
|
|
DockSite = False
|
|
DragCursor = crDrag
|
|
DragKind = dkDrag
|
|
DragMode = dmManual
|
|
Enabled = True
|
|
ParentBidiMode = True
|
|
ParentColor = True
|
|
ParentCtl3D = False
|
|
ParentFont = True
|
|
ParentShowHint = True
|
|
TabOrder = 2
|
|
TabStop = False
|
|
Visible = True
|
|
object RunWorkDirCombobox: TComboBox
|
|
AnchorSideLeft.Control = RunWorkDirGroupbox
|
|
AnchorSideTop.Control = RunWorkDirGroupbox
|
|
AnchorSideRight.Control = RunBrowseWorkDirButton
|
|
Left = 6
|
|
Height = 29
|
|
Top = 6
|
|
Width = 388
|
|
HelpContext = 0
|
|
TabStop = True
|
|
Align = alNone
|
|
Anchors = [akTop, akLeft, akRight]
|
|
ArrowKeysTraverseList = True
|
|
AutoComplete = False
|
|
AutoCompleteText = [cbactEndOfLineComplete, cbactSearchAscending]
|
|
AutoDropDown = False
|
|
AutoSelect = False
|
|
AutoSize = True
|
|
BorderSpacing.Left = 0
|
|
BorderSpacing.Top = 0
|
|
BorderSpacing.Right = 0
|
|
BorderSpacing.Bottom = 0
|
|
BorderSpacing.Around = 6
|
|
BorderSpacing.CellAlignHorizontal = ccaFill
|
|
BorderSpacing.CellAlignVertical = ccaFill
|
|
CharCase = ecNormal
|
|
Ctl3D = False
|
|
DragCursor = crDrag
|
|
DragMode = dmManual
|
|
DropDownCount = 8
|
|
Enabled = True
|
|
ItemHeight = 0
|
|
ItemIndex = -1
|
|
ItemWidth = 0
|
|
MaxLength = 0
|
|
ParentBidiMode = True
|
|
ParentColor = False
|
|
ParentCtl3D = False
|
|
ParentFont = True
|
|
ParentShowHint = True
|
|
Sorted = False
|
|
Style = csDropDown
|
|
TabOrder = 0
|
|
Text = 'RunWorkDirCombobox'
|
|
Visible = True
|
|
end
|
|
object RunBrowseWorkDirButton: TButton
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 400
|
|
Height = 29
|
|
Top = 6
|
|
Width = 25
|
|
HelpType = htKeyword
|
|
HelpContext = 0
|
|
Align = alRight
|
|
AutoSize = False
|
|
BorderSpacing.Left = 0
|
|
BorderSpacing.Top = 0
|
|
BorderSpacing.Right = 0
|
|
BorderSpacing.Bottom = 0
|
|
BorderSpacing.Around = 6
|
|
BorderSpacing.CellAlignHorizontal = ccaFill
|
|
BorderSpacing.CellAlignVertical = ccaFill
|
|
Cancel = False
|
|
Caption = '...'
|
|
Default = False
|
|
DragCursor = crDrag
|
|
DragMode = dmManual
|
|
Enabled = True
|
|
ParentBidiMode = True
|
|
ModalResult = 0
|
|
OnClick = BuildBrowseWorkDirButtonCLICK
|
|
ParentFont = True
|
|
ParentShowHint = True
|
|
TabOrder = 1
|
|
TabStop = True
|
|
Visible = True
|
|
end
|
|
end
|
|
end
|
|
end
|
|
object ButtonPanel: TButtonPanel
|
|
Left = 6
|
|
Height = 48
|
|
Top = 369
|
|
Width = 439
|
|
HelpContext = 0
|
|
Align = alBottom
|
|
AutoSize = True
|
|
ButtonOrder = boDefault
|
|
TabOrder = 1
|
|
DefaultButton = pbOK
|
|
ShowButtons = [pbOK, pbCancel, pbHelp]
|
|
ShowGlyphs = [pbOK, pbCancel, pbClose, pbHelp]
|
|
Visible = True
|
|
end
|
|
end
|