IDE: put project option lrs near the resource type

This commit is contained in:
mattias 2023-06-24 12:07:13 +02:00
parent 05555c84d5
commit 45ded69b77

View File

@ -75,6 +75,20 @@ object ProjectMiscOptionsFrame: TProjectMiscOptionsFrame
ShowHint = True ShowHint = True
TabOrder = 3 TabOrder = 3
end end
object MainUnitHasScaledStatementCheckBox: TCheckBox
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = MainUnitHasTitleStatementCheckBox
AnchorSideTop.Side = asrBottom
Left = 0
Height = 19
Top = 100
Width = 229
BorderSpacing.Top = 6
Caption = 'MainUnitHasScaledStatementCheckBox'
ParentShowHint = False
ShowHint = True
TabOrder = 4
end
object RunnableCheckBox: TCheckBox object RunnableCheckBox: TCheckBox
AnchorSideLeft.Control = Owner AnchorSideLeft.Control = Owner
AnchorSideTop.Control = Bevel1 AnchorSideTop.Control = Bevel1
@ -88,6 +102,20 @@ object ProjectMiscOptionsFrame: TProjectMiscOptionsFrame
ShowHint = True ShowHint = True
TabOrder = 5 TabOrder = 5
end end
object UseDesignTimePkgsCheckBox: TCheckBox
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = RunnableCheckBox
AnchorSideTop.Side = asrBottom
Left = 0
Height = 19
Top = 156
Width = 179
BorderSpacing.Top = 6
Caption = 'UseDesignTimePkgsCheckBox'
ParentShowHint = False
ShowHint = True
TabOrder = 6
end
object AlwaysBuildCheckBox: TCheckBox object AlwaysBuildCheckBox: TCheckBox
AnchorSideLeft.Control = Owner AnchorSideLeft.Control = Owner
AnchorSideTop.Control = UseDesignTimePkgsCheckBox AnchorSideTop.Control = UseDesignTimePkgsCheckBox
@ -102,23 +130,37 @@ object ProjectMiscOptionsFrame: TProjectMiscOptionsFrame
ShowHint = True ShowHint = True
TabOrder = 7 TabOrder = 7
end end
object LRSInOutputDirCheckBox: TCheckBox object CompatibilityModeCheckBox: TCheckBox
AnchorSideLeft.Control = Owner AnchorSideLeft.Control = Owner
AnchorSideTop.Control = AlwaysBuildCheckBox AnchorSideTop.Control = AlwaysBuildCheckBox
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
Left = 0 Left = 0
Height = 19 Height = 19
Top = 206 Top = 206
Width = 175
BorderSpacing.Top = 6
Caption = 'CompatibilityModeCheckBox'
ParentShowHint = False
ShowHint = True
TabOrder = 8
end
object LRSInOutputDirCheckBox: TCheckBox
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = CompatibilityModeCheckBox
AnchorSideTop.Side = asrBottom
Left = 0
Top = 231
Height = 19
Width = 154 Width = 154
BorderSpacing.Top = 6 BorderSpacing.Top = 6
Caption = 'LRSInOutputDirCheckBox' Caption = 'LRSInOutputDirCheckBox'
ParentShowHint = False ParentShowHint = False
ShowHint = True ShowHint = True
TabOrder = 8 TabOrder = 9
end end
object ResourceGroupBox: TGroupBox object ResourceGroupBox: TGroupBox
AnchorSideLeft.Control = Owner AnchorSideLeft.Control = Owner
AnchorSideTop.Control = CompatibilityModeCheckBox AnchorSideTop.Control = LRSInOutputDirCheckBox
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom AnchorSideRight.Side = asrBottom
@ -163,20 +205,6 @@ object ProjectMiscOptionsFrame: TProjectMiscOptionsFrame
TabStop = True TabStop = True
end end
end end
object UseDesignTimePkgsCheckBox: TCheckBox
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = RunnableCheckBox
AnchorSideTop.Side = asrBottom
Left = 0
Height = 19
Top = 156
Width = 179
BorderSpacing.Top = 6
Caption = 'UseDesignTimePkgsCheckBox'
ParentShowHint = False
ShowHint = True
TabOrder = 6
end
object PathDelimLabel: TLabel object PathDelimLabel: TLabel
AnchorSideLeft.Control = Owner AnchorSideLeft.Control = Owner
AnchorSideTop.Control = PathDelimComboBox AnchorSideTop.Control = PathDelimComboBox
@ -217,32 +245,4 @@ object ProjectMiscOptionsFrame: TProjectMiscOptionsFrame
TabOrder = 11 TabOrder = 11
Text = 'PathDelimComboBox' Text = 'PathDelimComboBox'
end end
object MainUnitHasScaledStatementCheckBox: TCheckBox
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = MainUnitHasTitleStatementCheckBox
AnchorSideTop.Side = asrBottom
Left = 0
Height = 19
Top = 100
Width = 229
BorderSpacing.Top = 6
Caption = 'MainUnitHasScaledStatementCheckBox'
ParentShowHint = False
ShowHint = True
TabOrder = 4
end
object CompatibilityModeCheckBox: TCheckBox
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = LRSInOutputDirCheckBox
AnchorSideTop.Side = asrBottom
Left = 0
Height = 19
Top = 231
Width = 175
BorderSpacing.Top = 6
Caption = 'CompatibilityModeCheckBox'
ParentShowHint = False
ShowHint = True
TabOrder = 9
end
end end