IDE: Improve layout of "(Show) Compiler Options" form. Issue #35434, patch from Alexey Tor.

git-svn-id: trunk@61048 -
This commit is contained in:
juha 2019-04-24 18:09:11 +00:00
parent 8e3bac19a3
commit e149d43e6b

View File

@ -1,12 +1,11 @@
object ShowCompilerOptionsDlg: TShowCompilerOptionsDlg object ShowCompilerOptionsDlg: TShowCompilerOptionsDlg
Left = 341 Left = 341
Height = 420 Height = 420
Top = 320 Top = 318
Width = 481 Width = 645
AutoSize = True
Caption = 'Compiler Options' Caption = 'Compiler Options'
ClientHeight = 420 ClientHeight = 420
ClientWidth = 481 ClientWidth = 645
Constraints.MinHeight = 194 Constraints.MinHeight = 194
Constraints.MinWidth = 390 Constraints.MinWidth = 390
OnClose = FormClose OnClose = FormClose
@ -20,9 +19,9 @@ object ShowCompilerOptionsDlg: TShowCompilerOptionsDlg
AnchorSideRight.Side = asrBottom AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = Owner AnchorSideBottom.Control = Owner
AnchorSideBottom.Side = asrBottom AnchorSideBottom.Side = asrBottom
Left = 400 Left = 564
Height = 28 Height = 29
Top = 386 Top = 385
Width = 75 Width = 75
Anchors = [akRight, akBottom] Anchors = [akRight, akBottom]
AutoSize = True AutoSize = True
@ -33,29 +32,30 @@ object ShowCompilerOptionsDlg: TShowCompilerOptionsDlg
Constraints.MinWidth = 75 Constraints.MinWidth = 75
Default = True Default = True
Kind = bkClose Kind = bkClose
TabOrder = 0 TabOrder = 1
end end
object PageControl1: TPageControl object PageControl1: TPageControl
AnchorSideBottom.Control = CloseButton AnchorSideBottom.Control = CloseButton
Left = 0 Left = 6
Height = 380 Height = 373
Top = 0 Top = 6
Width = 481 Width = 633
ActivePage = CmdLineParamsTabSheet ActivePage = CmdLineParamsTabSheet
Align = alTop Align = alTop
Anchors = [akTop, akLeft, akRight, akBottom] Anchors = [akTop, akLeft, akRight, akBottom]
BorderSpacing.Around = 6
TabIndex = 0 TabIndex = 0
TabOrder = 1 TabOrder = 0
object CmdLineParamsTabSheet: TTabSheet object CmdLineParamsTabSheet: TTabSheet
Caption = 'CmdLineParams' Caption = 'CmdLineParams'
ClientHeight = 351 ClientHeight = 342
ClientWidth = 477 ClientWidth = 629
object CmdLineMemo: TMemo object CmdLineMemo: TMemo
AnchorSideBottom.Control = RelativePathsCheckBox AnchorSideBottom.Control = RelativePathsCheckBox
Left = 6 Left = 6
Height = 315 Height = 306
Top = 6 Top = 6
Width = 465 Width = 617
Align = alTop Align = alTop
Anchors = [akTop, akLeft, akRight, akBottom] Anchors = [akTop, akLeft, akRight, akBottom]
BorderSpacing.Around = 6 BorderSpacing.Around = 6
@ -71,8 +71,8 @@ object ShowCompilerOptionsDlg: TShowCompilerOptionsDlg
AnchorSideBottom.Side = asrBottom AnchorSideBottom.Side = asrBottom
Left = 6 Left = 6
Height = 24 Height = 24
Top = 327 Top = 318
Width = 155 Width = 184
Anchors = [akLeft, akBottom] Anchors = [akLeft, akBottom]
Caption = 'RelativePathsCheckBox' Caption = 'RelativePathsCheckBox'
Checked = True Checked = True
@ -85,10 +85,10 @@ object ShowCompilerOptionsDlg: TShowCompilerOptionsDlg
AnchorSideLeft.Side = asrBottom AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = RelativePathsCheckBox AnchorSideTop.Control = RelativePathsCheckBox
AnchorSideBottom.Side = asrBottom AnchorSideBottom.Side = asrBottom
Left = 176 Left = 205
Height = 24 Height = 24
Top = 327 Top = 318
Width = 128 Width = 151
BorderSpacing.Left = 15 BorderSpacing.Left = 15
Caption = 'MultilineCheckBox' Caption = 'MultilineCheckBox'
Checked = True Checked = True
@ -99,8 +99,8 @@ object ShowCompilerOptionsDlg: TShowCompilerOptionsDlg
end end
object InheritedParamsTabSheet: TTabSheet object InheritedParamsTabSheet: TTabSheet
Caption = 'InheritedParams' Caption = 'InheritedParams'
ClientHeight = 351 ClientHeight = 342
ClientWidth = 477 ClientWidth = 629
object InhTreeView: TTreeView object InhTreeView: TTreeView
Left = 0 Left = 0
Height = 287 Height = 287