IDE: in Build Lazarus dialog, relocate "Edit Defines" button to be nearer the "Defines" list

git-svn-id: trunk@39292 -
This commit is contained in:
juha 2012-11-17 10:02:43 +00:00
parent d291bcedbd
commit 7b14876476

View File

@ -15,24 +15,24 @@ object ConfigureBuildLazarusDlg: TConfigureBuildLazarusDlg
OnResize = FormResize
OnShow = FormShow
Position = poScreenCenter
LCLVersion = '0.9.31'
LCLVersion = '1.1'
object CBLDBtnPanel: TPanel
AnchorSideTop.Side = asrBottom
Left = 0
Height = 41
Top = 439
Height = 45
Top = 435
Width = 700
Align = alBottom
AutoSize = True
BevelOuter = bvNone
ClientHeight = 41
ClientHeight = 45
ClientWidth = 700
TabOrder = 0
object CancelButton: TBitBtn
Left = 613
Height = 29
Left = 606
Height = 33
Top = 6
Width = 81
Width = 88
Align = alRight
AutoSize = True
BorderSpacing.Around = 6
@ -40,66 +40,61 @@ object ConfigureBuildLazarusDlg: TConfigureBuildLazarusDlg
Caption = 'Cancel'
Kind = bkCancel
ModalResult = 2
NumGlyphs = 0
TabOrder = 4
end
object SaveSettingsButton: TBitBtn
Left = 507
Height = 29
Left = 501
Height = 33
Top = 6
Width = 100
Width = 99
Align = alRight
AutoSize = True
BorderSpacing.Around = 6
Caption = 'Save settings'
NumGlyphs = 0
OnClick = SaveSettingsButtonClick
TabOrder = 3
end
object CompileButton: TBitBtn
Left = 300
Height = 29
Left = 298
Height = 33
Top = 6
Width = 64
Width = 63
Align = alRight
AutoSize = True
BorderSpacing.Around = 6
Caption = 'Compile'
NumGlyphs = 0
OnClick = CompileButtonClick
TabOrder = 1
end
object HelpButton: TBitBtn
Left = 6
Height = 29
Height = 33
Top = 6
Width = 67
Width = 76
Align = alLeft
AutoSize = True
BorderSpacing.Around = 6
Caption = '&Help'
Kind = bkHelp
NumGlyphs = 0
OnClick = HelpButtonClick
TabOrder = 0
end
object CompileAdvancedButton: TBitBtn
Left = 370
Height = 29
Left = 367
Height = 33
Top = 6
Width = 131
Width = 128
Align = alRight
AutoSize = True
BorderSpacing.Around = 6
Caption = 'Compile Advanced'
NumGlyphs = 0
OnClick = CompileAdvancedButtonClick
TabOrder = 2
end
end
object PageControl1: TPageControl
Left = 0
Height = 439
Height = 435
Top = 0
Width = 700
ActivePage = BuildTabSheet
@ -108,27 +103,27 @@ object ConfigureBuildLazarusDlg: TConfigureBuildLazarusDlg
TabOrder = 1
object BuildTabSheet: TTabSheet
Caption = 'BuildTabSheet'
ClientHeight = 412
ClientWidth = 696
ClientHeight = 404
ClientWidth = 710
object DetailsPanel: TPanel
Left = 0
Height = 412
Height = 404
Top = 0
Width = 696
Width = 710
Align = alClient
AutoSize = True
BevelOuter = bvNone
ClientHeight = 412
ClientWidth = 696
ClientHeight = 404
ClientWidth = 710
TabOrder = 0
object BuildProfileLabel: TLabel
AnchorSideLeft.Control = DetailsPanel
AnchorSideTop.Control = BuildProfileComboBox
AnchorSideTop.Side = asrCenter
Left = 6
Height = 18
Top = 8
Width = 110
Height = 15
Top = 12
Width = 104
BorderSpacing.Top = 5
BorderSpacing.Around = 6
Caption = 'Profile to Build'
@ -141,11 +136,11 @@ object ConfigureBuildLazarusDlg: TConfigureBuildLazarusDlg
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Side = asrCenter
AnchorSideRight.Control = BuildProfileButton
Left = 122
Height = 23
Left = 116
Height = 27
Hint = 'Name of the active profile.'
Top = 6
Width = 538
Width = 556
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 6
BorderSpacing.Right = 6
@ -162,11 +157,11 @@ object ConfigureBuildLazarusDlg: TConfigureBuildLazarusDlg
AnchorSideRight.Control = DetailsPanel
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Side = asrBottom
Left = 666
Height = 29
Left = 678
Height = 25
Hint = 'Manage profiles'
Top = 3
Width = 24
Top = 7
Width = 26
Anchors = [akTop, akRight]
AutoSize = True
BorderSpacing.Left = 6
@ -182,9 +177,9 @@ object ConfigureBuildLazarusDlg: TConfigureBuildLazarusDlg
AnchorSideTop.Control = LCLWidgetTypeComboBox
AnchorSideTop.Side = asrBottom
Left = 6
Height = 18
Top = 82
Width = 51
Height = 15
Top = 87
Width = 48
Alignment = taRightJustify
BorderSpacing.Top = 6
Caption = 'Options'
@ -200,8 +195,8 @@ object ConfigureBuildLazarusDlg: TConfigureBuildLazarusDlg
Left = 6
Height = 56
Hint = 'Options passed to compiler'
Top = 100
Width = 684
Top = 102
Width = 698
Anchors = [akTop, akLeft, akRight]
Lines.Strings = (
''
@ -217,9 +212,9 @@ object ConfigureBuildLazarusDlg: TConfigureBuildLazarusDlg
AnchorSideTop.Control = TargetDirectoryComboBox
AnchorSideTop.Side = asrBottom
Left = 6
Height = 18
Top = 209
Width = 50
Height = 15
Top = 212
Width = 47
BorderSpacing.Left = 6
BorderSpacing.Top = 6
Caption = 'Defines'
@ -232,10 +227,10 @@ object ConfigureBuildLazarusDlg: TConfigureBuildLazarusDlg
AnchorSideRight.Control = CleanUpGroupBox
AnchorSideBottom.Side = asrBottom
Left = 6
Height = 106
Height = 98
Hint = 'Defines without -d'
Top = 227
Width = 465
Width = 479
Anchors = [akTop, akLeft, akRight, akBottom]
ItemHeight = 0
ParentShowHint = False
@ -248,9 +243,9 @@ object ConfigureBuildLazarusDlg: TConfigureBuildLazarusDlg
AnchorSideTop.Control = BuildProfileComboBox
AnchorSideTop.Side = asrBottom
Left = 6
Height = 18
Top = 35
Width = 103
Height = 15
Top = 39
Width = 98
BorderSpacing.Top = 6
Caption = 'LCL Widget Type'
ParentColor = False
@ -261,8 +256,8 @@ object ConfigureBuildLazarusDlg: TConfigureBuildLazarusDlg
AnchorSideTop.Side = asrBottom
AnchorSideRight.Side = asrBottom
Left = 6
Height = 23
Top = 53
Height = 27
Top = 54
Width = 209
ItemHeight = 0
Style = csDropDownList
@ -273,9 +268,9 @@ object ConfigureBuildLazarusDlg: TConfigureBuildLazarusDlg
AnchorSideTop.Control = OptionsMemo
AnchorSideTop.Side = asrBottom
Left = 6
Height = 18
Top = 162
Width = 104
Height = 15
Top = 164
Width = 100
Alignment = taRightJustify
BorderSpacing.Top = 6
Caption = 'Target Directory'
@ -287,9 +282,9 @@ object ConfigureBuildLazarusDlg: TConfigureBuildLazarusDlg
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = TargetDirectoryButton
Left = 6
Height = 23
Top = 180
Width = 654
Height = 27
Top = 179
Width = 666
Anchors = [akTop, akLeft, akRight]
BorderSpacing.Right = 6
ItemHeight = 0
@ -301,9 +296,9 @@ object ConfigureBuildLazarusDlg: TConfigureBuildLazarusDlg
AnchorSideTop.Control = BuildProfileComboBox
AnchorSideTop.Side = asrBottom
Left = 221
Height = 18
Top = 35
Width = 63
Height = 15
Top = 39
Width = 60
Alignment = taRightJustify
BorderSpacing.Left = 6
BorderSpacing.Top = 6
@ -316,9 +311,9 @@ object ConfigureBuildLazarusDlg: TConfigureBuildLazarusDlg
AnchorSideTop.Control = BuildProfileComboBox
AnchorSideTop.Side = asrBottom
Left = 451
Height = 18
Top = 35
Width = 71
Height = 15
Top = 39
Width = 68
Alignment = taRightJustify
BorderSpacing.Left = 6
BorderSpacing.Top = 6
@ -330,11 +325,11 @@ object ConfigureBuildLazarusDlg: TConfigureBuildLazarusDlg
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = ConfirmBuildCheckBox
AnchorSideBottom.Side = asrBottom
Left = 394
Height = 22
Left = 487
Height = 20
Hint = 'Increment revision? (ToDo: get a better hint)'
Top = 369
Width = 204
Top = 362
Width = 201
BorderSpacing.Left = 12
Caption = 'UpdateRevisionIncCheckBox'
ParentShowHint = False
@ -348,9 +343,9 @@ object ConfigureBuildLazarusDlg: TConfigureBuildLazarusDlg
AnchorSideRight.Control = OptionsMemo
AnchorSideRight.Side = asrBottom
Left = 451
Height = 23
Top = 53
Width = 239
Height = 27
Top = 54
Width = 253
Anchors = [akTop, akLeft, akRight]
ItemHeight = 0
TabOrder = 8
@ -361,9 +356,9 @@ object ConfigureBuildLazarusDlg: TConfigureBuildLazarusDlg
AnchorSideRight.Control = DetailsPanel
AnchorSideRight.Side = asrBottom
Left = 6
Height = 17
Top = 345
Width = 684
Height = 15
Top = 339
Width = 698
Caption = 'CommonsDividerBevel'
Autosize = True
Anchors = [akLeft, akRight, akBottom]
@ -374,15 +369,17 @@ object ConfigureBuildLazarusDlg: TConfigureBuildLazarusDlg
ParentFont = False
end
object RestartAfterBuildCheckBox: TCheckBox
AnchorSideLeft.Control = CommonsDividerBevel
AnchorSideTop.Control = CommonsDividerBevel
AnchorSideTop.Side = asrBottom
AnchorSideLeft.Control = DefinesButton
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = DefinesButton
AnchorSideTop.Side = asrCenter
AnchorSideBottom.Side = asrBottom
Left = 6
Height = 22
Left = 107
Height = 20
Hint = 'Restart Lazarus automatically after building the IDE. Has no effect when building other parts'
Top = 369
Width = 195
Top = 362
Width = 192
BorderSpacing.Left = 12
BorderSpacing.Top = 7
Caption = 'RestartAfterBuildCheckBox'
ParentShowHint = False
@ -393,11 +390,11 @@ object ConfigureBuildLazarusDlg: TConfigureBuildLazarusDlg
AnchorSideLeft.Control = RestartAfterBuildCheckBox
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = RestartAfterBuildCheckBox
Left = 213
Height = 22
Left = 311
Height = 20
Hint = 'Show confirmation dialog when building directly from Tools menu'
Top = 369
Width = 169
Top = 362
Width = 164
BorderSpacing.Left = 12
Caption = 'ConfirmBuildCheckBox'
ParentShowHint = False
@ -405,16 +402,16 @@ object ConfigureBuildLazarusDlg: TConfigureBuildLazarusDlg
TabOrder = 11
end
object DefinesButton: TButton
AnchorSideTop.Control = RestartAfterBuildCheckBox
AnchorSideRight.Control = DetailsPanel
AnchorSideLeft.Control = CommonsDividerBevel
AnchorSideTop.Control = CommonsDividerBevel
AnchorSideTop.Side = asrBottom
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Side = asrBottom
Left = 602
Height = 29
Left = 6
Height = 25
Hint = 'Edit list of defines which can be used by any profile'
Top = 369
Width = 88
Anchors = [akTop, akRight]
Top = 360
Width = 89
AutoSize = True
BorderSpacing.Right = 6
Caption = 'Edit Defines'
@ -430,10 +427,10 @@ object ConfigureBuildLazarusDlg: TConfigureBuildLazarusDlg
AnchorSideRight.Control = DetailsPanel
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Side = asrBottom
Left = 666
Height = 29
Top = 177
Width = 24
Left = 678
Height = 25
Top = 180
Width = 26
Anchors = [akTop, akRight]
AutoSize = True
BorderSpacing.Left = 6
@ -449,8 +446,8 @@ object ConfigureBuildLazarusDlg: TConfigureBuildLazarusDlg
AnchorSideRight.Control = LCLWidgetTypeComboBox
AnchorSideRight.Side = asrBottom
Left = 221
Height = 23
Top = 53
Height = 27
Top = 54
Width = 224
ItemHeight = 0
TabOrder = 7
@ -462,9 +459,9 @@ object ConfigureBuildLazarusDlg: TConfigureBuildLazarusDlg
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = DetailsPanel
AnchorSideRight.Side = asrBottom
Left = 477
Height = 130
Top = 209
Left = 491
Height = 117
Top = 212
Width = 213
Anchors = [akTop, akRight]
AutoSize = True
@ -480,16 +477,16 @@ object ConfigureBuildLazarusDlg: TConfigureBuildLazarusDlg
ChildSizing.ShrinkVertical = crsScaleChilds
ChildSizing.Layout = cclLeftToRightThenTopToBottom
ChildSizing.ControlsPerLine = 1
ClientHeight = 109
ClientWidth = 209
ClientHeight = 98
ClientWidth = 205
ParentShowHint = False
ShowHint = True
TabOrder = 13
object CleanAutoRadioButton: TRadioButton
Left = 6
Height = 23
Height = 20
Top = 6
Width = 197
Width = 193
Caption = 'CleanAutoRadioButton'
Checked = True
TabOrder = 0
@ -497,25 +494,25 @@ object ConfigureBuildLazarusDlg: TConfigureBuildLazarusDlg
end
object CleanCommonRadioButton: TRadioButton
Left = 6
Height = 23
Top = 29
Width = 197
Height = 20
Top = 26
Width = 193
Caption = 'CleanCommonRadioButton'
TabOrder = 1
end
object CleanAllRadioButton: TRadioButton
Left = 6
Height = 23
Top = 52
Width = 197
Height = 20
Top = 46
Width = 193
Caption = 'CleanAllRadioButton'
TabOrder = 2
end
object CleanOnceCheckBox: TCheckBox
Left = 6
Height = 22
Top = 81
Width = 197
Height = 20
Top = 72
Width = 193
BorderSpacing.Top = 6
Caption = 'CleanOnceCheckBox'
TabOrder = 3