mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-22 13:59:31 +02:00
+ Modified patch from Giuliano Colla for quickoptions
git-svn-id: trunk@12069 -
This commit is contained in:
marc
parent
b24b5ec37d
commit
460ae152ea
@ -1,302 +1,431 @@
|
||||
object ConfigureBuildLazarusDlg: TConfigureBuildLazarusDlg
|
||||
Left = 190
|
||||
Height = 480
|
||||
Top = 142
|
||||
Width = 485
|
||||
HorzScrollBar.Page = 484
|
||||
VertScrollBar.Page = 479
|
||||
ActiveControl = CleanAllCheckBox
|
||||
Left = 518
|
||||
Height = 535
|
||||
Top = 169
|
||||
Width = 489
|
||||
HorzScrollBar.Page = 488
|
||||
VertScrollBar.Page = 534
|
||||
ActiveControl = SaveSettingsButton
|
||||
BorderIcons = [biSystemMenu]
|
||||
Caption = 'ConfigureBuildLazarusDlg'
|
||||
ClientHeight = 480
|
||||
ClientWidth = 485
|
||||
Constraints.MinHeight = 480
|
||||
Constraints.MinWidth = 485
|
||||
OnClose = FormClose
|
||||
ClientHeight = 535
|
||||
ClientWidth = 489
|
||||
Constraints.MinHeight = 535
|
||||
Constraints.MinWidth = 489
|
||||
OnCreate = FormCreate
|
||||
OnDestroy = FormDestroy
|
||||
OnShow = FormShow
|
||||
Position = poScreenCenter
|
||||
object OptionsLabel: TLabel
|
||||
AnchorSideLeft.Control = ItemsListBox
|
||||
AnchorSideTop.Control = ItemsListBox
|
||||
object Panel1: TPanel
|
||||
AnchorSideLeft.Control = Notebook
|
||||
AnchorSideTop.Control = Notebook
|
||||
AnchorSideTop.Side = asrBottom
|
||||
Left = 6
|
||||
Height = 14
|
||||
Top = 282
|
||||
Width = 42
|
||||
BorderSpacing.Top = 18
|
||||
Caption = 'Options:'
|
||||
Color = clNone
|
||||
ParentColor = False
|
||||
end
|
||||
object TargetOSLabel: TLabel
|
||||
AnchorSideLeft.Control = OptionsLabel
|
||||
AnchorSideTop.Control = TargetOSEdit
|
||||
Left = 6
|
||||
Height = 14
|
||||
Top = 310
|
||||
Width = 54
|
||||
Caption = 'Target OS:'
|
||||
Color = clNone
|
||||
ParentColor = False
|
||||
end
|
||||
object TargetDirectoryLabel: TLabel
|
||||
AnchorSideLeft.Control = TargetOSLabel
|
||||
AnchorSideTop.Control = TargetDirectoryComboBox
|
||||
Left = 6
|
||||
Height = 14
|
||||
Top = 338
|
||||
Width = 84
|
||||
Caption = 'Target Directory:'
|
||||
Color = clNone
|
||||
ParentColor = False
|
||||
end
|
||||
object TargetCPULabel: TLabel
|
||||
AnchorSideLeft.Control = TargetDirectoryLabel
|
||||
AnchorSideTop.Control = TargetCPUComboBox
|
||||
Left = 6
|
||||
Height = 14
|
||||
Top = 365
|
||||
Width = 56
|
||||
Caption = 'Target CPU'
|
||||
Color = clNone
|
||||
ParentColor = False
|
||||
end
|
||||
object CleanAllCheckBox: TCheckBox
|
||||
AnchorSideLeft.Control = LCLInterfaceRadioGroup
|
||||
AnchorSideTop.Control = LCLInterfaceRadioGroup
|
||||
AnchorSideTop.Side = asrBottom
|
||||
AnchorSideBottom.Control = WithStaticPackagesCheckBox
|
||||
Left = 320
|
||||
Height = 13
|
||||
Top = 232
|
||||
Width = 61
|
||||
Anchors = [akLeft, akBottom]
|
||||
BorderSpacing.Top = 18
|
||||
BorderSpacing.Bottom = 6
|
||||
Caption = 'Clean All'
|
||||
AnchorSideRight.Control = Notebook
|
||||
AnchorSideRight.Side = asrBottom
|
||||
Height = 50
|
||||
Top = 485
|
||||
Width = 489
|
||||
Align = alBottom
|
||||
BevelOuter = bvNone
|
||||
ClientHeight = 50
|
||||
ClientWidth = 489
|
||||
TabOrder = 0
|
||||
object CompileButton: TButton
|
||||
AnchorSideRight.Control = SaveSettingsButton
|
||||
AnchorSideBottom.Control = SaveSettingsButton
|
||||
AnchorSideBottom.Side = asrBottom
|
||||
Left = 245
|
||||
Height = 26
|
||||
Top = 12
|
||||
Width = 59
|
||||
Anchors = [akRight, akBottom]
|
||||
AutoSize = True
|
||||
BorderSpacing.Right = 18
|
||||
BorderSpacing.InnerBorder = 4
|
||||
Caption = 'Compile'
|
||||
OnClick = CompileButtonClick
|
||||
TabOrder = 0
|
||||
end
|
||||
object SaveSettingsButton: TButton
|
||||
AnchorSideRight.Control = CancelButton
|
||||
AnchorSideBottom.Control = CancelButton
|
||||
AnchorSideBottom.Side = asrBottom
|
||||
Left = 322
|
||||
Height = 26
|
||||
Top = 12
|
||||
Width = 89
|
||||
Anchors = [akRight, akBottom]
|
||||
AutoSize = True
|
||||
BorderSpacing.Right = 18
|
||||
BorderSpacing.InnerBorder = 4
|
||||
Caption = 'Save settings'
|
||||
OnClick = SaveSettingsButtonClick
|
||||
TabOrder = 1
|
||||
end
|
||||
object CancelButton: TButton
|
||||
AnchorSideRight.Control = Panel1
|
||||
AnchorSideRight.Side = asrBottom
|
||||
AnchorSideBottom.Control = Panel1
|
||||
AnchorSideBottom.Side = asrCenter
|
||||
Left = 429
|
||||
Height = 26
|
||||
Top = 12
|
||||
Width = 54
|
||||
Anchors = [akRight, akBottom]
|
||||
AutoSize = True
|
||||
BorderSpacing.Around = 6
|
||||
BorderSpacing.InnerBorder = 4
|
||||
Cancel = True
|
||||
Caption = 'Cancel'
|
||||
OnClick = CancelButtonClick
|
||||
TabOrder = 2
|
||||
end
|
||||
end
|
||||
object OptionsEdit: TEdit
|
||||
AnchorSideTop.Control = OptionsLabel
|
||||
AnchorSideRight.Control = Owner
|
||||
AnchorSideRight.Side = asrBottom
|
||||
Left = 156
|
||||
Height = 22
|
||||
Top = 282
|
||||
Width = 323
|
||||
Anchors = [akTop, akLeft, akRight]
|
||||
BorderSpacing.Right = 6
|
||||
TabOrder = 4
|
||||
end
|
||||
object TargetOSEdit: TEdit
|
||||
AnchorSideTop.Control = OptionsEdit
|
||||
AnchorSideTop.Side = asrBottom
|
||||
AnchorSideRight.Control = Owner
|
||||
AnchorSideRight.Side = asrBottom
|
||||
Left = 156
|
||||
Height = 22
|
||||
Top = 310
|
||||
Width = 323
|
||||
Anchors = [akTop, akLeft, akRight]
|
||||
BorderSpacing.Around = 6
|
||||
TabOrder = 5
|
||||
end
|
||||
object TargetDirectoryComboBox: TComboBox
|
||||
AnchorSideLeft.Control = TargetOSEdit
|
||||
AnchorSideTop.Control = TargetOSEdit
|
||||
AnchorSideTop.Side = asrBottom
|
||||
AnchorSideRight.Control = TargetDirectoryButton
|
||||
Left = 156
|
||||
Height = 21
|
||||
Top = 338
|
||||
Width = 295
|
||||
Anchors = [akTop, akLeft, akRight]
|
||||
AutoCompleteText = [cbactEndOfLineComplete, cbactSearchAscending]
|
||||
ItemHeight = 13
|
||||
MaxLength = 0
|
||||
TabOrder = 6
|
||||
end
|
||||
object TargetDirectoryButton: TButton
|
||||
AnchorSideTop.Control = TargetOSEdit
|
||||
AnchorSideTop.Side = asrBottom
|
||||
AnchorSideRight.Control = Owner
|
||||
AnchorSideRight.Side = asrBottom
|
||||
AnchorSideBottom.Control = TargetDirectoryComboBox
|
||||
AnchorSideBottom.Side = asrBottom
|
||||
Left = 457
|
||||
Height = 21
|
||||
Top = 338
|
||||
Width = 22
|
||||
Anchors = [akTop, akRight, akBottom]
|
||||
BorderSpacing.Left = 6
|
||||
BorderSpacing.Right = 6
|
||||
BorderSpacing.InnerBorder = 4
|
||||
Caption = '...'
|
||||
OnClick = TargetDirectoryButtonClick
|
||||
TabOrder = 7
|
||||
end
|
||||
object LCLInterfaceRadioGroup: TRadioGroup
|
||||
AnchorSideLeft.Control = ItemListHeader
|
||||
AnchorSideLeft.Side = asrBottom
|
||||
object Notebook: TNotebook
|
||||
AnchorSideLeft.Control = Owner
|
||||
AnchorSideTop.Control = Owner
|
||||
AnchorSideRight.Control = Owner
|
||||
AnchorSideRight.Side = asrBottom
|
||||
AnchorSideBottom.Control = CleanAllCheckBox
|
||||
Left = 320
|
||||
Height = 208
|
||||
Top = 6
|
||||
Width = 159
|
||||
Anchors = [akTop, akRight, akBottom]
|
||||
AutoFill = True
|
||||
BorderSpacing.Around = 6
|
||||
Caption = 'LCLInterfaceRadioGroup'
|
||||
ChildSizing.LeftRightSpacing = 6
|
||||
ChildSizing.TopBottomSpacing = 6
|
||||
ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
|
||||
ChildSizing.EnlargeVertical = crsHomogenousChildResize
|
||||
ChildSizing.ShrinkHorizontal = crsScaleChilds
|
||||
ChildSizing.ShrinkVertical = crsScaleChilds
|
||||
ChildSizing.Layout = cclLeftToRightThenTopToBottom
|
||||
ChildSizing.ControlsPerLine = 1
|
||||
TabOrder = 2
|
||||
end
|
||||
object WithStaticPackagesCheckBox: TCheckBox
|
||||
AnchorSideLeft.Control = LCLInterfaceRadioGroup
|
||||
AnchorSideTop.Control = CleanAllCheckBox
|
||||
AnchorSideTop.Side = asrBottom
|
||||
AnchorSideBottom.Control = ItemsListBox
|
||||
AnchorSideBottom.Side = asrBottom
|
||||
Left = 320
|
||||
Height = 13
|
||||
Top = 251
|
||||
Width = 166
|
||||
Anchors = [akLeft, akBottom]
|
||||
BorderSpacing.Top = 6
|
||||
Caption = 'WithStaticPackagesCheckBox'
|
||||
TabOrder = 3
|
||||
end
|
||||
object RestartAfterBuildCheckBox: TCheckBox
|
||||
AnchorSideLeft.Control = TargetCPULabel
|
||||
AnchorSideTop.Control = TargetCPUComboBox
|
||||
AnchorSideTop.Side = asrBottom
|
||||
Left = 6
|
||||
Height = 13
|
||||
Top = 404
|
||||
Width = 148
|
||||
BorderSpacing.Top = 18
|
||||
Caption = 'RestartAfterBuildCheckBox'
|
||||
TabOrder = 9
|
||||
end
|
||||
object ConfirmBuildCheckBox: TCheckBox
|
||||
AnchorSideLeft.Control = RestartAfterBuildCheckBox
|
||||
AnchorSideTop.Control = RestartAfterBuildCheckBox
|
||||
AnchorSideTop.Side = asrBottom
|
||||
Left = 6
|
||||
Height = 13
|
||||
Top = 423
|
||||
Width = 127
|
||||
BorderSpacing.Top = 6
|
||||
Caption = 'ConfirmBuildCheckBox'
|
||||
TabOrder = 10
|
||||
end
|
||||
object SaveSettingsButton: TButton
|
||||
AnchorSideRight.Control = CancelButton
|
||||
AnchorSideBottom.Control = CancelButton
|
||||
AnchorSideBottom.Side = asrBottom
|
||||
Left = 308
|
||||
Height = 25
|
||||
Top = 449
|
||||
Width = 92
|
||||
Anchors = [akRight, akBottom]
|
||||
AutoSize = True
|
||||
BorderSpacing.Right = 18
|
||||
BorderSpacing.InnerBorder = 4
|
||||
Caption = 'Save settings'
|
||||
Default = True
|
||||
OnClick = SaveSettingsButtonClick
|
||||
TabOrder = 11
|
||||
end
|
||||
object CancelButton: TButton
|
||||
AnchorSideRight.Control = Owner
|
||||
AnchorSideRight.Side = asrBottom
|
||||
AnchorSideBottom.Control = Owner
|
||||
AnchorSideBottom.Side = asrBottom
|
||||
Left = 418
|
||||
Height = 25
|
||||
Top = 449
|
||||
Width = 61
|
||||
Anchors = [akRight, akBottom]
|
||||
AutoSize = True
|
||||
BorderSpacing.Around = 6
|
||||
BorderSpacing.InnerBorder = 4
|
||||
Cancel = True
|
||||
Caption = 'Cancel'
|
||||
OnClick = CancelButtonClick
|
||||
TabOrder = 12
|
||||
end
|
||||
object ItemsListBox: TListBox
|
||||
AnchorSideLeft.Control = Owner
|
||||
AnchorSideTop.Control = ItemListHeader
|
||||
AnchorSideTop.Side = asrBottom
|
||||
AnchorSideRight.Control = ItemListHeader
|
||||
AnchorSideRight.Side = asrBottom
|
||||
Left = 6
|
||||
Height = 234
|
||||
Top = 30
|
||||
Width = 308
|
||||
AnchorSideBottom.Control = Panel1
|
||||
Height = 485
|
||||
Width = 489
|
||||
Anchors = [akTop, akLeft, akRight, akBottom]
|
||||
BorderSpacing.Left = 6
|
||||
ItemHeight = 25
|
||||
OnDrawItem = ItemsListBoxDrawItem
|
||||
OnMouseDown = ItemsListBoxMouseDown
|
||||
OnShowHint = ItemsListBoxShowHint
|
||||
ParentShowHint = False
|
||||
ShowHint = True
|
||||
Style = lbOwnerDrawFixed
|
||||
OnEnter = NotebookPageChanged
|
||||
OnPageChanged = NotebookPageChanged
|
||||
PageIndex = 0
|
||||
TabOrder = 1
|
||||
end
|
||||
object TargetCPUComboBox: TComboBox
|
||||
AnchorSideLeft.Control = TargetDirectoryComboBox
|
||||
AnchorSideTop.Control = TargetDirectoryComboBox
|
||||
AnchorSideTop.Side = asrBottom
|
||||
AnchorSideRight.Control = TargetDirectoryComboBox
|
||||
AnchorSideRight.Side = asrBottom
|
||||
Left = 156
|
||||
Height = 21
|
||||
Top = 365
|
||||
Width = 295
|
||||
Anchors = [akTop, akLeft, akRight]
|
||||
AutoCompleteText = [cbactEndOfLineComplete, cbactSearchAscending]
|
||||
BorderSpacing.Top = 6
|
||||
ItemHeight = 13
|
||||
MaxLength = 0
|
||||
TabOrder = 8
|
||||
end
|
||||
object CompileButton: TButton
|
||||
AnchorSideRight.Control = SaveSettingsButton
|
||||
AnchorSideBottom.Control = SaveSettingsButton
|
||||
AnchorSideBottom.Side = asrBottom
|
||||
Left = 225
|
||||
Height = 25
|
||||
Top = 449
|
||||
Width = 65
|
||||
Anchors = [akRight, akBottom]
|
||||
AutoSize = True
|
||||
BorderSpacing.Right = 18
|
||||
BorderSpacing.InnerBorder = 4
|
||||
Caption = 'Compile'
|
||||
OnClick = CompileButtonClick
|
||||
TabOrder = 13
|
||||
end
|
||||
object ItemListHeader: THeaderControl
|
||||
Left = 6
|
||||
Height = 24
|
||||
Top = 6
|
||||
Width = 308
|
||||
Sections = <>
|
||||
OnSectionClick = ItemListHeaderSectionClick
|
||||
Anchors = [akTop, akLeft, akRight]
|
||||
OnResize = ItemListHeaderResize
|
||||
object QuickBuildOptionsPage: TPage
|
||||
AnchorSideBottom.Side = asrBottom
|
||||
Caption = 'QuickBuildOptions'
|
||||
ClientWidth = 485
|
||||
ClientHeight = 455
|
||||
object QuickLCLInterfaceComboLabel: TLabel
|
||||
AnchorSideLeft.Control = QuickBuildOptionsRadioGroup
|
||||
AnchorSideLeft.Side = asrBottom
|
||||
AnchorSideRight.Side = asrBottom
|
||||
Left = 286
|
||||
Height = 13
|
||||
Top = 44
|
||||
Width = 175
|
||||
BorderSpacing.Right = 24
|
||||
Caption = 'QuickLCLInterfaceComboLabel'
|
||||
ParentColor = False
|
||||
end
|
||||
object AppLCLLabel: TLabel
|
||||
AnchorSideLeft.Control = QuickLCLInterfaceComboLabel
|
||||
AnchorSideRight.Control = QuickBuildOptionsPage
|
||||
AnchorSideRight.Side = asrBottom
|
||||
Left = 286
|
||||
Height = 13
|
||||
Top = 84
|
||||
Width = 36
|
||||
BorderSpacing.Right = 24
|
||||
Caption = 'Target'
|
||||
ParentColor = False
|
||||
end
|
||||
object IDELCLLabel: TLabel
|
||||
AnchorSideLeft.Control = QuickLCLInterfaceComboLabel
|
||||
AnchorSideRight.Side = asrBottom
|
||||
Left = 286
|
||||
Height = 13
|
||||
Top = 132
|
||||
Width = 21
|
||||
BorderSpacing.Right = 24
|
||||
Caption = 'IDE'
|
||||
ParentColor = False
|
||||
end
|
||||
object AppLCLInterfaceComboBox: TComboBox
|
||||
AnchorSideRight.Control = QuickBuildOptionsPage
|
||||
AnchorSideRight.Side = asrBottom
|
||||
Left = 361
|
||||
Height = 25
|
||||
Top = 76
|
||||
Width = 100
|
||||
Anchors = [akTop, akRight]
|
||||
AutoCompleteText = [cbactEndOfLineComplete, cbactSearchAscending]
|
||||
BorderSpacing.Right = 24
|
||||
Enabled = False
|
||||
MaxLength = 0
|
||||
OnChange = AppLCLInterfaceComboBoxChange
|
||||
TabOrder = 0
|
||||
Text = '(none)'
|
||||
end
|
||||
object IDELCLInterfaceComboBox: TComboBox
|
||||
AnchorSideRight.Control = QuickBuildOptionsPage
|
||||
AnchorSideRight.Side = asrBottom
|
||||
Left = 361
|
||||
Height = 25
|
||||
Top = 124
|
||||
Width = 100
|
||||
Anchors = [akTop, akRight]
|
||||
AutoCompleteText = [cbactEndOfLineComplete, cbactSearchAscending]
|
||||
BorderSpacing.Right = 24
|
||||
Enabled = False
|
||||
MaxLength = 0
|
||||
OnChange = AppLCLInterfaceComboBoxChange
|
||||
TabOrder = 1
|
||||
Text = '(none)'
|
||||
end
|
||||
object QuickBuildOptionsRadioGroup: TRadioGroup
|
||||
AnchorSideBottom.Side = asrBottom
|
||||
Left = 6
|
||||
Height = 264
|
||||
Top = 4
|
||||
Width = 256
|
||||
AutoFill = True
|
||||
BorderSpacing.Right = 24
|
||||
Caption = 'QuickBuildOptionsRadioGroup'
|
||||
ChildSizing.LeftRightSpacing = 6
|
||||
ChildSizing.TopBottomSpacing = 6
|
||||
ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
|
||||
ChildSizing.EnlargeVertical = crsHomogenousChildResize
|
||||
ChildSizing.ShrinkHorizontal = crsScaleChilds
|
||||
ChildSizing.ShrinkVertical = crsScaleChilds
|
||||
ChildSizing.Layout = cclLeftToRightThenTopToBottom
|
||||
ChildSizing.ControlsPerLine = 1
|
||||
ClientHeight = 247
|
||||
ClientWidth = 252
|
||||
ItemIndex = 5
|
||||
Items.Strings = (
|
||||
'Build LCL'
|
||||
'Build IDE with Packages'
|
||||
'Build IDE without Packages'
|
||||
'Build All'
|
||||
'Clean Up + Build all'
|
||||
'Other'
|
||||
)
|
||||
OnClick = QuickBuildOptionsRadioGroupClick
|
||||
TabOrder = 2
|
||||
end
|
||||
end
|
||||
object AdvancedBuildOptionsPage: TPage
|
||||
Caption = 'AdvancedBuildOptions'
|
||||
ClientWidth = 485
|
||||
ClientHeight = 455
|
||||
object OptionsLabel: TLabel
|
||||
AnchorSideTop.Control = ItemsListBox
|
||||
AnchorSideTop.Side = asrBottom
|
||||
Left = 6
|
||||
Height = 13
|
||||
Top = 281
|
||||
Width = 44
|
||||
BorderSpacing.Top = 19
|
||||
Caption = 'Options'
|
||||
ParentColor = False
|
||||
end
|
||||
object TargetOSLabel: TLabel
|
||||
AnchorSideLeft.Control = OptionsLabel
|
||||
AnchorSideTop.Control = TargetOsEdit
|
||||
Left = 6
|
||||
Height = 13
|
||||
Top = 309
|
||||
Width = 58
|
||||
Caption = 'Target OS'
|
||||
ParentColor = False
|
||||
end
|
||||
object TargetDirectoryLabel: TLabel
|
||||
AnchorSideLeft.Control = TargetOSLabel
|
||||
AnchorSideTop.Control = TargetDirectoryComboBox
|
||||
Left = 6
|
||||
Height = 13
|
||||
Top = 337
|
||||
Width = 91
|
||||
Caption = 'Target Directory'
|
||||
ParentColor = False
|
||||
end
|
||||
object TargetCPULabel: TLabel
|
||||
AnchorSideLeft.Control = TargetDirectoryLabel
|
||||
AnchorSideTop.Control = TargetCPUComboBox
|
||||
Left = 6
|
||||
Height = 13
|
||||
Top = 363
|
||||
Width = 65
|
||||
Caption = 'Target CPU'
|
||||
ParentColor = False
|
||||
end
|
||||
object ItemListHeader: THeaderControl
|
||||
Left = 6
|
||||
Height = 24
|
||||
Top = 4
|
||||
Width = 308
|
||||
Sections = <>
|
||||
OnSectionClick = ItemListHeaderSectionClick
|
||||
OnResize = ItemListHeaderResize
|
||||
end
|
||||
object LCLInterfaceRadioGroup: TRadioGroup
|
||||
AnchorSideLeft.Control = ItemListHeader
|
||||
AnchorSideLeft.Side = asrBottom
|
||||
AnchorSideTop.Control = AdvancedBuildOptionsPage
|
||||
AnchorSideRight.Control = AdvancedBuildOptionsPage
|
||||
AnchorSideRight.Side = asrBottom
|
||||
AnchorSideBottom.Control = CleanAllCheckBox
|
||||
Left = 320
|
||||
Height = 194
|
||||
Top = 6
|
||||
Width = 159
|
||||
Anchors = [akTop, akLeft, akRight, akBottom]
|
||||
AutoFill = True
|
||||
BorderSpacing.Around = 6
|
||||
Caption = 'LCLInterfaceRadioGroup'
|
||||
ChildSizing.LeftRightSpacing = 6
|
||||
ChildSizing.TopBottomSpacing = 6
|
||||
ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
|
||||
ChildSizing.EnlargeVertical = crsHomogenousChildResize
|
||||
ChildSizing.ShrinkHorizontal = crsScaleChilds
|
||||
ChildSizing.ShrinkVertical = crsScaleChilds
|
||||
ChildSizing.Layout = cclLeftToRightThenTopToBottom
|
||||
ChildSizing.ControlsPerLine = 1
|
||||
TabOrder = 0
|
||||
end
|
||||
object CleanAllCheckBox: TCheckBox
|
||||
AnchorSideLeft.Control = LCLInterfaceRadioGroup
|
||||
AnchorSideTop.Control = LCLInterfaceRadioGroup
|
||||
AnchorSideTop.Side = asrBottom
|
||||
AnchorSideBottom.Control = WithStaticPackagesCheckBox
|
||||
Left = 320
|
||||
Height = 20
|
||||
Top = 216
|
||||
Width = 79
|
||||
Anchors = [akLeft, akBottom]
|
||||
BorderSpacing.Top = 16
|
||||
BorderSpacing.Bottom = 6
|
||||
Caption = 'Clean All'
|
||||
TabOrder = 1
|
||||
end
|
||||
object WithStaticPackagesCheckBox: TCheckBox
|
||||
AnchorSideLeft.Control = LCLInterfaceRadioGroup
|
||||
AnchorSideTop.Control = CleanAllCheckBox
|
||||
AnchorSideTop.Side = asrBottom
|
||||
AnchorSideBottom.Control = ItemsListBox
|
||||
AnchorSideBottom.Side = asrBottom
|
||||
Left = 320
|
||||
Height = 20
|
||||
Top = 242
|
||||
Width = 194
|
||||
Anchors = [akLeft, akBottom]
|
||||
BorderSpacing.Top = 6
|
||||
Caption = 'WithStaticPackagesCheckBox'
|
||||
TabOrder = 2
|
||||
end
|
||||
object ItemsListBox: TListBox
|
||||
AnchorSideTop.Control = ItemListHeader
|
||||
AnchorSideTop.Side = asrBottom
|
||||
AnchorSideRight.Control = ItemListHeader
|
||||
AnchorSideRight.Side = asrBottom
|
||||
Left = 6
|
||||
Height = 234
|
||||
Top = 28
|
||||
Width = 308
|
||||
Anchors = [akTop, akLeft, akRight, akBottom]
|
||||
BorderSpacing.Left = 6
|
||||
ItemHeight = 25
|
||||
OnDrawItem = ItemsListBoxDrawItem
|
||||
OnMouseDown = ItemsListBoxMouseDown
|
||||
OnShowHint = ItemsListBoxShowHint
|
||||
ParentShowHint = False
|
||||
ShowHint = True
|
||||
Style = lbOwnerDrawFixed
|
||||
TabOrder = 3
|
||||
TopIndex = -1
|
||||
end
|
||||
object OptionsEdit: TEdit
|
||||
AnchorSideTop.Control = OptionsLabel
|
||||
AnchorSideRight.Control = AdvancedBuildOptionsPage
|
||||
AnchorSideRight.Side = asrBottom
|
||||
Left = 156
|
||||
Height = 22
|
||||
Top = 281
|
||||
Width = 323
|
||||
Anchors = [akTop, akLeft, akRight, akBottom]
|
||||
BorderSpacing.Right = 6
|
||||
TabOrder = 4
|
||||
end
|
||||
object TargetOsEdit: TEdit
|
||||
AnchorSideTop.Control = OptionsEdit
|
||||
AnchorSideTop.Side = asrBottom
|
||||
AnchorSideRight.Control = AdvancedBuildOptionsPage
|
||||
AnchorSideRight.Side = asrBottom
|
||||
Left = 156
|
||||
Height = 22
|
||||
Top = 309
|
||||
Width = 323
|
||||
Anchors = [akTop, akLeft, akRight]
|
||||
BorderSpacing.Around = 6
|
||||
TabOrder = 5
|
||||
end
|
||||
object TargetDirectoryComboBox: TComboBox
|
||||
AnchorSideLeft.Control = TargetOsEdit
|
||||
AnchorSideTop.Control = TargetOsEdit
|
||||
AnchorSideTop.Side = asrBottom
|
||||
AnchorSideRight.Control = TargetDirectoryButton
|
||||
Left = 156
|
||||
Height = 20
|
||||
Top = 337
|
||||
Width = 295
|
||||
Anchors = [akTop, akLeft, akRight, akBottom]
|
||||
AutoCompleteText = [cbactEndOfLineComplete, cbactSearchAscending]
|
||||
MaxLength = 0
|
||||
TabOrder = 6
|
||||
end
|
||||
object TargetCPUComboBox: TComboBox
|
||||
AnchorSideLeft.Control = TargetDirectoryComboBox
|
||||
AnchorSideTop.Control = TargetDirectoryComboBox
|
||||
AnchorSideTop.Side = asrBottom
|
||||
AnchorSideRight.Control = TargetDirectoryComboBox
|
||||
AnchorSideRight.Side = asrBottom
|
||||
Left = 156
|
||||
Height = 21
|
||||
Top = 363
|
||||
Width = 295
|
||||
Anchors = [akTop, akLeft, akRight]
|
||||
AutoCompleteText = [cbactEndOfLineComplete, cbactSearchAscending]
|
||||
BorderSpacing.Top = 6
|
||||
MaxLength = 0
|
||||
TabOrder = 7
|
||||
end
|
||||
object TargetDirectoryButton: TButton
|
||||
AnchorSideTop.Control = TargetDirectoryComboBox
|
||||
AnchorSideRight.Control = AdvancedBuildOptionsPage
|
||||
AnchorSideRight.Side = asrBottom
|
||||
AnchorSideBottom.Control = TargetDirectoryComboBox
|
||||
AnchorSideBottom.Side = asrBottom
|
||||
Left = 457
|
||||
Height = 20
|
||||
Top = 337
|
||||
Width = 22
|
||||
Anchors = [akTop, akRight, akBottom]
|
||||
BorderSpacing.Left = 6
|
||||
BorderSpacing.Right = 6
|
||||
BorderSpacing.InnerBorder = 4
|
||||
Caption = '...'
|
||||
OnClick = TargetDirectoryButtonClick
|
||||
TabOrder = 8
|
||||
end
|
||||
object RestartAfterBuildCheckBox: TCheckBox
|
||||
AnchorSideLeft.Control = TargetCPULabel
|
||||
AnchorSideTop.Control = TargetCPUComboBox
|
||||
AnchorSideTop.Side = asrBottom
|
||||
Left = 6
|
||||
Height = 20
|
||||
Top = 402
|
||||
Width = 176
|
||||
BorderSpacing.Top = 18
|
||||
BorderSpacing.Bottom = 6
|
||||
Caption = 'RestartAfterBuildCheckBox'
|
||||
TabOrder = 9
|
||||
end
|
||||
object ConfirmBuildCheckBox: TCheckBox
|
||||
AnchorSideLeft.Control = RestartAfterBuildCheckBox
|
||||
AnchorSideTop.Control = RestartAfterBuildCheckBox
|
||||
AnchorSideTop.Side = asrBottom
|
||||
Left = 6
|
||||
Height = 20
|
||||
Top = 428
|
||||
Width = 154
|
||||
BorderSpacing.Top = 6
|
||||
Caption = 'ConfirmBuildCheckBox'
|
||||
TabOrder = 10
|
||||
end
|
||||
end
|
||||
end
|
||||
end
|
||||
|
||||
@ -1,118 +1,167 @@
|
||||
{ This is an automatically generated lazarus resource file }
|
||||
|
||||
LazarusResources.Add('TConfigureBuildLazarusDlg','FORMDATA',[
|
||||
'TPF0'#25'TConfigureBuildLazarusDlg'#24'ConfigureBuildLazarusDlg'#4'Left'#3
|
||||
+#190#0#6'Height'#3#224#1#3'Top'#3#142#0#5'Width'#3#229#1#18'HorzScrollBar.Pa'
|
||||
+'ge'#3#228#1#18'VertScrollBar.Page'#3#223#1#13'ActiveControl'#7#16'CleanAllC'
|
||||
+'heckBox'#11'BorderIcons'#11#12'biSystemMenu'#0#7'Caption'#6#24'ConfigureBui'
|
||||
+'ldLazarusDlg'#12'ClientHeight'#3#224#1#11'ClientWidth'#3#229#1#21'Constrain'
|
||||
+'ts.MinHeight'#3#224#1#20'Constraints.MinWidth'#3#229#1#7'OnClose'#7#9'FormC'
|
||||
+'lose'#8'OnCreate'#7#10'FormCreate'#9'OnDestroy'#7#11'FormDestroy'#8'Positio'
|
||||
+'n'#7#14'poScreenCenter'#0#6'TLabel'#12'OptionsLabel'#22'AnchorSideLeft.Cont'
|
||||
+'rol'#7#12'ItemsListBox'#21'AnchorSideTop.Control'#7#12'ItemsListBox'#18'Anc'
|
||||
+'horSideTop.Side'#7#9'asrBottom'#4'Left'#2#6#6'Height'#2#14#3'Top'#3#26#1#5
|
||||
+'Width'#2'*'#17'BorderSpacing.Top'#2#18#7'Caption'#6#8'Options:'#5'Color'#7#6
|
||||
+'clNone'#11'ParentColor'#8#0#0#6'TLabel'#13'TargetOSLabel'#22'AnchorSideLeft'
|
||||
+'.Control'#7#12'OptionsLabel'#21'AnchorSideTop.Control'#7#12'TargetOSEdit'#4
|
||||
+'Left'#2#6#6'Height'#2#14#3'Top'#3'6'#1#5'Width'#2'6'#7'Caption'#6#10'Target'
|
||||
+' OS:'#5'Color'#7#6'clNone'#11'ParentColor'#8#0#0#6'TLabel'#20'TargetDirecto'
|
||||
+'ryLabel'#22'AnchorSideLeft.Control'#7#13'TargetOSLabel'#21'AnchorSideTop.Co'
|
||||
+'ntrol'#7#23'TargetDirectoryComboBox'#4'Left'#2#6#6'Height'#2#14#3'Top'#3'R'
|
||||
+#1#5'Width'#2'T'#7'Caption'#6#17'Target Directory:'#5'Color'#7#6'clNone'#11
|
||||
+'ParentColor'#8#0#0#6'TLabel'#14'TargetCPULabel'#22'AnchorSideLeft.Control'#7
|
||||
+#20'TargetDirectoryLabel'#21'AnchorSideTop.Control'#7#17'TargetCPUComboBox'#4
|
||||
+'Left'#2#6#6'Height'#2#14#3'Top'#3'm'#1#5'Width'#2'8'#7'Caption'#6#10'Target'
|
||||
+' CPU'#5'Color'#7#6'clNone'#11'ParentColor'#8#0#0#9'TCheckBox'#16'CleanAllCh'
|
||||
+'eckBox'#22'AnchorSideLeft.Control'#7#22'LCLInterfaceRadioGroup'#21'AnchorSi'
|
||||
+'deTop.Control'#7#22'LCLInterfaceRadioGroup'#18'AnchorSideTop.Side'#7#9'asrB'
|
||||
+'ottom'#24'AnchorSideBottom.Control'#7#26'WithStaticPackagesCheckBox'#4'Left'
|
||||
+#3'@'#1#6'Height'#2#13#3'Top'#3#232#0#5'Width'#2'='#7'Anchors'#11#6'akLeft'#8
|
||||
+'akBottom'#0#17'BorderSpacing.Top'#2#18#20'BorderSpacing.Bottom'#2#6#7'Capti'
|
||||
+'on'#6#9'Clean All'#8'TabOrder'#2#0#0#0#5'TEdit'#11'OptionsEdit'#21'AnchorSi'
|
||||
+'deTop.Control'#7#12'OptionsLabel'#23'AnchorSideRight.Control'#7#5'Owner'#20
|
||||
+'AnchorSideRight.Side'#7#9'asrBottom'#4'Left'#3#156#0#6'Height'#2#22#3'Top'#3
|
||||
+#26#1#5'Width'#3'C'#1#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#19'Borde'
|
||||
+'rSpacing.Right'#2#6#8'TabOrder'#2#4#0#0#5'TEdit'#12'TargetOSEdit'#21'Anchor'
|
||||
+'SideTop.Control'#7#11'OptionsEdit'#18'AnchorSideTop.Side'#7#9'asrBottom'#23
|
||||
+'AnchorSideRight.Control'#7#5'Owner'#20'AnchorSideRight.Side'#7#9'asrBottom'
|
||||
+#4'Left'#3#156#0#6'Height'#2#22#3'Top'#3'6'#1#5'Width'#3'C'#1#7'Anchors'#11#5
|
||||
+'akTop'#6'akLeft'#7'akRight'#0#20'BorderSpacing.Around'#2#6#8'TabOrder'#2#5#0
|
||||
+#0#9'TComboBox'#23'TargetDirectoryComboBox'#22'AnchorSideLeft.Control'#7#12
|
||||
+'TargetOSEdit'#21'AnchorSideTop.Control'#7#12'TargetOSEdit'#18'AnchorSideTop'
|
||||
+'.Side'#7#9'asrBottom'#23'AnchorSideRight.Control'#7#21'TargetDirectoryButto'
|
||||
+'n'#4'Left'#3#156#0#6'Height'#2#21#3'Top'#3'R'#1#5'Width'#3''''#1#7'Anchors'
|
||||
+#11#5'akTop'#6'akLeft'#7'akRight'#0#16'AutoCompleteText'#11#22'cbactEndOfLin'
|
||||
+'eComplete'#20'cbactSearchAscending'#0#10'ItemHeight'#2#13#9'MaxLength'#2#0#8
|
||||
+'TabOrder'#2#6#0#0#7'TButton'#21'TargetDirectoryButton'#21'AnchorSideTop.Con'
|
||||
+'trol'#7#12'TargetOSEdit'#18'AnchorSideTop.Side'#7#9'asrBottom'#23'AnchorSid'
|
||||
+'eRight.Control'#7#5'Owner'#20'AnchorSideRight.Side'#7#9'asrBottom'#24'Ancho'
|
||||
+'rSideBottom.Control'#7#23'TargetDirectoryComboBox'#21'AnchorSideBottom.Side'
|
||||
+#7#9'asrBottom'#4'Left'#3#201#1#6'Height'#2#21#3'Top'#3'R'#1#5'Width'#2#22#7
|
||||
+'Anchors'#11#5'akTop'#7'akRight'#8'akBottom'#0#18'BorderSpacing.Left'#2#6#19
|
||||
+'BorderSpacing.Right'#2#6#25'BorderSpacing.InnerBorder'#2#4#7'Caption'#6#3'.'
|
||||
+'..'#7'OnClick'#7#26'TargetDirectoryButtonClick'#8'TabOrder'#2#7#0#0#11'TRad'
|
||||
+'ioGroup'#22'LCLInterfaceRadioGroup'#22'AnchorSideLeft.Control'#7#14'ItemLis'
|
||||
+'tHeader'#19'AnchorSideLeft.Side'#7#9'asrBottom'#21'AnchorSideTop.Control'#7
|
||||
+#5'Owner'#23'AnchorSideRight.Control'#7#5'Owner'#20'AnchorSideRight.Side'#7#9
|
||||
+'asrBottom'#24'AnchorSideBottom.Control'#7#16'CleanAllCheckBox'#4'Left'#3'@'
|
||||
+#1#6'Height'#3#208#0#3'Top'#2#6#5'Width'#3#159#0#7'Anchors'#11#5'akTop'#7'ak'
|
||||
+'Right'#8'akBottom'#0#8'AutoFill'#9#20'BorderSpacing.Around'#2#6#7'Caption'#6
|
||||
+#22'LCLInterfaceRadioGroup'#28'ChildSizing.LeftRightSpacing'#2#6#28'ChildSiz'
|
||||
+'ing.TopBottomSpacing'#2#6#29'ChildSizing.EnlargeHorizontal'#7#24'crsHomogen'
|
||||
+'ousChildResize'#27'ChildSizing.EnlargeVertical'#7#24'crsHomogenousChildResi'
|
||||
+'ze'#28'ChildSizing.ShrinkHorizontal'#7#14'crsScaleChilds'#26'ChildSizing.Sh'
|
||||
+'rinkVertical'#7#14'crsScaleChilds'#18'ChildSizing.Layout'#7#29'cclLeftToRig'
|
||||
+'htThenTopToBottom'#27'ChildSizing.ControlsPerLine'#2#1#8'TabOrder'#2#2#0#0#9
|
||||
+'TCheckBox'#26'WithStaticPackagesCheckBox'#22'AnchorSideLeft.Control'#7#22'L'
|
||||
+'CLInterfaceRadioGroup'#21'AnchorSideTop.Control'#7#16'CleanAllCheckBox'#18
|
||||
,'AnchorSideTop.Side'#7#9'asrBottom'#24'AnchorSideBottom.Control'#7#12'ItemsL'
|
||||
+'istBox'#21'AnchorSideBottom.Side'#7#9'asrBottom'#4'Left'#3'@'#1#6'Height'#2
|
||||
+#13#3'Top'#3#251#0#5'Width'#3#166#0#7'Anchors'#11#6'akLeft'#8'akBottom'#0#17
|
||||
+'BorderSpacing.Top'#2#6#7'Caption'#6#26'WithStaticPackagesCheckBox'#8'TabOrd'
|
||||
+'er'#2#3#0#0#9'TCheckBox'#25'RestartAfterBuildCheckBox'#22'AnchorSideLeft.Co'
|
||||
+'ntrol'#7#14'TargetCPULabel'#21'AnchorSideTop.Control'#7#17'TargetCPUComboBo'
|
||||
+'x'#18'AnchorSideTop.Side'#7#9'asrBottom'#4'Left'#2#6#6'Height'#2#13#3'Top'#3
|
||||
+#148#1#5'Width'#3#148#0#17'BorderSpacing.Top'#2#18#7'Caption'#6#25'RestartAf'
|
||||
+'terBuildCheckBox'#8'TabOrder'#2#9#0#0#9'TCheckBox'#20'ConfirmBuildCheckBox'
|
||||
+#22'AnchorSideLeft.Control'#7#25'RestartAfterBuildCheckBox'#21'AnchorSideTop'
|
||||
+'.Control'#7#25'RestartAfterBuildCheckBox'#18'AnchorSideTop.Side'#7#9'asrBot'
|
||||
+'tom'#4'Left'#2#6#6'Height'#2#13#3'Top'#3#167#1#5'Width'#2''#17'BorderSpaci'
|
||||
+'ng.Top'#2#6#7'Caption'#6#20'ConfirmBuildCheckBox'#8'TabOrder'#2#10#0#0#7'TB'
|
||||
+'utton'#18'SaveSettingsButton'#23'AnchorSideRight.Control'#7#12'CancelButton'
|
||||
'TPF0'#25'TConfigureBuildLazarusDlg'#24'ConfigureBuildLazarusDlg'#4'Left'#3#6
|
||||
+#2#6'Height'#3#23#2#3'Top'#3#169#0#5'Width'#3#233#1#18'HorzScrollBar.Page'#3
|
||||
+#232#1#18'VertScrollBar.Page'#3#22#2#13'ActiveControl'#7#18'SaveSettingsButt'
|
||||
+'on'#11'BorderIcons'#11#12'biSystemMenu'#0#7'Caption'#6#24'ConfigureBuildLaz'
|
||||
+'arusDlg'#12'ClientHeight'#3#23#2#11'ClientWidth'#3#233#1#21'Constraints.Min'
|
||||
+'Height'#3#23#2#20'Constraints.MinWidth'#3#233#1#8'OnCreate'#7#10'FormCreate'
|
||||
+#9'OnDestroy'#7#11'FormDestroy'#6'OnShow'#7#8'FormShow'#8'Position'#7#14'poS'
|
||||
+'creenCenter'#0#6'TPanel'#6'Panel1'#22'AnchorSideLeft.Control'#7#8'Notebook'
|
||||
+#21'AnchorSideTop.Control'#7#8'Notebook'#18'AnchorSideTop.Side'#7#9'asrBotto'
|
||||
+'m'#23'AnchorSideRight.Control'#7#8'Notebook'#20'AnchorSideRight.Side'#7#9'a'
|
||||
+'srBottom'#6'Height'#2'2'#3'Top'#3#229#1#5'Width'#3#233#1#5'Align'#7#8'alBot'
|
||||
+'tom'#10'BevelOuter'#7#6'bvNone'#12'ClientHeight'#2'2'#11'ClientWidth'#3#233
|
||||
+#1#8'TabOrder'#2#0#0#7'TButton'#13'CompileButton'#23'AnchorSideRight.Control'
|
||||
+#7#18'SaveSettingsButton'#24'AnchorSideBottom.Control'#7#18'SaveSettingsButt'
|
||||
+'on'#21'AnchorSideBottom.Side'#7#9'asrBottom'#4'Left'#3#245#0#6'Height'#2#26
|
||||
+#3'Top'#2#12#5'Width'#2';'#7'Anchors'#11#7'akRight'#8'akBottom'#0#8'AutoSize'
|
||||
+#9#19'BorderSpacing.Right'#2#18#25'BorderSpacing.InnerBorder'#2#4#7'Caption'
|
||||
+#6#7'Compile'#7'OnClick'#7#18'CompileButtonClick'#8'TabOrder'#2#0#0#0#7'TBut'
|
||||
+'ton'#18'SaveSettingsButton'#23'AnchorSideRight.Control'#7#12'CancelButton'
|
||||
+#24'AnchorSideBottom.Control'#7#12'CancelButton'#21'AnchorSideBottom.Side'#7
|
||||
+#9'asrBottom'#4'Left'#3'4'#1#6'Height'#2#25#3'Top'#3#193#1#5'Width'#2'\'#7'A'
|
||||
+'nchors'#11#7'akRight'#8'akBottom'#0#8'AutoSize'#9#19'BorderSpacing.Right'#2
|
||||
+#18#25'BorderSpacing.InnerBorder'#2#4#7'Caption'#6#13'Save settings'#7'Defau'
|
||||
+'lt'#9#7'OnClick'#7#23'SaveSettingsButtonClick'#8'TabOrder'#2#11#0#0#7'TButt'
|
||||
+'on'#12'CancelButton'#23'AnchorSideRight.Control'#7#5'Owner'#20'AnchorSideRi'
|
||||
+'ght.Side'#7#9'asrBottom'#24'AnchorSideBottom.Control'#7#5'Owner'#21'AnchorS'
|
||||
+'ideBottom.Side'#7#9'asrBottom'#4'Left'#3#162#1#6'Height'#2#25#3'Top'#3#193#1
|
||||
+#5'Width'#2'='#7'Anchors'#11#7'akRight'#8'akBottom'#0#8'AutoSize'#9#20'Borde'
|
||||
+'rSpacing.Around'#2#6#25'BorderSpacing.InnerBorder'#2#4#6'Cancel'#9#7'Captio'
|
||||
+'n'#6#6'Cancel'#7'OnClick'#7#17'CancelButtonClick'#8'TabOrder'#2#12#0#0#8'TL'
|
||||
+'istBox'#12'ItemsListBox'#22'AnchorSideLeft.Control'#7#5'Owner'#21'AnchorSid'
|
||||
+'eTop.Control'#7#14'ItemListHeader'#18'AnchorSideTop.Side'#7#9'asrBottom'#23
|
||||
+'AnchorSideRight.Control'#7#14'ItemListHeader'#20'AnchorSideRight.Side'#7#9
|
||||
+'asrBottom'#4'Left'#2#6#6'Height'#3#234#0#3'Top'#2#30#5'Width'#3'4'#1#7'Anch'
|
||||
+'ors'#11#5'akTop'#6'akLeft'#7'akRight'#8'akBottom'#0#18'BorderSpacing.Left'#2
|
||||
+#6#10'ItemHeight'#2#25#10'OnDrawItem'#7#20'ItemsListBoxDrawItem'#11'OnMouseD'
|
||||
+'own'#7#21'ItemsListBoxMouseDown'#10'OnShowHint'#7#20'ItemsListBoxShowHint'
|
||||
+#14'ParentShowHint'#8#8'ShowHint'#9#5'Style'#7#16'lbOwnerDrawFixed'#8'TabOrd'
|
||||
+'er'#2#1#0#0#9'TComboBox'#17'TargetCPUComboBox'#22'AnchorSideLeft.Control'#7
|
||||
+#23'TargetDirectoryComboBox'#21'AnchorSideTop.Control'#7#23'TargetDirectoryC'
|
||||
+'omboBox'#18'AnchorSideTop.Side'#7#9'asrBottom'#23'AnchorSideRight.Control'#7
|
||||
+#23'TargetDirectoryComboBox'#20'AnchorSideRight.Side'#7#9'asrBottom'#4'Left'
|
||||
+#3#156#0#6'Height'#2#21#3'Top'#3'm'#1#5'Width'#3''''#1#7'Anchors'#11#5'akTop'
|
||||
+#6'akLeft'#7'akRight'#0#16'AutoCompleteText'#11#22'cbactEndOfLineComplete'#20
|
||||
+'cbactSearchAscending'#0#17'BorderSpacing.Top'#2#6#10'ItemHeight'#2#13#9'Max'
|
||||
+'Length'#2#0#8'TabOrder'#2#8#0#0#7'TButton'#13'CompileButton'#23'AnchorSideR'
|
||||
+'ight.Control'#7#18'SaveSettingsButton'#24'AnchorSideBottom.Control'#7#18'Sa'
|
||||
+'veSettingsButton'#21'AnchorSideBottom.Side'#7#9'asrBottom'#4'Left'#3#225#0#6
|
||||
+'Height'#2#25#3'Top'#3#193#1#5'Width'#2'A'#7'Anchors'#11#7'akRight'#8'akBott'
|
||||
+'om'#0#8'AutoSize'#9#19'BorderSpacing.Right'#2#18#25'BorderSpacing.InnerBord'
|
||||
+'er'#2#4#7'Caption'#6#7'Compile'#7'OnClick'#7#18'CompileButtonClick'#8'TabOr'
|
||||
+'der'#2#13#0#0#14'THeaderControl'#14'ItemListHeader'#4'Left'#2#6#6'Height'#2
|
||||
+#24#3'Top'#2#6#5'Width'#3'4'#1#8'Sections'#14#0#14'OnSectionClick'#7#26'Item'
|
||||
+'ListHeaderSectionClick'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#8'OnR'
|
||||
+'esize'#7#20'ItemListHeaderResize'#0#0#0
|
||||
+#9'asrBottom'#4'Left'#3'B'#1#6'Height'#2#26#3'Top'#2#12#5'Width'#2'Y'#7'Anch'
|
||||
+'ors'#11#7'akRight'#8'akBottom'#0#8'AutoSize'#9#19'BorderSpacing.Right'#2#18
|
||||
+#25'BorderSpacing.InnerBorder'#2#4#7'Caption'#6#13'Save settings'#7'OnClick'
|
||||
+#7#23'SaveSettingsButtonClick'#8'TabOrder'#2#1#0#0#7'TButton'#12'CancelButto'
|
||||
+'n'#23'AnchorSideRight.Control'#7#6'Panel1'#20'AnchorSideRight.Side'#7#9'asr'
|
||||
+'Bottom'#24'AnchorSideBottom.Control'#7#6'Panel1'#21'AnchorSideBottom.Side'#7
|
||||
+#9'asrCenter'#4'Left'#3#173#1#6'Height'#2#26#3'Top'#2#12#5'Width'#2'6'#7'Anc'
|
||||
+'hors'#11#7'akRight'#8'akBottom'#0#8'AutoSize'#9#20'BorderSpacing.Around'#2#6
|
||||
+#25'BorderSpacing.InnerBorder'#2#4#6'Cancel'#9#7'Caption'#6#6'Cancel'#7'OnCl'
|
||||
+'ick'#7#17'CancelButtonClick'#8'TabOrder'#2#2#0#0#0#9'TNotebook'#8'Notebook'
|
||||
+#22'AnchorSideLeft.Control'#7#5'Owner'#21'AnchorSideTop.Control'#7#5'Owner'
|
||||
+#23'AnchorSideRight.Control'#7#5'Owner'#20'AnchorSideRight.Side'#7#9'asrBott'
|
||||
+'om'#24'AnchorSideBottom.Control'#7#6'Panel1'#6'Height'#3#229#1#5'Width'#3
|
||||
+#233#1#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#8'akBottom'#0#7'OnEnter'#7
|
||||
+#19'NotebookPageChanged'#13'OnPageChanged'#7#19'NotebookPageChanged'#9'PageI'
|
||||
+'ndex'#2#0#8'TabOrder'#2#1#0#5'TPage'#21'QuickBuildOptionsPage'#21'AnchorSid'
|
||||
+'eBottom.Side'#7#9'asrBottom'#7'Caption'#6#17'QuickBuildOptions'#11'ClientWi'
|
||||
+'dth'#3#229#1#12'ClientHeight'#3#199#1#0#6'TLabel'#27'QuickLCLInterfaceCombo'
|
||||
+'Label'#22'AnchorSideLeft.Control'#7#27'QuickBuildOptionsRadioGroup'#19'Anch'
|
||||
+'orSideLeft.Side'#7#9'asrBottom'#20'AnchorSideRight.Side'#7#9'asrBottom'#4'L'
|
||||
+'eft'#3#30#1#6'Height'#2#13#3'Top'#2','#5'Width'#3#175#0#19'BorderSpacing.Ri'
|
||||
+'ght'#2#24#7'Caption'#6#27'QuickLCLInterfaceComboLabel'#11'ParentColor'#8#0#0
|
||||
+#6'TLabel'#11'AppLCLLabel'#22'AnchorSideLeft.Control'#7#27'QuickLCLInterface'
|
||||
+'ComboLabel'#23'AnchorSideRight.Control'#7#21'QuickBuildOptionsPage'#20'Anch'
|
||||
+'orSideRight.Side'#7#9'asrBottom'#4'Left'#3#30#1#6'Height'#2#13#3'Top'#2'T'#5
|
||||
+'Width'#2'$'#19'BorderSpacing.Right'#2#24#7'Caption'#6#6'Target'#11'ParentCo'
|
||||
+'lor'#8#0#0#6'TLabel'#11'IDELCLLabel'#22'AnchorSideLeft.Control'#7#27'QuickL'
|
||||
+'CLInterfaceComboLabel'#20'AnchorSideRight.Side'#7#9'asrBottom'#4'Left'#3#30
|
||||
+#1#6'Height'#2#13#3'Top'#3#132#0#5'Width'#2#21#19'BorderSpacing.Right'#2#24#7
|
||||
+'Caption'#6#3'IDE'#11'ParentColor'#8#0#0#9'TComboBox'#23'AppLCLInterfaceComb'
|
||||
+'oBox'#23'AnchorSideRight.Control'#7#21'QuickBuildOptionsPage'#20'AnchorSide'
|
||||
+'Right.Side'#7#9'asrBottom'#4'Left'#3'i'#1#6'Height'#2#25#3'Top'#2'L'#5'Widt'
|
||||
+'h'#2'd'#7'Anchors'#11#5'akTop'#7'akRight'#0#16'AutoCompleteText'#11#22'cbac'
|
||||
+'tEndOfLineComplete'#20'cbactSearchAscending'#0#19'BorderSpacing.Right'#2#24
|
||||
+#7'Enabled'#8#9'MaxLength'#2#0#8'OnChange'#7#29'AppLCLInterfaceComboBoxChang'
|
||||
+'e'#8'TabOrder'#2#0#4'Text'#6#6'(none)'#0#0#9'TComboBox'#23'IDELCLInterfaceC'
|
||||
+'omboBox'#23'AnchorSideRight.Control'#7#21'QuickBuildOptionsPage'#20'AnchorS'
|
||||
+'ideRight.Side'#7#9'asrBottom'#4'Left'#3'i'#1#6'Height'#2#25#3'Top'#2'|'#5'W'
|
||||
+'idth'#2'd'#7'Anchors'#11#5'akTop'#7'akRight'#0#16'AutoCompleteText'#11#22'c'
|
||||
+'bactEndOfLineComplete'#20'cbactSearchAscending'#0#19'BorderSpacing.Right'#2
|
||||
+#24#7'Enabled'#8#9'MaxLength'#2#0#8'OnChange'#7#29'AppLCLInterfaceComboBoxCh'
|
||||
+'ange'#8'TabOrder'#2#1#4'Text'#6#6'(none)'#0#0#11'TRadioGroup'#27'QuickBuild'
|
||||
+'OptionsRadioGroup'#21'AnchorSideBottom.Side'#7#9'asrBottom'#4'Left'#2#6#6'H'
|
||||
+'eight'#3#8#1#3'Top'#2#4#5'Width'#3#0#1#8'AutoFill'#9#19'BorderSpacing.Right'
|
||||
,#2#24#7'Caption'#6#27'QuickBuildOptionsRadioGroup'#28'ChildSizing.LeftRightS'
|
||||
+'pacing'#2#6#28'ChildSizing.TopBottomSpacing'#2#6#29'ChildSizing.EnlargeHori'
|
||||
+'zontal'#7#24'crsHomogenousChildResize'#27'ChildSizing.EnlargeVertical'#7#24
|
||||
+'crsHomogenousChildResize'#28'ChildSizing.ShrinkHorizontal'#7#14'crsScaleChi'
|
||||
+'lds'#26'ChildSizing.ShrinkVertical'#7#14'crsScaleChilds'#18'ChildSizing.Lay'
|
||||
+'out'#7#29'cclLeftToRightThenTopToBottom'#27'ChildSizing.ControlsPerLine'#2#1
|
||||
+#12'ClientHeight'#3#247#0#11'ClientWidth'#3#252#0#9'ItemIndex'#2#5#13'Items.'
|
||||
+'Strings'#1#6#9'Build LCL'#6#23'Build IDE with Packages'#6#26'Build IDE with'
|
||||
+'out Packages'#6#9'Build All'#6#20'Clean Up + Build all'#6#5'Other'#0#7'OnCl'
|
||||
+'ick'#7' QuickBuildOptionsRadioGroupClick'#8'TabOrder'#2#2#0#0#0#5'TPage'#24
|
||||
+'AdvancedBuildOptionsPage'#7'Caption'#6#20'AdvancedBuildOptions'#11'ClientWi'
|
||||
+'dth'#3#229#1#12'ClientHeight'#3#199#1#0#6'TLabel'#12'OptionsLabel'#21'Ancho'
|
||||
+'rSideTop.Control'#7#12'ItemsListBox'#18'AnchorSideTop.Side'#7#9'asrBottom'#4
|
||||
+'Left'#2#6#6'Height'#2#13#3'Top'#3#25#1#5'Width'#2','#17'BorderSpacing.Top'#2
|
||||
+#19#7'Caption'#6#7'Options'#11'ParentColor'#8#0#0#6'TLabel'#13'TargetOSLabel'
|
||||
+#22'AnchorSideLeft.Control'#7#12'OptionsLabel'#21'AnchorSideTop.Control'#7#12
|
||||
+'TargetOsEdit'#4'Left'#2#6#6'Height'#2#13#3'Top'#3'5'#1#5'Width'#2':'#7'Capt'
|
||||
+'ion'#6#9'Target OS'#11'ParentColor'#8#0#0#6'TLabel'#20'TargetDirectoryLabel'
|
||||
+#22'AnchorSideLeft.Control'#7#13'TargetOSLabel'#21'AnchorSideTop.Control'#7
|
||||
+#23'TargetDirectoryComboBox'#4'Left'#2#6#6'Height'#2#13#3'Top'#3'Q'#1#5'Widt'
|
||||
+'h'#2'['#7'Caption'#6#16'Target Directory'#11'ParentColor'#8#0#0#6'TLabel'#14
|
||||
+'TargetCPULabel'#22'AnchorSideLeft.Control'#7#20'TargetDirectoryLabel'#21'An'
|
||||
+'chorSideTop.Control'#7#17'TargetCPUComboBox'#4'Left'#2#6#6'Height'#2#13#3'T'
|
||||
+'op'#3'k'#1#5'Width'#2'A'#7'Caption'#6#10'Target CPU'#11'ParentColor'#8#0#0
|
||||
+#14'THeaderControl'#14'ItemListHeader'#4'Left'#2#6#6'Height'#2#24#3'Top'#2#4
|
||||
+#5'Width'#3'4'#1#8'Sections'#14#0#14'OnSectionClick'#7#26'ItemListHeaderSect'
|
||||
+'ionClick'#8'OnResize'#7#20'ItemListHeaderResize'#0#0#11'TRadioGroup'#22'LCL'
|
||||
+'InterfaceRadioGroup'#22'AnchorSideLeft.Control'#7#14'ItemListHeader'#19'Anc'
|
||||
+'horSideLeft.Side'#7#9'asrBottom'#21'AnchorSideTop.Control'#7#24'AdvancedBui'
|
||||
+'ldOptionsPage'#23'AnchorSideRight.Control'#7#24'AdvancedBuildOptionsPage'#20
|
||||
+'AnchorSideRight.Side'#7#9'asrBottom'#24'AnchorSideBottom.Control'#7#16'Clea'
|
||||
+'nAllCheckBox'#4'Left'#3'@'#1#6'Height'#3#194#0#3'Top'#2#6#5'Width'#3#159#0#7
|
||||
+'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#8'akBottom'#0#8'AutoFill'#9#20'Bo'
|
||||
+'rderSpacing.Around'#2#6#7'Caption'#6#22'LCLInterfaceRadioGroup'#28'ChildSiz'
|
||||
+'ing.LeftRightSpacing'#2#6#28'ChildSizing.TopBottomSpacing'#2#6#29'ChildSizi'
|
||||
+'ng.EnlargeHorizontal'#7#24'crsHomogenousChildResize'#27'ChildSizing.Enlarge'
|
||||
+'Vertical'#7#24'crsHomogenousChildResize'#28'ChildSizing.ShrinkHorizontal'#7
|
||||
+#14'crsScaleChilds'#26'ChildSizing.ShrinkVertical'#7#14'crsScaleChilds'#18'C'
|
||||
+'hildSizing.Layout'#7#29'cclLeftToRightThenTopToBottom'#27'ChildSizing.Contr'
|
||||
+'olsPerLine'#2#1#8'TabOrder'#2#0#0#0#9'TCheckBox'#16'CleanAllCheckBox'#22'An'
|
||||
+'chorSideLeft.Control'#7#22'LCLInterfaceRadioGroup'#21'AnchorSideTop.Control'
|
||||
+#7#22'LCLInterfaceRadioGroup'#18'AnchorSideTop.Side'#7#9'asrBottom'#24'Ancho'
|
||||
+'rSideBottom.Control'#7#26'WithStaticPackagesCheckBox'#4'Left'#3'@'#1#6'Heig'
|
||||
+'ht'#2#20#3'Top'#3#216#0#5'Width'#2'O'#7'Anchors'#11#6'akLeft'#8'akBottom'#0
|
||||
+#17'BorderSpacing.Top'#2#16#20'BorderSpacing.Bottom'#2#6#7'Caption'#6#9'Clea'
|
||||
+'n All'#8'TabOrder'#2#1#0#0#9'TCheckBox'#26'WithStaticPackagesCheckBox'#22'A'
|
||||
+'nchorSideLeft.Control'#7#22'LCLInterfaceRadioGroup'#21'AnchorSideTop.Contro'
|
||||
+'l'#7#16'CleanAllCheckBox'#18'AnchorSideTop.Side'#7#9'asrBottom'#24'AnchorSi'
|
||||
+'deBottom.Control'#7#12'ItemsListBox'#21'AnchorSideBottom.Side'#7#9'asrBotto'
|
||||
+'m'#4'Left'#3'@'#1#6'Height'#2#20#3'Top'#3#242#0#5'Width'#3#194#0#7'Anchors'
|
||||
+#11#6'akLeft'#8'akBottom'#0#17'BorderSpacing.Top'#2#6#7'Caption'#6#26'WithSt'
|
||||
+'aticPackagesCheckBox'#8'TabOrder'#2#2#0#0#8'TListBox'#12'ItemsListBox'#21'A'
|
||||
+'nchorSideTop.Control'#7#14'ItemListHeader'#18'AnchorSideTop.Side'#7#9'asrBo'
|
||||
+'ttom'#23'AnchorSideRight.Control'#7#14'ItemListHeader'#20'AnchorSideRight.S'
|
||||
+'ide'#7#9'asrBottom'#4'Left'#2#6#6'Height'#3#234#0#3'Top'#2#28#5'Width'#3'4'
|
||||
+#1#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#8'akBottom'#0#18'BorderSpacin'
|
||||
+'g.Left'#2#6#10'ItemHeight'#2#25#10'OnDrawItem'#7#20'ItemsListBoxDrawItem'#11
|
||||
+'OnMouseDown'#7#21'ItemsListBoxMouseDown'#10'OnShowHint'#7#20'ItemsListBoxSh'
|
||||
+'owHint'#14'ParentShowHint'#8#8'ShowHint'#9#5'Style'#7#16'lbOwnerDrawFixed'#8
|
||||
+'TabOrder'#2#3#8'TopIndex'#2#255#0#0#5'TEdit'#11'OptionsEdit'#21'AnchorSideT'
|
||||
+'op.Control'#7#12'OptionsLabel'#23'AnchorSideRight.Control'#7#24'AdvancedBui'
|
||||
+'ldOptionsPage'#20'AnchorSideRight.Side'#7#9'asrBottom'#4'Left'#3#156#0#6'He'
|
||||
+'ight'#2#22#3'Top'#3#25#1#5'Width'#3'C'#1#7'Anchors'#11#5'akTop'#6'akLeft'#7
|
||||
+'akRight'#8'akBottom'#0#19'BorderSpacing.Right'#2#6#8'TabOrder'#2#4#0#0#5'TE'
|
||||
,'dit'#12'TargetOsEdit'#21'AnchorSideTop.Control'#7#11'OptionsEdit'#18'Anchor'
|
||||
+'SideTop.Side'#7#9'asrBottom'#23'AnchorSideRight.Control'#7#24'AdvancedBuild'
|
||||
+'OptionsPage'#20'AnchorSideRight.Side'#7#9'asrBottom'#4'Left'#3#156#0#6'Heig'
|
||||
+'ht'#2#22#3'Top'#3'5'#1#5'Width'#3'C'#1#7'Anchors'#11#5'akTop'#6'akLeft'#7'a'
|
||||
+'kRight'#0#20'BorderSpacing.Around'#2#6#8'TabOrder'#2#5#0#0#9'TComboBox'#23
|
||||
+'TargetDirectoryComboBox'#22'AnchorSideLeft.Control'#7#12'TargetOsEdit'#21'A'
|
||||
+'nchorSideTop.Control'#7#12'TargetOsEdit'#18'AnchorSideTop.Side'#7#9'asrBott'
|
||||
+'om'#23'AnchorSideRight.Control'#7#21'TargetDirectoryButton'#4'Left'#3#156#0
|
||||
+#6'Height'#2#20#3'Top'#3'Q'#1#5'Width'#3''''#1#7'Anchors'#11#5'akTop'#6'akLe'
|
||||
+'ft'#7'akRight'#8'akBottom'#0#16'AutoCompleteText'#11#22'cbactEndOfLineCompl'
|
||||
+'ete'#20'cbactSearchAscending'#0#9'MaxLength'#2#0#8'TabOrder'#2#6#0#0#9'TCom'
|
||||
+'boBox'#17'TargetCPUComboBox'#22'AnchorSideLeft.Control'#7#23'TargetDirector'
|
||||
+'yComboBox'#21'AnchorSideTop.Control'#7#23'TargetDirectoryComboBox'#18'Ancho'
|
||||
+'rSideTop.Side'#7#9'asrBottom'#23'AnchorSideRight.Control'#7#23'TargetDirect'
|
||||
+'oryComboBox'#20'AnchorSideRight.Side'#7#9'asrBottom'#4'Left'#3#156#0#6'Heig'
|
||||
+'ht'#2#21#3'Top'#3'k'#1#5'Width'#3''''#1#7'Anchors'#11#5'akTop'#6'akLeft'#7
|
||||
+'akRight'#0#16'AutoCompleteText'#11#22'cbactEndOfLineComplete'#20'cbactSearc'
|
||||
+'hAscending'#0#17'BorderSpacing.Top'#2#6#9'MaxLength'#2#0#8'TabOrder'#2#7#0#0
|
||||
+#7'TButton'#21'TargetDirectoryButton'#21'AnchorSideTop.Control'#7#23'TargetD'
|
||||
+'irectoryComboBox'#23'AnchorSideRight.Control'#7#24'AdvancedBuildOptionsPage'
|
||||
+#20'AnchorSideRight.Side'#7#9'asrBottom'#24'AnchorSideBottom.Control'#7#23'T'
|
||||
+'argetDirectoryComboBox'#21'AnchorSideBottom.Side'#7#9'asrBottom'#4'Left'#3
|
||||
+#201#1#6'Height'#2#20#3'Top'#3'Q'#1#5'Width'#2#22#7'Anchors'#11#5'akTop'#7'a'
|
||||
+'kRight'#8'akBottom'#0#18'BorderSpacing.Left'#2#6#19'BorderSpacing.Right'#2#6
|
||||
+#25'BorderSpacing.InnerBorder'#2#4#7'Caption'#6#3'...'#7'OnClick'#7#26'Targe'
|
||||
+'tDirectoryButtonClick'#8'TabOrder'#2#8#0#0#9'TCheckBox'#25'RestartAfterBuil'
|
||||
+'dCheckBox'#22'AnchorSideLeft.Control'#7#14'TargetCPULabel'#21'AnchorSideTop'
|
||||
+'.Control'#7#17'TargetCPUComboBox'#18'AnchorSideTop.Side'#7#9'asrBottom'#4'L'
|
||||
+'eft'#2#6#6'Height'#2#20#3'Top'#3#146#1#5'Width'#3#176#0#17'BorderSpacing.To'
|
||||
+'p'#2#18#20'BorderSpacing.Bottom'#2#6#7'Caption'#6#25'RestartAfterBuildCheck'
|
||||
+'Box'#8'TabOrder'#2#9#0#0#9'TCheckBox'#20'ConfirmBuildCheckBox'#22'AnchorSid'
|
||||
+'eLeft.Control'#7#25'RestartAfterBuildCheckBox'#21'AnchorSideTop.Control'#7
|
||||
+#25'RestartAfterBuildCheckBox'#18'AnchorSideTop.Side'#7#9'asrBottom'#4'Left'
|
||||
+#2#6#6'Height'#2#20#3'Top'#3#172#1#5'Width'#3#154#0#17'BorderSpacing.Top'#2#6
|
||||
+#7'Caption'#6#20'ConfirmBuildCheckBox'#8'TabOrder'#2#10#0#0#0#0#0
|
||||
]);
|
||||
|
||||
@ -20,6 +20,7 @@
|
||||
|
||||
Author: Mattias Gaertner
|
||||
Converted to lfm by: Matthijs Willemstein
|
||||
Quickoptions added by: Giuliano Colla
|
||||
|
||||
Abstract:
|
||||
Defines the TBuildLazarusOptions which stores the settings for the
|
||||
@ -27,11 +28,23 @@
|
||||
TConfigureBuildLazarusDlg is used to edit TBuildLazarusOptions.
|
||||
|
||||
The BuildLazarus function will build the lazarus parts.
|
||||
|
||||
Building occurs only with options defined in the Advanced Page.
|
||||
The Quick Page is just used to set options there.
|
||||
Therefore advanced users can ignore the Quick Page, while beginners
|
||||
can see the effect of the choice made by looking at the Advanced Page.
|
||||
}
|
||||
unit BuildLazDialog;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
|
||||
// MWE: ??? changed this to a define, it was found in original submitted code
|
||||
// I didn't notice any change
|
||||
// Original comment:
|
||||
// This is required to overcome some bugs in TNotebook. Remove whne TNotebook is fixed
|
||||
{.$define UsePageInvalidate}
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
@ -44,6 +57,7 @@ uses
|
||||
CompilerOptions, ImgList, Themes, ComCtrls;
|
||||
|
||||
type
|
||||
|
||||
{ TBuildLazarusItem }
|
||||
|
||||
TMakeMode =
|
||||
@ -98,6 +112,7 @@ type
|
||||
|
||||
TBuildLazarusOptions = class
|
||||
private
|
||||
FAdvanced: boolean;
|
||||
FCleanAll: boolean;
|
||||
FGlobals: TGlobalCompilerOptions;
|
||||
FItemCodeTools: TBuildLazarusItem;
|
||||
@ -116,6 +131,8 @@ type
|
||||
FTargetDirectory: string;
|
||||
fTargetOS: string;
|
||||
fLCLPlatform: TLCLPlatform;
|
||||
fTargetPlatform: TLCLPlatform; // holds selection for LCL Build
|
||||
fIDEPlatform: TLCLPlatform; // holds selection for IDE Build
|
||||
fStaticAutoInstallPackages: TStringList;
|
||||
FWithStaticPackages: boolean;
|
||||
FItems: TList; // list of TBuildLazarusItem
|
||||
@ -151,11 +168,14 @@ type
|
||||
property ItemIDE: TBuildLazarusItem read FItemIDE;
|
||||
property ItemStarter: TBuildLazarusItem read FItemStarter;
|
||||
property ItemExamples: TBuildLazarusItem read FItemExamples;
|
||||
property Advanced: boolean read FAdvanced write FAdvanced;
|
||||
property CleanAll: boolean read FCleanAll write FCleanAll;
|
||||
property ExtraOptions: string read FExtraOptions write FExtraOptions;
|
||||
property TargetOS: string read fTargetOS write SetTargetOS;
|
||||
property TargetCPU: string read FTargetCPU write SetTargetCPU;
|
||||
property LCLPlatform: TLCLPlatform read fLCLPlatform write fLCLPlatform;
|
||||
property IDEPlatform: TLCLPlatform read fIDEPlatform write fIDEPlatform;
|
||||
property TargetPlatform: TLCLPlatform read fTargetPlatform write fTargetPlatform;
|
||||
property StaticAutoInstallPackages: TStringList
|
||||
read fStaticAutoInstallPackages;
|
||||
property TargetDirectory: string read FTargetDirectory
|
||||
@ -171,30 +191,42 @@ type
|
||||
{ TConfigureBuildLazarusDlg }
|
||||
|
||||
TConfigureBuildLazarusDlg = class(TForm)
|
||||
CompileButton: TButton;
|
||||
TargetDirectoryButton: TButton;
|
||||
CancelButton: TButton;
|
||||
CleanAllCheckBox: TCheckBox;
|
||||
AppLCLInterfaceComboBox: TComboBox;
|
||||
IDELCLInterfaceComboBox: TComboBox;
|
||||
QuickLCLInterfaceComboLabel: TLabel;
|
||||
AppLCLLabel: TLabel;
|
||||
IDELCLLabel: TLabel;
|
||||
QuickBuildOptionsRadioGroup: TRadioGroup;
|
||||
RestartAfterBuildCheckBox: TCheckBox;
|
||||
ConfirmBuildCheckBox: TCheckBox;
|
||||
ItemListHeader: THeaderControl;
|
||||
CleanAllCheckBox: TCheckBox;
|
||||
TargetDirectoryComboBox: TComboBox;
|
||||
TargetCPUComboBox: TComboBox;
|
||||
OptionsEdit: TEdit;
|
||||
TargetOsEdit: TEdit;
|
||||
OptionsLabel: TLabel;
|
||||
TargetOSLabel: TLabel;
|
||||
TargetDirectoryLabel: TLabel;
|
||||
TargetCPULabel: TLabel;
|
||||
ItemsListBox: TListBox;
|
||||
WithStaticPackagesCheckBox: TCheckBox;
|
||||
ItemListHeader: THeaderControl;
|
||||
Notebook: TNotebook;
|
||||
QuickBuildOptionsPage: TPage;
|
||||
AdvancedBuildOptionsPage: TPage;
|
||||
Panel1: TPanel;
|
||||
LCLInterfaceRadioGroup: TRadioGroup;
|
||||
SaveSettingsButton: TButton;
|
||||
OptionsEdit: TEdit;
|
||||
OptionsLabel: TLabel;
|
||||
RestartAfterBuildCheckBox: TCheckBox;
|
||||
TargetCPUComboBox: TComboBox;
|
||||
TargetCPULabel: TLabel;
|
||||
TargetDirectoryButton: TButton;
|
||||
TargetDirectoryComboBox: TComboBox;
|
||||
TargetDirectoryLabel: TLabel;
|
||||
TargetOSEdit: TEdit;
|
||||
TargetOSLabel: TLabel;
|
||||
WithStaticPackagesCheckBox: TCheckBox;
|
||||
CompileButton: TButton;
|
||||
procedure AppLCLInterfaceComboBoxChange(Sender: TObject);
|
||||
procedure CancelButtonClick(Sender: TObject);
|
||||
procedure CompileButtonClick(Sender: TObject);
|
||||
procedure FormClose(Sender: TObject; var CloseAction: TCloseAction);
|
||||
procedure FormCreate(Sender: TObject);
|
||||
procedure FormDestroy(Sender: TObject);
|
||||
procedure FormShow(Sender: TObject);
|
||||
procedure ItemListHeaderResize(Sender: TObject);
|
||||
procedure ItemListHeaderSectionClick(HeaderControl: TCustomHeaderControl;
|
||||
Section: THeaderSection);
|
||||
@ -203,16 +235,22 @@ type
|
||||
procedure ItemsListBoxMouseDown(Sender: TOBject; Button: TMouseButton;
|
||||
Shift: TShiftState; X, Y: Integer);
|
||||
procedure ItemsListBoxShowHint(Sender: TObject; HintInfo: PHintInfo);
|
||||
procedure NotebookPageChanged(Sender: TObject);
|
||||
procedure QuickBuildOptionsRadioGroupClick(Sender: TObject);
|
||||
procedure SaveSettingsButtonClick(Sender: TObject);
|
||||
procedure TargetDirectoryButtonClick(Sender: TObject);
|
||||
private
|
||||
Options: TBuildLazarusOptions;
|
||||
FAdvanced: Boolean;
|
||||
FOptions: TBuildLazarusOptions;
|
||||
function GetMakeModeAtX(const X: Integer; var MakeMode: TMakeMode): boolean;
|
||||
function MakeModeToInt(MakeMode: TMakeMode): integer;
|
||||
function IntToMakeMode(i: integer): TMakeMode;
|
||||
procedure SetAdvanced(AValue: boolean);
|
||||
public
|
||||
procedure Load(SourceOptions: TBuildLazarusOptions);
|
||||
procedure Save(DestOptions: TBuildLazarusOptions);
|
||||
property Advanced: Boolean read FAdvanced write SetAdvanced;
|
||||
property Options: TBuildLazarusOptions read FOptions;
|
||||
end;
|
||||
|
||||
function ShowConfigureBuildLazarusDlg(
|
||||
@ -233,6 +271,7 @@ function GetMakeIDEConfigFilename: string;
|
||||
function GetTranslatedMakeModes(MakeMode: TMakeMode): string;
|
||||
|
||||
implementation
|
||||
|
||||
uses
|
||||
IDEImagesIntf;
|
||||
|
||||
@ -272,8 +311,10 @@ begin
|
||||
try
|
||||
ConfigBuildLazDlg.Load(Options);
|
||||
Result:=ConfigBuildLazDlg.ShowModal;
|
||||
if Result in [mrOk,mrYes] then
|
||||
if Result in [mrOk,mrYes] then begin
|
||||
DebugLn('ShowConfigureBuildLazarusDialog');
|
||||
ConfigBuildLazDlg.Save(Options);
|
||||
end;
|
||||
finally
|
||||
ConfigBuildLazDlg.Free;
|
||||
end;
|
||||
@ -694,13 +735,22 @@ begin
|
||||
Text := 'Action';
|
||||
end;
|
||||
|
||||
Options := TBuildLazarusOptions.Create;
|
||||
FOptions := TBuildLazarusOptions.Create;
|
||||
CleanAllCheckBox.Caption := lisLazBuildCleanAll;
|
||||
OptionsLabel.Caption := lisLazBuildOptions;
|
||||
LCLInterfaceRadioGroup.Caption := lisLazBuildLCLInterface;
|
||||
for LCLInterface := Low(TLCLPlatform) to High(TLCLPlatform) do begin
|
||||
QuickLCLInterfaceComboLabel.Caption := lisLazBuildLCLInterface;
|
||||
QuickBuildOptionsRadioGroup.Caption := lisLazBuildBuildOptions;
|
||||
QuickBuildOptionsPage.Caption := lisLazBuildQuickBuildOptions;
|
||||
AdvancedBuildOptionsPage.Caption := lisLazBuildAdvancedBuildOptions;
|
||||
|
||||
for LCLInterface := Low(TLCLPlatform) to High(TLCLPlatform) do
|
||||
begin
|
||||
LCLInterfaceRadioGroup.Items.Add(LCLPlatformDisplayNames[LCLInterface]);
|
||||
AppLCLInterfaceComboBox.Items.Add(LCLPlatformDisplayNames[LCLInterface]);
|
||||
IDELCLInterfaceComboBox.Items.Add(LCLPlatformDisplayNames[LCLInterface]);
|
||||
end;
|
||||
|
||||
WithStaticPackagesCheckBox.Caption := lisLazBuildWithStaticPackages;
|
||||
RestartAfterBuildCheckBox.Caption := lisLazBuildRestartAfterBuild;
|
||||
ConfirmBuildCheckBox.Caption := lisLazBuildConfirmBuild;
|
||||
@ -713,12 +763,17 @@ begin
|
||||
|
||||
IDEDialogLayoutList.ApplyLayout(Self, 500, 500);
|
||||
|
||||
Load(Options);
|
||||
Load(FOptions);
|
||||
end;
|
||||
|
||||
procedure TConfigureBuildLazarusDlg.FormDestroy(Sender: TObject);
|
||||
begin
|
||||
Options.Free;
|
||||
FreeAndNil(FOptions);
|
||||
end;
|
||||
|
||||
procedure TConfigureBuildLazarusDlg.FormShow(Sender: TObject);
|
||||
begin
|
||||
Advanced := Options.Advanced;
|
||||
end;
|
||||
|
||||
procedure TConfigureBuildLazarusDlg.ItemListHeaderResize(Sender: TObject);
|
||||
@ -785,11 +840,11 @@ begin
|
||||
ButtonRect.Top := (ButtonRect.Top + ButtonRect.Bottom - RadioSize) div 2;
|
||||
ButtonRect.Bottom := ButtonRect.Top + RadioSize;
|
||||
end;
|
||||
|
||||
|
||||
ThemeServices.DrawElement(ItemsListBox.Canvas.GetUpdatedHandle([csBrushValid,csPenValid]), ButtonDetails, ButtonRect);
|
||||
Inc(x, ButtonSize);
|
||||
end;
|
||||
|
||||
|
||||
// draw description
|
||||
ItemsListBox.Canvas.Brush.Style:=bsClear;
|
||||
ItemsListBox.Canvas.TextOut(x+2,
|
||||
@ -815,6 +870,7 @@ begin
|
||||
exit;
|
||||
Options.Items[i].MakeMode:=NewMakeMode;
|
||||
ItemsListBox.Invalidate;
|
||||
QuickBuildOptionsRadioGroup.ItemIndex := 5;
|
||||
end;
|
||||
|
||||
procedure TConfigureBuildLazarusDlg.ItemsListBoxShowHint(Sender: TObject; HintInfo: PHintInfo);
|
||||
@ -831,12 +887,6 @@ begin
|
||||
end;
|
||||
end;
|
||||
|
||||
procedure TConfigureBuildLazarusDlg.SaveSettingsButtonClick(Sender: TObject);
|
||||
begin
|
||||
Save(Options);
|
||||
ModalResult:=mrOk;
|
||||
end;
|
||||
|
||||
procedure TConfigureBuildLazarusDlg.TargetDirectoryButtonClick(Sender: TObject);
|
||||
var
|
||||
AFilename: String;
|
||||
@ -914,13 +964,15 @@ begin
|
||||
|
||||
OptionsEdit.Text:=Options.ExtraOptions;
|
||||
LCLInterfaceRadioGroup.ItemIndex:=ord(Options.LCLPlatform);
|
||||
AppLCLInterfaceComboBox.ItemIndex:=ord(Options.TargetPlatform);
|
||||
IDELCLInterfaceComboBox.ItemIndex:=ord(Options.IDEPlatform);
|
||||
WithStaticPackagesCheckBox.Checked:=Options.WithStaticPackages;
|
||||
RestartAfterBuildCheckBox.Checked:=Options.RestartAfterBuild;
|
||||
ConfirmBuildCheckBox.Checked:=Options.ConfirmBuild;
|
||||
TargetOSEdit.Text:=Options.TargetOS;
|
||||
TargetDirectoryComboBox.Text:=Options.TargetDirectory;
|
||||
TargetCPUComboBox.Text:=Options.TargetCPU;
|
||||
|
||||
|
||||
Invalidate;
|
||||
end;
|
||||
|
||||
@ -928,9 +980,18 @@ procedure TConfigureBuildLazarusDlg.Save(DestOptions: TBuildLazarusOptions);
|
||||
begin
|
||||
if DestOptions=nil then exit;
|
||||
|
||||
Options.Advanced := Advanced;
|
||||
Options.CleanAll:=CleanAllCheckBox.Checked;
|
||||
Options.ExtraOptions:=OptionsEdit.Text;
|
||||
Options.LCLPlatform:=TLCLPlatform(LCLInterfaceRadioGroup.ItemIndex);
|
||||
if AppLCLInterfaceComboBox.ItemIndex = -1 then
|
||||
Options.TargetPlatform:= Options.LCLPlatform
|
||||
else
|
||||
Options.TargetPlatform:= TLCLPlatform(AppLCLInterfaceComboBox.ItemIndex);
|
||||
if IDELCLInterfaceComboBox.ItemIndex = -1 then
|
||||
Options.IDEPlatform := Options.LCLPlatform
|
||||
else
|
||||
Options.IDEPlatform := TLCLPlatform(IDELCLInterfaceComboBox.ItemIndex);
|
||||
Options.WithStaticPackages:=WithStaticPackagesCheckBox.Checked;
|
||||
Options.RestartAfterBuild:=RestartAfterBuildCheckBox.Checked;
|
||||
Options.ConfirmBuild:=ConfirmBuildCheckBox.Checked;
|
||||
@ -941,9 +1002,26 @@ begin
|
||||
DestOptions.Assign(Options);
|
||||
end;
|
||||
|
||||
procedure TConfigureBuildLazarusDlg.CancelButtonClick(Sender: TObject);
|
||||
procedure TConfigureBuildLazarusDlg.SetAdvanced(AValue: boolean);
|
||||
begin
|
||||
ModalResult:=mrCancel;
|
||||
if AValue = FAdvanced then Exit;
|
||||
FAdvanced := AValue;
|
||||
|
||||
if FAdvanced
|
||||
then Notebook.PageIndex := 1
|
||||
else Notebook.PageIndex := 0;
|
||||
end;
|
||||
|
||||
procedure TConfigureBuildLazarusDlg.AppLCLInterfaceComboBoxChange(
|
||||
Sender: TObject);
|
||||
var
|
||||
Combo: TComboBox;
|
||||
begin
|
||||
Combo := Sender as TComboBox;
|
||||
LCLInterfaceRadioGroup.ItemIndex := Combo.ItemIndex;
|
||||
{$ifdef UsePageInvalidate}
|
||||
AdvancedBuildOptionsPage.Invalidate;
|
||||
{$endif}
|
||||
end;
|
||||
|
||||
procedure TConfigureBuildLazarusDlg.CompileButtonClick(Sender: TObject);
|
||||
@ -952,12 +1030,92 @@ begin
|
||||
ModalResult:=mrYes;
|
||||
end;
|
||||
|
||||
procedure TConfigureBuildLazarusDlg.SaveSettingsButtonClick(Sender: TObject);
|
||||
begin
|
||||
Save(Options);
|
||||
ModalResult:=mrOk;
|
||||
end;
|
||||
|
||||
procedure TConfigureBuildLazarusDlg.CancelButtonClick(Sender: TObject);
|
||||
begin
|
||||
ModalResult:=mrCancel;
|
||||
end;
|
||||
|
||||
procedure TConfigureBuildLazarusDlg.FormClose(Sender: TObject;
|
||||
var CloseAction: TCloseAction);
|
||||
begin
|
||||
IDEDialogLayoutList.SaveLayout(Self);
|
||||
end;
|
||||
|
||||
procedure TConfigureBuildLazarusDlg.NotebookPageChanged(Sender: TObject);
|
||||
begin
|
||||
FAdvanced := Notebook.ActivePageComponent = AdvancedBuildOptionsPage;
|
||||
|
||||
{$ifdef UsePageInvalidate}
|
||||
if Notebook.ActivePageComponent <> nil
|
||||
then Notebook.ActivePageComponent.Invalidate;
|
||||
{$endif}
|
||||
end;
|
||||
|
||||
procedure TConfigureBuildLazarusDlg.QuickBuildOptionsRadioGroupClick(
|
||||
Sender: TObject);
|
||||
|
||||
procedure SetOptions(ASet, AReset: TMakeMode; ASetItem: TBuildLazarusItem);
|
||||
var
|
||||
i: Integer;
|
||||
Item: TBuildLazarusItem;
|
||||
begin
|
||||
for i := 0 to Options.Count -1 do
|
||||
begin
|
||||
Item := Options.Items[i];
|
||||
if Item = ASetItem
|
||||
then Item.MakeMode := ASet
|
||||
else Item.MakeMode := AReset;
|
||||
end;
|
||||
end;
|
||||
|
||||
begin
|
||||
|
||||
if QuickBuildOptionsRadioGroup.ItemIndex = 0
|
||||
then begin // Build LCL
|
||||
if AppLCLInterfaceComboBox.ItemIndex > -1
|
||||
then LCLInterfaceRadioGroup.ItemIndex := AppLCLInterfaceComboBox.ItemIndex;
|
||||
IDELCLInterfaceComboBox.Enabled := False;
|
||||
AppLCLInterfaceComboBox.Enabled := True;
|
||||
end
|
||||
else begin // Build IDE
|
||||
if IDELCLInterfaceComboBox.ItemIndex > -1
|
||||
then LCLInterfaceRadioGroup.ItemIndex := IDELCLInterfaceComboBox.ItemIndex;
|
||||
AppLCLInterfaceComboBox.Enabled := False;
|
||||
IDELCLInterfaceComboBox.Enabled := True;
|
||||
end;
|
||||
|
||||
case QuickBuildOptionsRadioGroup.ItemIndex of
|
||||
0 : begin // Build LCL
|
||||
SetOptions(mmBuild, mmNone, Options.ItemLCL);
|
||||
end;
|
||||
1 : begin // Build IDE with Packages
|
||||
SetOptions(mmBuild, mmNone, Options.ItemIDE);
|
||||
WithStaticPackagesCheckBox.Checked := True;
|
||||
end;
|
||||
2 : begin // Build IDE w/out Packages
|
||||
SetOptions(mmBuild, mmNone, Options.ItemIDE);
|
||||
WithStaticPackagesCheckBox.Checked := False;
|
||||
end;
|
||||
3 : begin // Build All
|
||||
SetOptions(mmNone, mmBuild, nil);
|
||||
WithStaticPackagesCheckBox.Checked := True;
|
||||
end;
|
||||
4 : begin // Clean + Build All
|
||||
SetOptions(mmNone, mmCleanBuild, nil);
|
||||
WithStaticPackagesCheckBox.Checked := True;
|
||||
end;
|
||||
end;
|
||||
{$ifdef UsePageInvalidate}
|
||||
AdvancedBuildOptionsPage.Invalidate;
|
||||
{$endif}
|
||||
end;
|
||||
|
||||
{ TBuildLazarusItem }
|
||||
|
||||
function TBuildLazarusItem.GetCommands(Mode: TMakeMode): string;
|
||||
@ -1215,6 +1373,7 @@ begin
|
||||
Path+'Build'+Items[i].Name+'/Value',
|
||||
MakeModeNames[Items[i].MakeMode]));
|
||||
end;
|
||||
FAdvanced:=XMLConfig.GetValue(Path+'Advanced/Value',false);
|
||||
FCleanAll:=XMLConfig.GetValue(Path+'CleanAll/Value',false);
|
||||
FExtraOptions:=XMLConfig.GetValue(Path+'ExtraOptions/Value','');
|
||||
TargetOS:=XMLConfig.GetValue(Path+'TargetOS/Value','');
|
||||
@ -1224,6 +1383,17 @@ begin
|
||||
fLCLPlatform:=GetDefaultLCLWidgetType
|
||||
else
|
||||
fLCLPlatform:=DirNameToLCLPlatform(LCLPlatformStr);
|
||||
LCLPlatformStr:= XMLConfig.GetValue(Path+'TargetLCLPlatform/Value','');
|
||||
if LCLPlatformStr='' then
|
||||
fTargetPlatform:=GetDefaultLCLWidgetType
|
||||
else
|
||||
fTargetPlatform:=DirNameToLCLPlatform(LCLPlatformStr);
|
||||
|
||||
LCLPlatformStr:= XMLConfig.GetValue(Path+'IDELCLPlatform/Value','');
|
||||
if LCLPlatformStr='' then
|
||||
fIDEPlatform:=GetDefaultLCLWidgetType
|
||||
else
|
||||
fIDEPlatform:=DirNameToLCLPlatform(LCLPlatformStr);
|
||||
FTargetDirectory:=AppendPathDelim(SetDirSeparators(
|
||||
XMLConfig.GetValue(Path+'TargetDirectory/Value',
|
||||
DefaultTargetDirectory)));
|
||||
@ -1247,6 +1417,7 @@ begin
|
||||
MakeModeNames[Items[i].DefaultMakeMode]);
|
||||
end;
|
||||
|
||||
XMLConfig.SetDeleteValue(Path+'Advanced/Value',FAdvanced,false);
|
||||
XMLConfig.SetDeleteValue(Path+'CleanAll/Value',FCleanAll,true);
|
||||
XMLConfig.SetDeleteValue(Path+'ExtraOptions/Value',FExtraOptions,'');
|
||||
XMLConfig.SetDeleteValue(Path+'TargetOS/Value',TargetOS,'');
|
||||
@ -1254,6 +1425,12 @@ begin
|
||||
XMLConfig.SetDeleteValue(Path+'LCLPlatform/Value',
|
||||
LCLPlatformDirNames[fLCLPlatform],
|
||||
LCLPlatformDirNames[GetDefaultLCLWidgetType]);
|
||||
XMLConfig.SetDeleteValue(Path+'TargetLCLPlatform/Value',
|
||||
LCLPlatformDirNames[fTargetPlatform],
|
||||
LCLPlatformDirNames[GetDefaultLCLWidgetType]);
|
||||
XMLConfig.SetDeleteValue(Path+'IDELCLPlatform/Value',
|
||||
LCLPlatformDirNames[fIDEPlatform],
|
||||
LCLPlatformDirNames[GetDefaultLCLWidgetType]);
|
||||
XMLConfig.SetDeleteValue(Path+'TargetDirectory/Value',
|
||||
FTargetDirectory,DefaultTargetDirectory);
|
||||
XMLConfig.SetDeleteValue(Path+'RestartAfterBuild/Value',FRestartAfterBuild,
|
||||
@ -1276,11 +1453,14 @@ var
|
||||
begin
|
||||
if (Source=nil) or (Source=Self) then exit;
|
||||
Clear;
|
||||
Advanced:=Source.Advanced;
|
||||
CleanAll:=Source.CleanAll;
|
||||
ExtraOptions:=Source.ExtraOptions;
|
||||
TargetOS:=Source.TargetOS;
|
||||
TargetCPU:=Source.TargetCPU;
|
||||
LCLPlatform:=Source.LCLPlatform;
|
||||
TargetPlatform:=Source.TargetPlatform;
|
||||
IDEPlatform:= Source.IDEPlatform;
|
||||
TargetDirectory:=Source.TargetDirectory;
|
||||
WithStaticPackages:=Source.WithStaticPackages;
|
||||
RestartAfterBuild:=Source.RestartAfterBuild;
|
||||
@ -1337,3 +1517,4 @@ initialization
|
||||
{$I buildlazdialog.lrs}
|
||||
|
||||
end.
|
||||
|
||||
|
||||
@ -1926,7 +1926,10 @@ resourcestring
|
||||
lisLazBuildNone = 'None';
|
||||
lisLazBuildBuild = 'Build';
|
||||
lisLazBuildCleanBuild = 'Clean+Build';
|
||||
|
||||
lisLazBuildBuildOptions ='Build Options';
|
||||
lisLazBuildQuickBuildOptions = 'Quick Build Options';
|
||||
lisLazBuildAdvancedBuildOptions = 'Advanced Build Options';
|
||||
|
||||
// compiler
|
||||
lisCompilerErrorInvalidCompiler = 'Error: invalid compiler: %s';
|
||||
listCompilerInternalError = 'Internal compiler error! (%d)';
|
||||
|
||||
Loading…
Reference in New Issue
Block a user