paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-14 21:59:07 +02:00
Code Issues Packages Projects Releases Wiki Activity

IDE: change spacing and anchoring in compiler optioms GUI

Browse Source 
git-svn-id: trunk@42224 -
This commit is contained in:
juha 2013-07-29 08:08:32 +00:00
parent 0df29b9470
commit 2fee7b1ec2
2 changed files with 104 additions and 76 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

154
ide/frames/compiler_codegen_options.lfm
View File

@ -14,33 +14,37 @@ object CompilerCodegenOptionsFrame: TCompilerCodegenOptionsFrame
AnchorSideTop.Control = grpOptimizationLevels AnchorSideTop.Control = grpOptimizationLevels
AnchorSideRight.Side = asrBottom AnchorSideRight.Side = asrBottom
AnchorSideBottom.Side = asrBottom AnchorSideBottom.Side = asrBottom
Left = 161 Left = 155
Height = 79 Height = 70
Top = 0 Top = 0
Width = 160 Width = 154
AutoSize = True AutoSize = True
BorderSpacing.Left = 15 BorderSpacing.Left = 15
Caption = 'grpUnitStyle' Caption = 'grpUnitStyle'
ClientHeight = 60 ClientHeight = 51
ClientWidth = 156 ClientWidth = 150
TabOrder = 0 TabOrder = 0
object chkSmartLinkUnit: TCheckBox object chkSmartLinkUnit: TCheckBox
Left = 6 Left = 6
Height = 21 Height = 21
Top = 6 Top = 3
Width = 144 Width = 144
Align = alTop Align = alTop
BorderSpacing.Around = 6 BorderSpacing.Left = 6
BorderSpacing.Top = 3
Caption = 'chkSmartLinkUnit' Caption = 'chkSmartLinkUnit'
TabOrder = 0 TabOrder = 0
end end
object chkRelocatableUnit: TCheckBox object chkRelocatableUnit: TCheckBox
AnchorSideLeft.Control = chkSmartLinkUnit
AnchorSideTop.Control = chkSmartLinkUnit
AnchorSideTop.Side = asrBottom
Left = 6 Left = 6
Height = 21 Height = 21
Top = 33 Top = 27
Width = 144 Width = 144
Align = alTop BorderSpacing.Top = 3
BorderSpacing.Around = 6 BorderSpacing.Bottom = 3
Caption = 'chkRelocatableUnit' Caption = 'chkRelocatableUnit'
TabOrder = 1 TabOrder = 1
end end
@ -51,16 +55,16 @@ object CompilerCodegenOptionsFrame: TCompilerCodegenOptionsFrame
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
AnchorSideRight.Side = asrBottom AnchorSideRight.Side = asrBottom
AnchorSideBottom.Side = asrBottom AnchorSideBottom.Side = asrBottom
Left = 161 Left = 155
Height = 87 Height = 84
Top = 84 Top = 75
Width = 178 Width = 172
AutoSize = True AutoSize = True
BorderSpacing.Top = 5 BorderSpacing.Top = 5
Caption = 'grpHeapStackSize' Caption = 'grpHeapStackSize'
ChildSizing.TopBottomSpacing = 6 ChildSizing.TopBottomSpacing = 6
ClientHeight = 68 ClientHeight = 65
ClientWidth = 174 ClientWidth = 168
TabOrder = 1 TabOrder = 1
object edtHeapSize: TEdit object edtHeapSize: TEdit
AnchorSideLeft.Control = lbHeapSize AnchorSideLeft.Control = lbHeapSize
@ -68,13 +72,13 @@ object CompilerCodegenOptionsFrame: TCompilerCodegenOptionsFrame
AnchorSideTop.Control = grpHeapStackSize AnchorSideTop.Control = grpHeapStackSize
AnchorSideRight.Control = grpHeapStackSize AnchorSideRight.Control = grpHeapStackSize
AnchorSideRight.Side = asrBottom AnchorSideRight.Side = asrBottom
Left = 86 Left = 80
Height = 25 Height = 25
Top = 6 Top = 6
Width = 82 Width = 82
Anchors = [akTop, akLeft, akRight] Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 6 BorderSpacing.Left = 6
BorderSpacing.Around = 6 BorderSpacing.Right = 6
TabOrder = 0 TabOrder = 0
Text = 'edtHeapSize' Text = 'edtHeapSize'
end end
@ -86,7 +90,7 @@ object CompilerCodegenOptionsFrame: TCompilerCodegenOptionsFrame
Height = 15 Height = 15
Top = 11 Top = 11
Width = 68 Width = 68
BorderSpacing.Around = 6 BorderSpacing.Left = 6
Caption = 'lbHeapSize' Caption = 'lbHeapSize'
ParentColor = False ParentColor = False
end end
@ -97,25 +101,26 @@ object CompilerCodegenOptionsFrame: TCompilerCodegenOptionsFrame
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = grpHeapStackSize AnchorSideRight.Control = grpHeapStackSize
AnchorSideRight.Side = asrBottom AnchorSideRight.Side = asrBottom
Left = 88 Left = 82
Height = 25 Height = 25
Top = 37 Top = 34
Width = 80 Width = 80
Anchors = [akTop, akLeft, akRight] Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 6 BorderSpacing.Left = 6
BorderSpacing.Around = 6 BorderSpacing.Top = 3
BorderSpacing.Right = 6
BorderSpacing.Bottom = 3
TabOrder = 1 TabOrder = 1
Text = 'edtStackSize' Text = 'edtStackSize'
end end
object lbStackSize: TLabel object lbStackSize: TLabel
AnchorSideLeft.Control = grpHeapStackSize AnchorSideLeft.Control = lbHeapSize
AnchorSideTop.Control = edtStackSize AnchorSideTop.Control = edtStackSize
AnchorSideTop.Side = asrCenter AnchorSideTop.Side = asrCenter
Left = 6 Left = 6
Height = 15 Height = 15
Top = 42 Top = 39
Width = 70 Width = 70
BorderSpacing.Around = 6
Caption = 'lbStackSize' Caption = 'lbStackSize'
ParentColor = False ParentColor = False
end end
@ -124,60 +129,62 @@ object CompilerCodegenOptionsFrame: TCompilerCodegenOptionsFrame
AnchorSideRight.Side = asrBottom AnchorSideRight.Side = asrBottom
AnchorSideBottom.Side = asrBottom AnchorSideBottom.Side = asrBottom
Left = 0 Left = 0
Height = 133 Height = 118
Top = 0 Top = 0
Width = 146 Width = 140
AutoSize = True AutoSize = True
Caption = 'grpOptimizationLevels' Caption = 'grpOptimizationLevels'
ClientHeight = 114 ClientHeight = 99
ClientWidth = 142 ClientWidth = 136
TabOrder = 2 TabOrder = 2
object radOptLevelNone: TRadioButton object radOptLevelNone: TRadioButton
AnchorSideLeft.Control = grpOptimizationLevels AnchorSideLeft.Control = grpOptimizationLevels
AnchorSideTop.Control = grpOptimizationLevels AnchorSideTop.Control = grpOptimizationLevels
Left = 6 Left = 6
Height = 21 Height = 21
Top = 6 Top = 3
Width = 130 Width = 130
BorderSpacing.Around = 6 BorderSpacing.Left = 6
BorderSpacing.Top = 3
Caption = 'radOptLevelNone' Caption = 'radOptLevelNone'
Checked = True Checked = True
TabOrder = 0 TabOrder = 0
TabStop = True TabStop = True
end end
object radOptLevel1: TRadioButton object radOptLevel1: TRadioButton
AnchorSideLeft.Control = grpOptimizationLevels AnchorSideLeft.Control = radOptLevelNone
AnchorSideTop.Control = radOptLevelNone AnchorSideTop.Control = radOptLevelNone
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
Left = 6 Left = 6
Height = 21 Height = 21
Top = 33 Top = 27
Width = 105 Width = 105
BorderSpacing.Around = 6 BorderSpacing.Top = 3
Caption = 'radOptLevel1' Caption = 'radOptLevel1'
TabOrder = 1 TabOrder = 1
end end
object radOptLevel2: TRadioButton object radOptLevel2: TRadioButton
AnchorSideLeft.Control = grpOptimizationLevels AnchorSideLeft.Control = radOptLevel1
AnchorSideTop.Control = radOptLevel1 AnchorSideTop.Control = radOptLevel1
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
Left = 6 Left = 6
Height = 21 Height = 21
Top = 60 Top = 51
Width = 105 Width = 105
BorderSpacing.Around = 6 BorderSpacing.Top = 3
Caption = 'radOptLevel2' Caption = 'radOptLevel2'
TabOrder = 2 TabOrder = 2
end end
object radOptLevel3: TRadioButton object radOptLevel3: TRadioButton
AnchorSideLeft.Control = grpOptimizationLevels AnchorSideLeft.Control = radOptLevel2
AnchorSideTop.Control = radOptLevel2 AnchorSideTop.Control = radOptLevel2
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
Left = 6 Left = 6
Height = 21 Height = 21
Top = 87 Top = 75
Width = 105 Width = 105
BorderSpacing.Around = 6 BorderSpacing.Top = 3
BorderSpacing.Bottom = 3
Caption = 'radOptLevel3' Caption = 'radOptLevel3'
TabOrder = 3 TabOrder = 3
end end
@ -187,42 +194,48 @@ object CompilerCodegenOptionsFrame: TCompilerCodegenOptionsFrame
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
AnchorSideRight.Side = asrBottom AnchorSideRight.Side = asrBottom
Left = 0 Left = 0
Height = 137 Height = 118
Top = 221 Top = 198
Width = 172 Width = 166
AutoSize = True AutoSize = True
BorderSpacing.Top = 5 BorderSpacing.Top = 5
Caption = 'grpLinking' Caption = 'grpLinking'
ClientHeight = 118 ClientHeight = 99
ClientWidth = 168 ClientWidth = 162
TabOrder = 3 TabOrder = 3
object chkLinkSmart: TCheckBox object chkLinkSmart: TCheckBox
Left = 6 Left = 6
Height = 21 Height = 21
Top = 6 Top = 3
Width = 156 Width = 150
Align = alTop Align = alTop
BorderSpacing.Around = 6 BorderSpacing.Left = 6
BorderSpacing.Top = 3
BorderSpacing.Right = 6
Caption = 'chkLinkSmart' Caption = 'chkLinkSmart'
TabOrder = 0 TabOrder = 0
end end
object chkWin32GraphicApp: TCheckBox object chkWin32GraphicApp: TCheckBox
AnchorSideLeft.Control = chkLinkSmart
AnchorSideTop.Control = chkLinkSmart
AnchorSideTop.Side = asrBottom
Left = 6 Left = 6
Height = 21 Height = 21
Top = 33 Top = 27
Width = 156 Width = 156
Align = alTop BorderSpacing.Top = 3
BorderSpacing.Around = 6
Caption = 'chkWin32GraphicApp' Caption = 'chkWin32GraphicApp'
TabOrder = 1 TabOrder = 1
end end
object chkOptionsLinkOpt: TCheckBox object chkOptionsLinkOpt: TCheckBox
AnchorSideLeft.Control = chkWin32GraphicApp
AnchorSideTop.Control = chkWin32GraphicApp
AnchorSideTop.Side = asrBottom
Left = 6 Left = 6
Height = 21 Height = 21
Top = 60 Top = 50
Width = 156 Width = 140
Align = alTop BorderSpacing.Top = 2
BorderSpacing.Around = 6
Caption = 'chkOptionsLinkOpt' Caption = 'chkOptionsLinkOpt'
TabOrder = 2 TabOrder = 2
end end
@ -234,12 +247,12 @@ object CompilerCodegenOptionsFrame: TCompilerCodegenOptionsFrame
AnchorSideRight.Side = asrBottom AnchorSideRight.Side = asrBottom
Left = 25 Left = 25
Height = 25 Height = 25
Top = 87 Top = 71
Width = 137 Width = 131
Anchors = [akTop, akLeft, akRight] Anchors = [akTop, akLeft, akRight]
BorderSpacing.Left = 19 BorderSpacing.Left = 19
BorderSpacing.Right = 6 BorderSpacing.Right = 6
BorderSpacing.Bottom = 6 BorderSpacing.Bottom = 3
TabOrder = 3 TabOrder = 3
Text = 'edtOptionsLinkOpt' Text = 'edtOptionsLinkOpt'
end end
@ -248,30 +261,37 @@ object CompilerCodegenOptionsFrame: TCompilerCodegenOptionsFrame
AnchorSideTop.Control = grpOptimizationLevels AnchorSideTop.Control = grpOptimizationLevels
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
Left = 0 Left = 0
Height = 78 Height = 70
Top = 138 Top = 123
Width = 165 Width = 159
AutoSize = True AutoSize = True
BorderSpacing.Top = 5 BorderSpacing.Top = 5
Caption = 'grpOptimizations' Caption = 'grpOptimizations'
ClientHeight = 59 ClientHeight = 51
ClientWidth = 161 ClientWidth = 155
TabOrder = 4 TabOrder = 4
object Label1: TLabel object Label1: TLabel
AnchorSideLeft.Control = chkOptSmaller
AnchorSideTop.Control = chkOptSmaller
AnchorSideTop.Side = asrBottom
Left = 6 Left = 6
Height = 15 Height = 15
Top = 38 Top = 30
Width = 149 Width = 149
BorderSpacing.Around = 6 BorderSpacing.Top = 6
BorderSpacing.Bottom = 6
Caption = 'ToDo: more optimization' Caption = 'ToDo: more optimization'
ParentColor = False ParentColor = False
end end
object chkOptSmaller: TCheckBox object chkOptSmaller: TCheckBox
AnchorSideLeft.Control = grpOptimizations
AnchorSideTop.Control = grpOptimizations
Left = 6 Left = 6
Height = 21 Height = 21
Top = 6 Top = 3
Width = 114 Width = 114
BorderSpacing.Around = 6 BorderSpacing.Left = 6
BorderSpacing.Top = 3
Caption = 'chkOptSmaller' Caption = 'chkOptSmaller'
TabOrder = 0 TabOrder = 0
end end

26
ide/frames/compiler_config_target.lfm
View File

@ -10,13 +10,13 @@ object CompilerConfigTargetFrame: TCompilerConfigTargetFrame
DesignTop = 542 DesignTop = 542
object grpConfigFile: TGroupBox object grpConfigFile: TGroupBox
Left = 0 Left = 0
Height = 110 Height = 107
Top = 0 Top = 0
Width = 594 Width = 594
Align = alTop Align = alTop
AutoSize = True AutoSize = True
Caption = 'grpConfigFile' Caption = 'grpConfigFile'
ClientHeight = 91 ClientHeight = 88
ClientWidth = 590 ClientWidth = 590
TabOrder = 0 TabOrder = 0
object chkConfigFile: TCheckBox object chkConfigFile: TCheckBox
@ -35,18 +35,26 @@ object CompilerConfigTargetFrame: TCompilerConfigTargetFrame
Top = 33 Top = 33
Width = 578 Width = 578
Align = alTop Align = alTop
BorderSpacing.Around = 6 BorderSpacing.Left = 6
BorderSpacing.Right = 6
Caption = 'chkCustomConfigFile' Caption = 'chkCustomConfigFile'
OnClick = chkCustomConfigFileClick OnClick = chkCustomConfigFileClick
TabOrder = 1 TabOrder = 1
end end
object edtConfigPath: TEdit object edtConfigPath: TEdit
Left = 6 AnchorSideLeft.Control = chkCustomConfigFile
AnchorSideTop.Control = chkCustomConfigFile
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = chkCustomConfigFile
AnchorSideRight.Side = asrBottom
Left = 25
Height = 25 Height = 25
Top = 60 Top = 57
Width = 578 Width = 559
Align = alTop Anchors = [akTop, akLeft, akRight]
BorderSpacing.Around = 6 BorderSpacing.Left = 19
BorderSpacing.Top = 3
BorderSpacing.Bottom = 6
TabOrder = 2 TabOrder = 2
Text = 'edtConfigPath' Text = 'edtConfigPath'
end end
@ -55,7 +63,7 @@ object CompilerConfigTargetFrame: TCompilerConfigTargetFrame
AnchorSideBottom.Side = asrBottom AnchorSideBottom.Side = asrBottom
Left = 0 Left = 0
Height = 118 Height = 118
Top = 121 Top = 118
Width = 594 Width = 594
Align = alTop Align = alTop
AutoSize = True AutoSize = True