mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-08 20:38:16 +02:00
IDE: Make '...' buttons square (issue #32924).
git-svn-id: trunk@56956 -
This commit is contained in:
parent
f0757ff745
commit
b6077f9686
@ -13,15 +13,15 @@ object LazFindReplaceDialog: TLazFindReplaceDialog
|
||||
KeyPreview = True
|
||||
OnChangeBounds = FormChangeBounds
|
||||
OnClose = FormClose
|
||||
LCLVersion = '1.3'
|
||||
LCLVersion = '1.9.0.0'
|
||||
object TextToFindLabel: TLabel
|
||||
AnchorSideLeft.Control = Owner
|
||||
AnchorSideTop.Control = TextToFindComboBox
|
||||
AnchorSideTop.Side = asrCenter
|
||||
Left = 6
|
||||
Height = 20
|
||||
Height = 15
|
||||
Top = 16
|
||||
Width = 109
|
||||
Width = 85
|
||||
Alignment = taRightJustify
|
||||
BorderSpacing.Left = 6
|
||||
Caption = 'TextToFindLabel'
|
||||
@ -34,10 +34,10 @@ object LazFindReplaceDialog: TLazFindReplaceDialog
|
||||
AnchorSideRight.Side = asrBottom
|
||||
AnchorSideBottom.Control = TextToFindComboBox
|
||||
AnchorSideBottom.Side = asrBottom
|
||||
Left = 456
|
||||
Height = 28
|
||||
Left = 458
|
||||
Height = 23
|
||||
Top = 12
|
||||
Width = 25
|
||||
Width = 23
|
||||
AllowAllUp = True
|
||||
Anchors = [akTop, akRight, akBottom]
|
||||
BorderSpacing.Right = 6
|
||||
@ -51,9 +51,9 @@ object LazFindReplaceDialog: TLazFindReplaceDialog
|
||||
AnchorSideTop.Control = ReplaceTextComboBox
|
||||
AnchorSideTop.Side = asrCenter
|
||||
Left = 6
|
||||
Height = 24
|
||||
Top = 48
|
||||
Width = 172
|
||||
Height = 19
|
||||
Top = 43
|
||||
Width = 138
|
||||
BorderSpacing.Left = 6
|
||||
Caption = 'ReplaceWithCheckbox'
|
||||
OnChange = ReplaceWithCheckboxChange
|
||||
@ -63,15 +63,15 @@ object LazFindReplaceDialog: TLazFindReplaceDialog
|
||||
AnchorSideLeft.Control = TextToFindLabel
|
||||
AnchorSideLeft.Side = asrBottom
|
||||
AnchorSideRight.Control = EnableAutoCompleteSpeedButton
|
||||
Left = 121
|
||||
Height = 28
|
||||
Left = 97
|
||||
Height = 23
|
||||
Top = 12
|
||||
Width = 335
|
||||
Width = 361
|
||||
Anchors = [akTop, akLeft, akRight]
|
||||
AutoComplete = True
|
||||
AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactRetainPrefixCase, cbactSearchAscending]
|
||||
BorderSpacing.Left = 6
|
||||
ItemHeight = 20
|
||||
ItemHeight = 15
|
||||
OnKeyDown = TextToFindComboboxKeyDown
|
||||
TabOrder = 0
|
||||
Text = 'TextToFindComboBox'
|
||||
@ -83,16 +83,16 @@ object LazFindReplaceDialog: TLazFindReplaceDialog
|
||||
AnchorSideTop.Side = asrBottom
|
||||
AnchorSideRight.Control = Owner
|
||||
AnchorSideRight.Side = asrBottom
|
||||
Left = 190
|
||||
Height = 28
|
||||
Top = 46
|
||||
Width = 291
|
||||
Left = 156
|
||||
Height = 23
|
||||
Top = 41
|
||||
Width = 325
|
||||
Anchors = [akTop, akLeft, akRight]
|
||||
AutoComplete = True
|
||||
AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactRetainPrefixCase, cbactSearchAscending]
|
||||
BorderSpacing.Left = 6
|
||||
BorderSpacing.Around = 6
|
||||
ItemHeight = 20
|
||||
ItemHeight = 15
|
||||
OnKeyDown = TextToFindComboboxKeyDown
|
||||
TabOrder = 2
|
||||
Text = 'ReplaceTextComboBox'
|
||||
@ -104,21 +104,21 @@ object LazFindReplaceDialog: TLazFindReplaceDialog
|
||||
AnchorSideBottom.Control = DirectionGroupBox
|
||||
AnchorSideBottom.Side = asrBottom
|
||||
Left = 6
|
||||
Height = 222
|
||||
Top = 80
|
||||
Height = 186
|
||||
Top = 70
|
||||
Width = 231
|
||||
Anchors = [akTop, akLeft, akBottom]
|
||||
BorderSpacing.Left = 6
|
||||
BorderSpacing.Top = 6
|
||||
Caption = 'OptionsGroupBox'
|
||||
ClientHeight = 200
|
||||
ClientHeight = 166
|
||||
ClientWidth = 227
|
||||
TabOrder = 3
|
||||
OnResize = OptionsGroupBoxResize
|
||||
object PromptOnReplaceCheckBox: TCheckBox
|
||||
Left = 6
|
||||
Height = 24
|
||||
Top = 144
|
||||
Height = 19
|
||||
Top = 124
|
||||
Width = 215
|
||||
Align = alTop
|
||||
BorderSpacing.Top = 3
|
||||
@ -132,8 +132,8 @@ object LazFindReplaceDialog: TLazFindReplaceDialog
|
||||
end
|
||||
object MultiLineCheckBox: TCheckBox
|
||||
Left = 6
|
||||
Height = 24
|
||||
Top = 111
|
||||
Height = 19
|
||||
Top = 96
|
||||
Width = 215
|
||||
Align = alTop
|
||||
BorderSpacing.Top = 3
|
||||
@ -145,8 +145,8 @@ object LazFindReplaceDialog: TLazFindReplaceDialog
|
||||
end
|
||||
object RegularExpressionsCheckBox: TCheckBox
|
||||
Left = 6
|
||||
Height = 24
|
||||
Top = 78
|
||||
Height = 19
|
||||
Top = 68
|
||||
Width = 215
|
||||
Align = alTop
|
||||
BorderSpacing.Top = 3
|
||||
@ -158,8 +158,8 @@ object LazFindReplaceDialog: TLazFindReplaceDialog
|
||||
end
|
||||
object WholeWordsOnlyCheckBox: TCheckBox
|
||||
Left = 6
|
||||
Height = 24
|
||||
Top = 45
|
||||
Height = 19
|
||||
Top = 40
|
||||
Width = 215
|
||||
Align = alTop
|
||||
BorderSpacing.Top = 3
|
||||
@ -171,7 +171,7 @@ object LazFindReplaceDialog: TLazFindReplaceDialog
|
||||
end
|
||||
object CaseSensitiveCheckBox: TCheckBox
|
||||
Left = 6
|
||||
Height = 24
|
||||
Height = 19
|
||||
Top = 12
|
||||
Width = 215
|
||||
Align = alTop
|
||||
@ -191,8 +191,8 @@ object LazFindReplaceDialog: TLazFindReplaceDialog
|
||||
AnchorSideRight.Control = Owner
|
||||
AnchorSideRight.Side = asrBottom
|
||||
Left = 243
|
||||
Height = 70
|
||||
Top = 156
|
||||
Height = 58
|
||||
Top = 134
|
||||
Width = 238
|
||||
Anchors = [akTop, akLeft, akRight]
|
||||
AutoSize = True
|
||||
@ -205,12 +205,12 @@ object LazFindReplaceDialog: TLazFindReplaceDialog
|
||||
ChildSizing.ShrinkVertical = crsHomogenousSpaceResize
|
||||
ChildSizing.Layout = cclLeftToRightThenTopToBottom
|
||||
ChildSizing.ControlsPerLine = 1
|
||||
ClientHeight = 48
|
||||
ClientHeight = 38
|
||||
ClientWidth = 234
|
||||
TabOrder = 5
|
||||
object SelectedRadioButton: TRadioButton
|
||||
Left = 6
|
||||
Height = 24
|
||||
Height = 19
|
||||
Top = 0
|
||||
Width = 222
|
||||
Caption = 'SelectedRadioButton'
|
||||
@ -218,8 +218,8 @@ object LazFindReplaceDialog: TLazFindReplaceDialog
|
||||
end
|
||||
object GlobalRadioButton: TRadioButton
|
||||
Left = 6
|
||||
Height = 24
|
||||
Top = 24
|
||||
Height = 19
|
||||
Top = 19
|
||||
Width = 222
|
||||
Caption = 'GlobalRadioButton'
|
||||
Checked = True
|
||||
@ -235,8 +235,8 @@ object LazFindReplaceDialog: TLazFindReplaceDialog
|
||||
AnchorSideRight.Control = Owner
|
||||
AnchorSideRight.Side = asrBottom
|
||||
Left = 243
|
||||
Height = 70
|
||||
Top = 232
|
||||
Height = 58
|
||||
Top = 198
|
||||
Width = 238
|
||||
Anchors = [akTop, akLeft, akRight]
|
||||
AutoSize = True
|
||||
@ -249,12 +249,12 @@ object LazFindReplaceDialog: TLazFindReplaceDialog
|
||||
ChildSizing.ShrinkVertical = crsHomogenousSpaceResize
|
||||
ChildSizing.Layout = cclLeftToRightThenTopToBottom
|
||||
ChildSizing.ControlsPerLine = 1
|
||||
ClientHeight = 48
|
||||
ClientHeight = 38
|
||||
ClientWidth = 234
|
||||
TabOrder = 6
|
||||
object BackwardRadioButton: TRadioButton
|
||||
Left = 6
|
||||
Height = 24
|
||||
Height = 19
|
||||
Top = 0
|
||||
Width = 222
|
||||
Caption = 'BackwardRadioButton'
|
||||
@ -262,8 +262,8 @@ object LazFindReplaceDialog: TLazFindReplaceDialog
|
||||
end
|
||||
object ForwardRadioButton: TRadioButton
|
||||
Left = 6
|
||||
Height = 24
|
||||
Top = 24
|
||||
Height = 19
|
||||
Top = 19
|
||||
Width = 222
|
||||
Caption = 'ForwardRadioButton'
|
||||
Checked = True
|
||||
@ -279,8 +279,8 @@ object LazFindReplaceDialog: TLazFindReplaceDialog
|
||||
AnchorSideRight.Control = Owner
|
||||
AnchorSideRight.Side = asrBottom
|
||||
Left = 243
|
||||
Height = 70
|
||||
Top = 80
|
||||
Height = 58
|
||||
Top = 70
|
||||
Width = 238
|
||||
Anchors = [akTop, akLeft, akRight]
|
||||
AutoSize = True
|
||||
@ -293,12 +293,12 @@ object LazFindReplaceDialog: TLazFindReplaceDialog
|
||||
ChildSizing.ShrinkVertical = crsHomogenousSpaceResize
|
||||
ChildSizing.Layout = cclLeftToRightThenTopToBottom
|
||||
ChildSizing.ControlsPerLine = 1
|
||||
ClientHeight = 48
|
||||
ClientHeight = 38
|
||||
ClientWidth = 234
|
||||
TabOrder = 4
|
||||
object FromCursorRadioButton: TRadioButton
|
||||
Left = 6
|
||||
Height = 24
|
||||
Height = 19
|
||||
Top = 0
|
||||
Width = 222
|
||||
AutoSize = False
|
||||
@ -309,8 +309,8 @@ object LazFindReplaceDialog: TLazFindReplaceDialog
|
||||
end
|
||||
object EntireScopeRadioButton: TRadioButton
|
||||
Left = 6
|
||||
Height = 24
|
||||
Top = 24
|
||||
Height = 19
|
||||
Top = 19
|
||||
Width = 222
|
||||
AutoSize = False
|
||||
Caption = 'EntireScopeRadioButton'
|
||||
@ -319,8 +319,8 @@ object LazFindReplaceDialog: TLazFindReplaceDialog
|
||||
end
|
||||
object BtnPanel: TButtonPanel
|
||||
Left = 6
|
||||
Height = 38
|
||||
Top = 323
|
||||
Height = 34
|
||||
Top = 327
|
||||
Width = 475
|
||||
OKButton.Name = 'OKButton'
|
||||
OKButton.DefaultCaption = True
|
||||
|
@ -12,9 +12,9 @@ object CompilerCompilationOptionsFrame: TCompilerCompilationOptionsFrame
|
||||
AnchorSideLeft.Control = Owner
|
||||
AnchorSideTop.Control = Owner
|
||||
Left = 0
|
||||
Height = 24
|
||||
Height = 19
|
||||
Top = 0
|
||||
Width = 129
|
||||
Width = 118
|
||||
Caption = 'chkCreateMakefile'
|
||||
ParentShowHint = False
|
||||
ShowHint = True
|
||||
@ -27,23 +27,23 @@ object CompilerCompilationOptionsFrame: TCompilerCompilationOptionsFrame
|
||||
AnchorSideRight.Control = Owner
|
||||
AnchorSideRight.Side = asrBottom
|
||||
Left = 0
|
||||
Height = 117
|
||||
Top = 243
|
||||
Height = 108
|
||||
Top = 225
|
||||
Width = 741
|
||||
Anchors = [akTop, akLeft, akRight]
|
||||
AutoSize = True
|
||||
BorderSpacing.Top = 6
|
||||
Caption = 'ExecuteAfterGroupBox'
|
||||
ClientHeight = 102
|
||||
ClientHeight = 88
|
||||
ClientWidth = 737
|
||||
TabOrder = 3
|
||||
object lblRunIfExecAfter: TLabel
|
||||
AnchorSideLeft.Control = ExecuteAfterGroupBox
|
||||
AnchorSideTop.Control = ExecuteAfterGroupBox
|
||||
Left = 6
|
||||
Height = 13
|
||||
Height = 15
|
||||
Top = 6
|
||||
Width = 99
|
||||
Width = 90
|
||||
BorderSpacing.Around = 6
|
||||
Caption = 'lblRunIfExecAfter'
|
||||
ParentColor = False
|
||||
@ -53,9 +53,9 @@ object CompilerCompilationOptionsFrame: TCompilerCompilationOptionsFrame
|
||||
AnchorSideTop.Control = ExecuteAfterCommandComboBox
|
||||
AnchorSideTop.Side = asrCenter
|
||||
Left = 6
|
||||
Height = 13
|
||||
Top = 43
|
||||
Width = 158
|
||||
Height = 15
|
||||
Top = 35
|
||||
Width = 151
|
||||
BorderSpacing.Around = 6
|
||||
Caption = 'ExecuteAfterCommandLabel'
|
||||
ParentColor = False
|
||||
@ -64,10 +64,10 @@ object CompilerCompilationOptionsFrame: TCompilerCompilationOptionsFrame
|
||||
AnchorSideLeft.Control = lblRunIfExecAfter
|
||||
AnchorSideLeft.Side = asrBottom
|
||||
AnchorSideTop.Control = ExecuteAfterGroupBox
|
||||
Left = 135
|
||||
Height = 24
|
||||
Left = 126
|
||||
Height = 19
|
||||
Top = 6
|
||||
Width = 145
|
||||
Width = 133
|
||||
BorderSpacing.Left = 24
|
||||
BorderSpacing.Around = 6
|
||||
Caption = 'chkExecAfterCompile'
|
||||
@ -77,10 +77,10 @@ object CompilerCompilationOptionsFrame: TCompilerCompilationOptionsFrame
|
||||
AnchorSideLeft.Control = chkExecAfterCompile
|
||||
AnchorSideLeft.Side = asrBottom
|
||||
AnchorSideTop.Control = ExecuteAfterGroupBox
|
||||
Left = 310
|
||||
Height = 24
|
||||
Left = 289
|
||||
Height = 19
|
||||
Top = 6
|
||||
Width = 129
|
||||
Width = 115
|
||||
BorderSpacing.Left = 24
|
||||
BorderSpacing.Around = 6
|
||||
Caption = 'chkExecAfterBuild'
|
||||
@ -90,10 +90,10 @@ object CompilerCompilationOptionsFrame: TCompilerCompilationOptionsFrame
|
||||
AnchorSideLeft.Control = chkExecAfterBuild
|
||||
AnchorSideLeft.Side = asrBottom
|
||||
AnchorSideTop.Control = ExecuteAfterGroupBox
|
||||
Left = 469
|
||||
Height = 24
|
||||
Left = 434
|
||||
Height = 19
|
||||
Top = 6
|
||||
Width = 123
|
||||
Width = 109
|
||||
BorderSpacing.Left = 24
|
||||
BorderSpacing.Around = 6
|
||||
Caption = 'chkExecAfterRun'
|
||||
@ -105,15 +105,15 @@ object CompilerCompilationOptionsFrame: TCompilerCompilationOptionsFrame
|
||||
AnchorSideTop.Control = chkExecAfterCompile
|
||||
AnchorSideTop.Side = asrBottom
|
||||
AnchorSideRight.Control = ExecAfterBrowseButton
|
||||
Left = 176
|
||||
Height = 27
|
||||
Top = 36
|
||||
Width = 505
|
||||
Left = 169
|
||||
Height = 23
|
||||
Top = 31
|
||||
Width = 539
|
||||
Anchors = [akTop, akLeft, akRight]
|
||||
BorderSpacing.Left = 12
|
||||
BorderSpacing.Top = 6
|
||||
BorderSpacing.Bottom = 6
|
||||
ItemHeight = 0
|
||||
ItemHeight = 15
|
||||
TabOrder = 3
|
||||
Text = 'ExecuteAfterCommandComboBox'
|
||||
end
|
||||
@ -123,13 +123,13 @@ object CompilerCompilationOptionsFrame: TCompilerCompilationOptionsFrame
|
||||
AnchorSideRight.Side = asrBottom
|
||||
AnchorSideBottom.Control = ExecuteAfterCommandComboBox
|
||||
AnchorSideBottom.Side = asrBottom
|
||||
Left = 681
|
||||
Height = 27
|
||||
Top = 36
|
||||
Width = 50
|
||||
Left = 708
|
||||
Height = 23
|
||||
Top = 31
|
||||
Width = 23
|
||||
Anchors = [akTop, akRight, akBottom]
|
||||
BorderSpacing.Right = 6
|
||||
Caption = '...'
|
||||
Caption = '…'
|
||||
OnClick = CompCmdBrowseButtonClick
|
||||
TabOrder = 4
|
||||
end
|
||||
@ -138,9 +138,9 @@ object CompilerCompilationOptionsFrame: TCompilerCompilationOptionsFrame
|
||||
AnchorSideTop.Control = ExecAfterParsersCheckComboBox
|
||||
AnchorSideTop.Side = asrCenter
|
||||
Left = 6
|
||||
Height = 13
|
||||
Top = 76
|
||||
Width = 125
|
||||
Height = 15
|
||||
Top = 64
|
||||
Width = 114
|
||||
BorderSpacing.Left = 6
|
||||
Caption = 'ExecAfterParsersLabel'
|
||||
ParentColor = False
|
||||
@ -150,10 +150,10 @@ object CompilerCompilationOptionsFrame: TCompilerCompilationOptionsFrame
|
||||
AnchorSideLeft.Side = asrBottom
|
||||
AnchorSideTop.Control = ExecAfterParsersCheckComboBox
|
||||
AnchorSideTop.Side = asrCenter
|
||||
Left = 318
|
||||
Height = 13
|
||||
Top = 76
|
||||
Width = 148
|
||||
Left = 307
|
||||
Height = 15
|
||||
Top = 64
|
||||
Width = 138
|
||||
Caption = 'ExecAfterParsersSumLabel'
|
||||
ParentColor = False
|
||||
end
|
||||
@ -162,12 +162,12 @@ object CompilerCompilationOptionsFrame: TCompilerCompilationOptionsFrame
|
||||
AnchorSideLeft.Side = asrBottom
|
||||
AnchorSideTop.Control = ExecuteAfterCommandComboBox
|
||||
AnchorSideTop.Side = asrBottom
|
||||
Left = 137
|
||||
Height = 27
|
||||
Top = 69
|
||||
Left = 126
|
||||
Height = 22
|
||||
Top = 60
|
||||
Width = 175
|
||||
BorderSpacing.Around = 6
|
||||
ItemHeight = 0
|
||||
ItemHeight = 16
|
||||
OnItemChange = ExecAfterParsersCheckComboBoxItemChange
|
||||
TabOrder = 5
|
||||
end
|
||||
@ -179,23 +179,23 @@ object CompilerCompilationOptionsFrame: TCompilerCompilationOptionsFrame
|
||||
AnchorSideRight.Control = Owner
|
||||
AnchorSideRight.Side = asrBottom
|
||||
Left = 0
|
||||
Height = 84
|
||||
Top = 153
|
||||
Height = 80
|
||||
Top = 139
|
||||
Width = 741
|
||||
Anchors = [akTop, akLeft, akRight]
|
||||
AutoSize = True
|
||||
BorderSpacing.Top = 6
|
||||
Caption = 'grpCompiler'
|
||||
ClientHeight = 69
|
||||
ClientHeight = 60
|
||||
ClientWidth = 737
|
||||
TabOrder = 2
|
||||
object lblRunIfCompiler: TLabel
|
||||
AnchorSideLeft.Control = grpCompiler
|
||||
AnchorSideTop.Control = grpCompiler
|
||||
Left = 6
|
||||
Height = 13
|
||||
Height = 15
|
||||
Top = 6
|
||||
Width = 92
|
||||
Width = 90
|
||||
BorderSpacing.Around = 6
|
||||
Caption = 'lblRunIfCompiler'
|
||||
ParentColor = False
|
||||
@ -205,8 +205,8 @@ object CompilerCompilationOptionsFrame: TCompilerCompilationOptionsFrame
|
||||
AnchorSideTop.Control = cobCompiler
|
||||
AnchorSideTop.Side = asrCenter
|
||||
Left = 6
|
||||
Height = 13
|
||||
Top = 43
|
||||
Height = 15
|
||||
Top = 35
|
||||
Width = 62
|
||||
BorderSpacing.Around = 6
|
||||
Caption = 'lblCompiler'
|
||||
@ -216,10 +216,10 @@ object CompilerCompilationOptionsFrame: TCompilerCompilationOptionsFrame
|
||||
AnchorSideLeft.Control = lblRunIfCompiler
|
||||
AnchorSideLeft.Side = asrBottom
|
||||
AnchorSideTop.Control = grpCompiler
|
||||
Left = 128
|
||||
Height = 24
|
||||
Left = 126
|
||||
Height = 19
|
||||
Top = 6
|
||||
Width = 138
|
||||
Width = 133
|
||||
BorderSpacing.Left = 30
|
||||
BorderSpacing.Top = 6
|
||||
Caption = 'chkCompilerCompile'
|
||||
@ -229,10 +229,10 @@ object CompilerCompilationOptionsFrame: TCompilerCompilationOptionsFrame
|
||||
AnchorSideLeft.Control = chkCompilerCompile
|
||||
AnchorSideLeft.Side = asrBottom
|
||||
AnchorSideTop.Control = grpCompiler
|
||||
Left = 296
|
||||
Height = 24
|
||||
Left = 289
|
||||
Height = 19
|
||||
Top = 6
|
||||
Width = 122
|
||||
Width = 115
|
||||
BorderSpacing.Left = 24
|
||||
BorderSpacing.Around = 6
|
||||
Caption = 'chkCompilerBuild'
|
||||
@ -242,10 +242,10 @@ object CompilerCompilationOptionsFrame: TCompilerCompilationOptionsFrame
|
||||
AnchorSideLeft.Control = chkCompilerBuild
|
||||
AnchorSideLeft.Side = asrBottom
|
||||
AnchorSideTop.Control = grpCompiler
|
||||
Left = 448
|
||||
Height = 24
|
||||
Left = 434
|
||||
Height = 19
|
||||
Top = 6
|
||||
Width = 116
|
||||
Width = 109
|
||||
BorderSpacing.Left = 24
|
||||
BorderSpacing.Around = 6
|
||||
Caption = 'chkCompilerRun'
|
||||
@ -258,14 +258,14 @@ object CompilerCompilationOptionsFrame: TCompilerCompilationOptionsFrame
|
||||
AnchorSideTop.Side = asrBottom
|
||||
AnchorSideRight.Control = BrowseCompilerButton
|
||||
Left = 80
|
||||
Height = 27
|
||||
Top = 36
|
||||
Width = 601
|
||||
Height = 23
|
||||
Top = 31
|
||||
Width = 628
|
||||
Anchors = [akTop, akLeft, akRight]
|
||||
BorderSpacing.Left = 12
|
||||
BorderSpacing.Top = 6
|
||||
BorderSpacing.Bottom = 6
|
||||
ItemHeight = 0
|
||||
ItemHeight = 15
|
||||
TabOrder = 3
|
||||
Text = 'cobCompiler'
|
||||
end
|
||||
@ -275,13 +275,13 @@ object CompilerCompilationOptionsFrame: TCompilerCompilationOptionsFrame
|
||||
AnchorSideRight.Side = asrBottom
|
||||
AnchorSideBottom.Control = cobCompiler
|
||||
AnchorSideBottom.Side = asrBottom
|
||||
Left = 681
|
||||
Height = 27
|
||||
Top = 36
|
||||
Width = 50
|
||||
Left = 708
|
||||
Height = 23
|
||||
Top = 31
|
||||
Width = 23
|
||||
Anchors = [akTop, akRight, akBottom]
|
||||
BorderSpacing.Right = 6
|
||||
Caption = '...'
|
||||
Caption = '…'
|
||||
OnClick = CompCmdBrowseButtonClick
|
||||
ParentShowHint = False
|
||||
ShowHint = True
|
||||
@ -295,23 +295,23 @@ object CompilerCompilationOptionsFrame: TCompilerCompilationOptionsFrame
|
||||
AnchorSideRight.Control = Owner
|
||||
AnchorSideRight.Side = asrBottom
|
||||
Left = 0
|
||||
Height = 117
|
||||
Top = 30
|
||||
Height = 108
|
||||
Top = 25
|
||||
Width = 741
|
||||
Anchors = [akTop, akLeft, akRight]
|
||||
AutoSize = True
|
||||
BorderSpacing.Top = 6
|
||||
Caption = 'ExecuteBeforeGroupBox'
|
||||
ClientHeight = 102
|
||||
ClientHeight = 88
|
||||
ClientWidth = 737
|
||||
TabOrder = 1
|
||||
object lblRunIfExecBefore: TLabel
|
||||
AnchorSideLeft.Control = ExecuteBeforeGroupBox
|
||||
AnchorSideTop.Control = ExecuteBeforeGroupBox
|
||||
Left = 6
|
||||
Height = 13
|
||||
Height = 15
|
||||
Top = 6
|
||||
Width = 108
|
||||
Width = 98
|
||||
BorderSpacing.Around = 6
|
||||
Caption = 'lblRunIfExecBefore'
|
||||
ParentColor = False
|
||||
@ -321,9 +321,9 @@ object CompilerCompilationOptionsFrame: TCompilerCompilationOptionsFrame
|
||||
AnchorSideTop.Control = ExecuteBeforeCommandComboBox
|
||||
AnchorSideTop.Side = asrCenter
|
||||
Left = 6
|
||||
Height = 13
|
||||
Top = 43
|
||||
Width = 167
|
||||
Height = 15
|
||||
Top = 35
|
||||
Width = 159
|
||||
BorderSpacing.Around = 6
|
||||
Caption = 'ExecuteBeforeCommandLabel'
|
||||
ParentColor = False
|
||||
@ -332,10 +332,10 @@ object CompilerCompilationOptionsFrame: TCompilerCompilationOptionsFrame
|
||||
AnchorSideLeft.Control = lblRunIfExecBefore
|
||||
AnchorSideLeft.Side = asrBottom
|
||||
AnchorSideTop.Control = ExecuteBeforeGroupBox
|
||||
Left = 144
|
||||
Height = 24
|
||||
Left = 134
|
||||
Height = 19
|
||||
Top = 6
|
||||
Width = 154
|
||||
Width = 141
|
||||
BorderSpacing.Left = 24
|
||||
BorderSpacing.Around = 6
|
||||
Caption = 'chkExecBeforeCompile'
|
||||
@ -345,10 +345,10 @@ object CompilerCompilationOptionsFrame: TCompilerCompilationOptionsFrame
|
||||
AnchorSideLeft.Control = chkExecBeforeCompile
|
||||
AnchorSideLeft.Side = asrBottom
|
||||
AnchorSideTop.Control = ExecuteBeforeGroupBox
|
||||
Left = 328
|
||||
Height = 24
|
||||
Left = 305
|
||||
Height = 19
|
||||
Top = 6
|
||||
Width = 138
|
||||
Width = 123
|
||||
BorderSpacing.Left = 24
|
||||
BorderSpacing.Around = 6
|
||||
Caption = 'chkExecBeforeBuild'
|
||||
@ -358,10 +358,10 @@ object CompilerCompilationOptionsFrame: TCompilerCompilationOptionsFrame
|
||||
AnchorSideLeft.Control = chkExecBeforeBuild
|
||||
AnchorSideLeft.Side = asrBottom
|
||||
AnchorSideTop.Control = ExecuteBeforeGroupBox
|
||||
Left = 496
|
||||
Height = 24
|
||||
Left = 458
|
||||
Height = 19
|
||||
Top = 6
|
||||
Width = 132
|
||||
Width = 117
|
||||
BorderSpacing.Left = 24
|
||||
BorderSpacing.Around = 6
|
||||
Caption = 'chkExecBeforeRun'
|
||||
@ -373,15 +373,15 @@ object CompilerCompilationOptionsFrame: TCompilerCompilationOptionsFrame
|
||||
AnchorSideTop.Control = chkExecBeforeCompile
|
||||
AnchorSideTop.Side = asrBottom
|
||||
AnchorSideRight.Control = ExecBeforeBrowseButton
|
||||
Left = 185
|
||||
Height = 27
|
||||
Top = 36
|
||||
Width = 496
|
||||
Left = 177
|
||||
Height = 23
|
||||
Top = 31
|
||||
Width = 531
|
||||
Anchors = [akTop, akLeft, akRight]
|
||||
BorderSpacing.Left = 12
|
||||
BorderSpacing.Top = 6
|
||||
BorderSpacing.Bottom = 6
|
||||
ItemHeight = 0
|
||||
ItemHeight = 15
|
||||
TabOrder = 3
|
||||
Text = 'ExecuteBeforeCommandComboBox'
|
||||
end
|
||||
@ -392,13 +392,13 @@ object CompilerCompilationOptionsFrame: TCompilerCompilationOptionsFrame
|
||||
AnchorSideRight.Side = asrBottom
|
||||
AnchorSideBottom.Control = ExecuteBeforeCommandComboBox
|
||||
AnchorSideBottom.Side = asrBottom
|
||||
Left = 681
|
||||
Height = 27
|
||||
Top = 36
|
||||
Width = 50
|
||||
Left = 708
|
||||
Height = 23
|
||||
Top = 31
|
||||
Width = 23
|
||||
Anchors = [akTop, akRight, akBottom]
|
||||
BorderSpacing.Right = 6
|
||||
Caption = '...'
|
||||
Caption = '…'
|
||||
OnClick = CompCmdBrowseButtonClick
|
||||
TabOrder = 4
|
||||
end
|
||||
@ -407,12 +407,12 @@ object CompilerCompilationOptionsFrame: TCompilerCompilationOptionsFrame
|
||||
AnchorSideLeft.Side = asrBottom
|
||||
AnchorSideTop.Control = ExecuteBeforeCommandComboBox
|
||||
AnchorSideTop.Side = asrBottom
|
||||
Left = 146
|
||||
Height = 27
|
||||
Top = 69
|
||||
Left = 134
|
||||
Height = 22
|
||||
Top = 60
|
||||
Width = 182
|
||||
BorderSpacing.Around = 6
|
||||
ItemHeight = 0
|
||||
ItemHeight = 16
|
||||
OnItemChange = ExecBeforeParsersCheckComboBoxItemChange
|
||||
TabOrder = 5
|
||||
end
|
||||
@ -420,9 +420,9 @@ object CompilerCompilationOptionsFrame: TCompilerCompilationOptionsFrame
|
||||
AnchorSideTop.Control = ExecBeforeParsersCheckComboBox
|
||||
AnchorSideTop.Side = asrCenter
|
||||
Left = 6
|
||||
Height = 13
|
||||
Top = 76
|
||||
Width = 134
|
||||
Height = 15
|
||||
Top = 64
|
||||
Width = 122
|
||||
BorderSpacing.Left = 6
|
||||
Caption = 'ExecBeforeParsersLabel'
|
||||
ParentColor = False
|
||||
@ -432,10 +432,10 @@ object CompilerCompilationOptionsFrame: TCompilerCompilationOptionsFrame
|
||||
AnchorSideLeft.Side = asrBottom
|
||||
AnchorSideTop.Control = ExecBeforeParsersCheckComboBox
|
||||
AnchorSideTop.Side = asrCenter
|
||||
Left = 334
|
||||
Height = 13
|
||||
Top = 76
|
||||
Width = 157
|
||||
Left = 322
|
||||
Height = 15
|
||||
Top = 64
|
||||
Width = 146
|
||||
BorderSpacing.Left = 6
|
||||
Caption = 'ExecBeforeParsersSumLabel'
|
||||
ParentColor = False
|
||||
|
@ -15,7 +15,7 @@ object CompilerPathOptionsFrame: TCompilerPathOptionsFrame
|
||||
Left = 0
|
||||
Height = 15
|
||||
Top = 0
|
||||
Width = 100
|
||||
Width = 85
|
||||
Caption = 'OtherUnitsLabel'
|
||||
ParentColor = False
|
||||
end
|
||||
@ -26,8 +26,8 @@ object CompilerPathOptionsFrame: TCompilerPathOptionsFrame
|
||||
AnchorSideRight.Side = asrBottom
|
||||
Left = 0
|
||||
Height = 15
|
||||
Top = 46
|
||||
Width = 105
|
||||
Top = 44
|
||||
Width = 90
|
||||
BorderSpacing.Top = 6
|
||||
Caption = 'IncludeFilesLabel'
|
||||
ParentColor = False
|
||||
@ -39,8 +39,8 @@ object CompilerPathOptionsFrame: TCompilerPathOptionsFrame
|
||||
AnchorSideRight.Side = asrBottom
|
||||
Left = 0
|
||||
Height = 15
|
||||
Top = 251
|
||||
Width = 119
|
||||
Top = 239
|
||||
Width = 99
|
||||
Caption = 'OtherSourcesLabel'
|
||||
ParentColor = False
|
||||
end
|
||||
@ -51,8 +51,8 @@ object CompilerPathOptionsFrame: TCompilerPathOptionsFrame
|
||||
AnchorSideRight.Side = asrBottom
|
||||
Left = 0
|
||||
Height = 15
|
||||
Top = 92
|
||||
Width = 86
|
||||
Top = 88
|
||||
Width = 72
|
||||
BorderSpacing.Top = 6
|
||||
Caption = 'LibrariesLabel'
|
||||
ParentColor = False
|
||||
@ -64,8 +64,8 @@ object CompilerPathOptionsFrame: TCompilerPathOptionsFrame
|
||||
AnchorSideRight.Side = asrBottom
|
||||
Left = 0
|
||||
Height = 15
|
||||
Top = 138
|
||||
Width = 118
|
||||
Top = 132
|
||||
Width = 103
|
||||
BorderSpacing.Top = 6
|
||||
Caption = 'UnitOutputDirLabel'
|
||||
ParentColor = False
|
||||
@ -77,8 +77,8 @@ object CompilerPathOptionsFrame: TCompilerPathOptionsFrame
|
||||
AnchorSideRight.Side = asrBottom
|
||||
Left = 0
|
||||
Height = 15
|
||||
Top = 297
|
||||
Width = 102
|
||||
Top = 283
|
||||
Width = 87
|
||||
BorderSpacing.Top = 6
|
||||
Caption = 'DebugPathLabel'
|
||||
ParentColor = False
|
||||
@ -90,8 +90,8 @@ object CompilerPathOptionsFrame: TCompilerPathOptionsFrame
|
||||
AnchorSideRight.Control = Owner
|
||||
AnchorSideRight.Side = asrBottom
|
||||
Left = 0
|
||||
Height = 28
|
||||
Top = 20
|
||||
Height = 23
|
||||
Top = 15
|
||||
Width = 509
|
||||
Anchors = [akTop, akLeft, akRight]
|
||||
BorderSpacing.Bottom = 6
|
||||
@ -107,8 +107,8 @@ object CompilerPathOptionsFrame: TCompilerPathOptionsFrame
|
||||
AnchorSideRight.Control = Owner
|
||||
AnchorSideRight.Side = asrBottom
|
||||
Left = 0
|
||||
Height = 28
|
||||
Top = 74
|
||||
Height = 23
|
||||
Top = 59
|
||||
Width = 509
|
||||
Anchors = [akTop, akLeft, akRight]
|
||||
BorderSpacing.Bottom = 6
|
||||
@ -124,8 +124,8 @@ object CompilerPathOptionsFrame: TCompilerPathOptionsFrame
|
||||
AnchorSideRight.Control = Owner
|
||||
AnchorSideRight.Side = asrBottom
|
||||
Left = 0
|
||||
Height = 28
|
||||
Top = 314
|
||||
Height = 23
|
||||
Top = 254
|
||||
Width = 509
|
||||
Anchors = [akTop, akLeft, akRight]
|
||||
BorderSpacing.Bottom = 6
|
||||
@ -141,8 +141,8 @@ object CompilerPathOptionsFrame: TCompilerPathOptionsFrame
|
||||
AnchorSideRight.Control = Owner
|
||||
AnchorSideRight.Side = asrBottom
|
||||
Left = 0
|
||||
Height = 28
|
||||
Top = 128
|
||||
Height = 23
|
||||
Top = 103
|
||||
Width = 509
|
||||
Anchors = [akTop, akLeft, akRight]
|
||||
BorderSpacing.Bottom = 6
|
||||
@ -158,8 +158,8 @@ object CompilerPathOptionsFrame: TCompilerPathOptionsFrame
|
||||
AnchorSideRight.Control = Owner
|
||||
AnchorSideRight.Side = asrBottom
|
||||
Left = 0
|
||||
Height = 28
|
||||
Top = 182
|
||||
Height = 23
|
||||
Top = 147
|
||||
Width = 509
|
||||
Anchors = [akTop, akLeft, akRight]
|
||||
BorderSpacing.Bottom = 6
|
||||
@ -175,8 +175,8 @@ object CompilerPathOptionsFrame: TCompilerPathOptionsFrame
|
||||
AnchorSideRight.Control = Owner
|
||||
AnchorSideRight.Side = asrBottom
|
||||
Left = 0
|
||||
Height = 28
|
||||
Top = 368
|
||||
Height = 23
|
||||
Top = 298
|
||||
Width = 509
|
||||
Anchors = [akTop, akLeft, akRight]
|
||||
BorderSpacing.Bottom = 6
|
||||
@ -191,8 +191,8 @@ object CompilerPathOptionsFrame: TCompilerPathOptionsFrame
|
||||
AnchorSideTop.Side = asrBottom
|
||||
Left = 0
|
||||
Height = 15
|
||||
Top = 184
|
||||
Width = 116
|
||||
Top = 176
|
||||
Width = 100
|
||||
Caption = 'ProjTargetFileLabel'
|
||||
ParentColor = False
|
||||
end
|
||||
@ -203,8 +203,8 @@ object CompilerPathOptionsFrame: TCompilerPathOptionsFrame
|
||||
AnchorSideRight.Control = Owner
|
||||
AnchorSideRight.Side = asrBottom
|
||||
Left = 0
|
||||
Height = 28
|
||||
Top = 236
|
||||
Height = 23
|
||||
Top = 191
|
||||
Width = 509
|
||||
Anchors = [akTop, akLeft, akRight]
|
||||
OnChange = ProjTargetFileEditChange
|
||||
@ -219,9 +219,9 @@ object CompilerPathOptionsFrame: TCompilerPathOptionsFrame
|
||||
AnchorSideTop.Side = asrBottom
|
||||
AnchorSideRight.Side = asrBottom
|
||||
Left = 0
|
||||
Height = 24
|
||||
Top = 264
|
||||
Width = 277
|
||||
Height = 19
|
||||
Top = 214
|
||||
Width = 225
|
||||
BorderSpacing.Bottom = 6
|
||||
Caption = 'ProjTargetApplyConventionsCheckBox'
|
||||
ParentShowHint = False
|
||||
|
@ -58,6 +58,8 @@ type
|
||||
procedure DoImport(Sender: TObject);
|
||||
procedure DoExport(Sender: TObject);
|
||||
protected
|
||||
procedure DoAutoAdjustLayout(const AMode: TLayoutAdjustmentPolicy;
|
||||
const AXProportion, {%H-}AYProportion: Double); override;
|
||||
procedure DoSaveSettings(AOptions: TAbstractIDEOptions);
|
||||
procedure UpdateTargetFileLabel;
|
||||
public
|
||||
@ -74,9 +76,6 @@ implementation
|
||||
|
||||
{$R *.lfm}
|
||||
|
||||
const
|
||||
cBrowseBtnSize = 50;
|
||||
|
||||
function CheckSearchPath(const Context, ExpandedPath: string; Level: TCheckCompileOptionsMsgLvl; Hint: string = ''): boolean;
|
||||
var
|
||||
CurPath: string;
|
||||
@ -328,6 +327,18 @@ begin
|
||||
OnSaveIDEOptions(Self, FCompilerOpts);
|
||||
end;
|
||||
|
||||
procedure TCompilerPathOptionsFrame.DoAutoAdjustLayout(
|
||||
const AMode: TLayoutAdjustmentPolicy; const AXProportion, AYProportion: Double);
|
||||
begin
|
||||
if AMode = lapAutoAdjustForDPI then begin
|
||||
OtherUnitsPathEditBtn.Width := round(OtherUnitsPathEditBtn.Height * AXProportion);
|
||||
IncludeFilesPathEditBtn.Width := round(IncludeFilesPathEditBtn.Height * AXProportion);
|
||||
OtherSourcesPathEditBtn.Width := round(OtherSourcesPathEditBtn.Height * AXProportion);
|
||||
LibrariesPathEditBtn.Width := round(LibrariesPathEditBtn.Height * AXProportion);
|
||||
DebugPathEditBtn.Width := round(DebugPathEditBtn.Height * AXProportion);
|
||||
end;
|
||||
end;
|
||||
|
||||
procedure TCompilerPathOptionsFrame.DoSaveSettings(AOptions: TAbstractIDEOptions);
|
||||
begin
|
||||
if Assigned(OnSaveIDEOptions) then
|
||||
@ -506,7 +517,7 @@ begin
|
||||
AnchorParallel(akTop, 0, OtherUnitsEdit);
|
||||
AnchorParallel(akBottom, 0, OtherUnitsEdit);
|
||||
AnchorParallel(akRight, 0, Self);
|
||||
Width := cBrowseBtnSize;
|
||||
Width := Height;
|
||||
AssociatedEdit := OtherUnitsEdit;
|
||||
ContextCaption := OtherUnitsLabel.Caption;
|
||||
Templates:='$(LazarusDir)/lcl/units/$(TargetCPU)-$(TargetOS)' +
|
||||
@ -533,7 +544,7 @@ begin
|
||||
AnchorParallel(akTop, 0, IncludeFilesEdit);
|
||||
AnchorParallel(akBottom, 0, IncludeFilesEdit);
|
||||
AnchorParallel(akRight, 0, Self);
|
||||
Width := cBrowseBtnSize;
|
||||
Width := Height;
|
||||
AssociatedEdit := IncludeFilesEdit;
|
||||
ContextCaption := IncludeFilesLabel.Caption;
|
||||
Templates := 'include;inc';
|
||||
@ -556,7 +567,7 @@ begin
|
||||
AnchorParallel(akTop, 0, OtherSourcesEdit);
|
||||
AnchorParallel(akBottom, 0, OtherSourcesEdit);
|
||||
AnchorParallel(akRight, 0, Self);
|
||||
Width := cBrowseBtnSize;
|
||||
Width := Height;
|
||||
AssociatedEdit := OtherSourcesEdit;
|
||||
ContextCaption := OtherSourcesLabel.Caption;
|
||||
Templates := '$(LazarusDir)/lcl' +
|
||||
@ -582,7 +593,7 @@ begin
|
||||
AnchorParallel(akTop, 0, LibrariesEdit);
|
||||
AnchorParallel(akBottom, 0, LibrariesEdit);
|
||||
AnchorParallel(akRight, 0, Self);
|
||||
Width := cBrowseBtnSize;
|
||||
Width := Height;
|
||||
AssociatedEdit := LibrariesEdit;
|
||||
ContextCaption := LibrariesLabel.Caption;
|
||||
Templates := '/usr/X11R6/lib;/sw/lib';
|
||||
@ -605,7 +616,7 @@ begin
|
||||
AnchorParallel(akTop, 0, UnitOutputDirEdit);
|
||||
AnchorParallel(akBottom, 0, UnitOutputDirEdit);
|
||||
AnchorParallel(akRight, 0, Self);
|
||||
Width := cBrowseBtnSize;
|
||||
Width := Height;
|
||||
OnClick := @FileBrowseBtnClick;
|
||||
end;
|
||||
UnitOutputDirEdit.AnchorToNeighbour(akRight, 0, btnUnitOutputDir);
|
||||
@ -624,7 +635,7 @@ begin
|
||||
AnchorParallel(akTop, 0, DebugPathEdit);
|
||||
AnchorParallel(akBottom, 0, DebugPathEdit);
|
||||
AnchorParallel(akRight, 0, Self);
|
||||
Width := cBrowseBtnSize;
|
||||
Width := Height;
|
||||
AssociatedEdit := DebugPathEdit;
|
||||
ContextCaption := DebugPathLabel.Caption;
|
||||
Templates := '$(LazarusDir)/lcl/include' +
|
||||
|
@ -12,24 +12,24 @@ object EditorDisplayOptionsFrame: TEditorDisplayOptionsFrame
|
||||
object MarginAndGutterGroupBox: TGroupBox
|
||||
AnchorSideRight.Side = asrBottom
|
||||
Left = 0
|
||||
Height = 160
|
||||
Height = 151
|
||||
Top = 0
|
||||
Width = 588
|
||||
Align = alTop
|
||||
AutoSize = True
|
||||
Caption = 'MarginAndGutterGroupBox'
|
||||
ClientHeight = 141
|
||||
ClientWidth = 586
|
||||
ClientHeight = 131
|
||||
ClientWidth = 584
|
||||
TabOrder = 0
|
||||
object RightMarginLabel: TLabel
|
||||
AnchorSideLeft.Control = RightMarginComboBox
|
||||
AnchorSideLeft.Side = asrBottom
|
||||
AnchorSideTop.Control = RightMarginComboBox
|
||||
AnchorSideTop.Side = asrCenter
|
||||
Left = 334
|
||||
Height = 18
|
||||
Top = 12
|
||||
Width = 107
|
||||
Left = 310
|
||||
Height = 15
|
||||
Top = 10
|
||||
Width = 94
|
||||
BorderSpacing.Left = 6
|
||||
Caption = 'RightMarginLabel'
|
||||
ParentColor = False
|
||||
@ -39,10 +39,10 @@ object EditorDisplayOptionsFrame: TEditorDisplayOptionsFrame
|
||||
AnchorSideLeft.Side = asrBottom
|
||||
AnchorSideTop.Control = ShowOnlyLineNumbersMultiplesOfSpinEdit
|
||||
AnchorSideTop.Side = asrCenter
|
||||
Left = 318
|
||||
Height = 18
|
||||
Top = 75
|
||||
Width = 136
|
||||
Left = 294
|
||||
Height = 15
|
||||
Top = 68
|
||||
Width = 121
|
||||
BorderSpacing.Left = 6
|
||||
BorderSpacing.Top = 6
|
||||
Caption = 'Every n-th line number'
|
||||
@ -53,10 +53,10 @@ object EditorDisplayOptionsFrame: TEditorDisplayOptionsFrame
|
||||
AnchorSideLeft.Side = asrBottom
|
||||
AnchorSideTop.Control = GutterSeparatorIndexSpinBox
|
||||
AnchorSideTop.Side = asrCenter
|
||||
Left = 320
|
||||
Height = 18
|
||||
Top = 45
|
||||
Width = 164
|
||||
Left = 296
|
||||
Height = 15
|
||||
Top = 39
|
||||
Width = 139
|
||||
BorderSpacing.Left = 6
|
||||
Caption = 'GutterSeparatorIndexLabel'
|
||||
ParentColor = False
|
||||
@ -67,10 +67,10 @@ object EditorDisplayOptionsFrame: TEditorDisplayOptionsFrame
|
||||
AnchorSideTop.Control = RightMarginLabel
|
||||
AnchorSideTop.Side = asrCenter
|
||||
Cursor = crHandPoint
|
||||
Left = 447
|
||||
Height = 18
|
||||
Top = 12
|
||||
Width = 132
|
||||
Left = 410
|
||||
Height = 15
|
||||
Top = 10
|
||||
Width = 117
|
||||
BorderSpacing.Left = 6
|
||||
Caption = 'RightMarginColorLink'
|
||||
Font.Color = clBlue
|
||||
@ -84,9 +84,9 @@ object EditorDisplayOptionsFrame: TEditorDisplayOptionsFrame
|
||||
AnchorSideLeft.Control = MarginAndGutterGroupBox
|
||||
AnchorSideTop.Control = MarginAndGutterGroupBox
|
||||
Left = 6
|
||||
Height = 21
|
||||
Height = 19
|
||||
Top = 6
|
||||
Width = 196
|
||||
Width = 172
|
||||
BorderSpacing.Around = 6
|
||||
Caption = 'VisibleRightMarginCheckBox'
|
||||
OnChange = GeneralCheckBoxOnChange
|
||||
@ -97,9 +97,9 @@ object EditorDisplayOptionsFrame: TEditorDisplayOptionsFrame
|
||||
AnchorSideTop.Control = VisibleRightMarginCheckBox
|
||||
AnchorSideTop.Side = asrBottom
|
||||
Left = 6
|
||||
Height = 21
|
||||
Top = 33
|
||||
Width = 160
|
||||
Height = 19
|
||||
Top = 31
|
||||
Width = 139
|
||||
BorderSpacing.Around = 6
|
||||
Caption = 'VisibleGutterCheckBox'
|
||||
OnChange = GeneralCheckBoxOnChange
|
||||
@ -110,9 +110,9 @@ object EditorDisplayOptionsFrame: TEditorDisplayOptionsFrame
|
||||
AnchorSideTop.Control = VisibleGutterCheckBox
|
||||
AnchorSideTop.Side = asrBottom
|
||||
Left = 6
|
||||
Height = 21
|
||||
Top = 60
|
||||
Width = 197
|
||||
Height = 19
|
||||
Top = 56
|
||||
Width = 172
|
||||
BorderSpacing.Around = 6
|
||||
Caption = 'ShowLineNumbersCheckBox'
|
||||
OnChange = GeneralCheckBoxOnChange
|
||||
@ -123,13 +123,13 @@ object EditorDisplayOptionsFrame: TEditorDisplayOptionsFrame
|
||||
AnchorSideLeft.Control = VisibleRightMarginCheckBox
|
||||
AnchorSideLeft.Side = asrBottom
|
||||
AnchorSideTop.Control = MarginAndGutterGroupBox
|
||||
Left = 258
|
||||
Height = 30
|
||||
Left = 234
|
||||
Height = 23
|
||||
Top = 6
|
||||
Width = 70
|
||||
BorderSpacing.Left = 50
|
||||
BorderSpacing.Around = 6
|
||||
ItemHeight = 0
|
||||
ItemHeight = 15
|
||||
Items.Strings = (
|
||||
'80'
|
||||
'78'
|
||||
@ -144,9 +144,9 @@ object EditorDisplayOptionsFrame: TEditorDisplayOptionsFrame
|
||||
AnchorSideLeft.Control = GutterSeparatorIndexSpinBox
|
||||
AnchorSideTop.Control = GutterSeparatorIndexSpinBox
|
||||
AnchorSideTop.Side = asrBottom
|
||||
Left = 258
|
||||
Height = 24
|
||||
Top = 72
|
||||
Left = 234
|
||||
Height = 23
|
||||
Top = 64
|
||||
Width = 54
|
||||
BorderSpacing.Top = 6
|
||||
MinValue = 1
|
||||
@ -158,9 +158,9 @@ object EditorDisplayOptionsFrame: TEditorDisplayOptionsFrame
|
||||
AnchorSideLeft.Control = RightMarginComboBox
|
||||
AnchorSideTop.Control = RightMarginComboBox
|
||||
AnchorSideTop.Side = asrBottom
|
||||
Left = 258
|
||||
Height = 24
|
||||
Top = 42
|
||||
Left = 234
|
||||
Height = 23
|
||||
Top = 35
|
||||
Width = 56
|
||||
MaxValue = 4
|
||||
MinValue = -1
|
||||
@ -172,9 +172,9 @@ object EditorDisplayOptionsFrame: TEditorDisplayOptionsFrame
|
||||
AnchorSideTop.Control = ShowLineNumbersCheckBox
|
||||
AnchorSideTop.Side = asrBottom
|
||||
Left = 6
|
||||
Height = 21
|
||||
Top = 87
|
||||
Width = 134
|
||||
Height = 19
|
||||
Top = 81
|
||||
Width = 117
|
||||
BorderSpacing.Around = 6
|
||||
Caption = 'chkShowOverview'
|
||||
OnChange = GeneralCheckBoxOnChange
|
||||
@ -185,9 +185,9 @@ object EditorDisplayOptionsFrame: TEditorDisplayOptionsFrame
|
||||
AnchorSideTop.Control = chkShowOverview
|
||||
AnchorSideTop.Side = asrBottom
|
||||
Left = 6
|
||||
Height = 21
|
||||
Top = 114
|
||||
Width = 120
|
||||
Height = 19
|
||||
Top = 106
|
||||
Width = 106
|
||||
BorderSpacing.Around = 6
|
||||
Caption = 'chkTopInfoView'
|
||||
TabOrder = 7
|
||||
@ -196,15 +196,15 @@ object EditorDisplayOptionsFrame: TEditorDisplayOptionsFrame
|
||||
object EditorFontGroupBox: TGroupBox
|
||||
AnchorSideRight.Side = asrBottom
|
||||
Left = 0
|
||||
Height = 133
|
||||
Top = 166
|
||||
Height = 113
|
||||
Top = 157
|
||||
Width = 588
|
||||
Align = alTop
|
||||
AutoSize = True
|
||||
BorderSpacing.Top = 6
|
||||
Caption = 'EditorFontGroupBox'
|
||||
ClientHeight = 114
|
||||
ClientWidth = 586
|
||||
ClientHeight = 93
|
||||
ClientWidth = 584
|
||||
TabOrder = 1
|
||||
object EditorFontSizeLabel: TLabel
|
||||
AnchorSideLeft.Control = EditorFontSizeSpinEdit
|
||||
@ -212,9 +212,9 @@ object EditorDisplayOptionsFrame: TEditorDisplayOptionsFrame
|
||||
AnchorSideTop.Control = EditorFontSizeSpinEdit
|
||||
AnchorSideTop.Side = asrCenter
|
||||
Left = 62
|
||||
Height = 18
|
||||
Top = 45
|
||||
Width = 119
|
||||
Height = 15
|
||||
Top = 39
|
||||
Width = 103
|
||||
BorderSpacing.Around = 6
|
||||
Caption = 'EditorFontSizeLabel'
|
||||
ParentColor = False
|
||||
@ -224,10 +224,10 @@ object EditorDisplayOptionsFrame: TEditorDisplayOptionsFrame
|
||||
AnchorSideLeft.Side = asrBottom
|
||||
AnchorSideTop.Control = ExtraLineSpacingComboBox
|
||||
AnchorSideTop.Side = asrCenter
|
||||
Left = 313
|
||||
Height = 18
|
||||
Top = 48
|
||||
Width = 135
|
||||
Left = 297
|
||||
Height = 15
|
||||
Top = 39
|
||||
Width = 117
|
||||
BorderSpacing.Around = 6
|
||||
Caption = 'ExtraLineSpacingLabel'
|
||||
ParentColor = False
|
||||
@ -237,10 +237,10 @@ object EditorDisplayOptionsFrame: TEditorDisplayOptionsFrame
|
||||
AnchorSideLeft.Side = asrBottom
|
||||
AnchorSideTop.Control = ExtraCharSpacingComboBox
|
||||
AnchorSideTop.Side = asrCenter
|
||||
Left = 313
|
||||
Height = 18
|
||||
Top = 84
|
||||
Width = 138
|
||||
Left = 297
|
||||
Height = 15
|
||||
Top = 68
|
||||
Width = 120
|
||||
BorderSpacing.Around = 6
|
||||
Caption = 'ExtraCharSpacingLabel'
|
||||
ParentColor = False
|
||||
@ -250,13 +250,13 @@ object EditorDisplayOptionsFrame: TEditorDisplayOptionsFrame
|
||||
AnchorSideTop.Control = EditorFontGroupBox
|
||||
AnchorSideRight.Control = EditorFontButton
|
||||
Left = 6
|
||||
Height = 30
|
||||
Height = 23
|
||||
Top = 6
|
||||
Width = 524
|
||||
Width = 549
|
||||
Anchors = [akTop, akLeft, akRight]
|
||||
BorderSpacing.Left = 6
|
||||
BorderSpacing.Top = 6
|
||||
ItemHeight = 0
|
||||
ItemHeight = 15
|
||||
OnEditingDone = EditorFontComboBoxEditingDone
|
||||
TabOrder = 0
|
||||
Text = 'EditorFontComboBox'
|
||||
@ -267,10 +267,10 @@ object EditorDisplayOptionsFrame: TEditorDisplayOptionsFrame
|
||||
AnchorSideRight.Side = asrBottom
|
||||
AnchorSideBottom.Control = EditorFontComboBox
|
||||
AnchorSideBottom.Side = asrBottom
|
||||
Left = 530
|
||||
Height = 30
|
||||
Left = 555
|
||||
Height = 23
|
||||
Top = 6
|
||||
Width = 50
|
||||
Width = 23
|
||||
Anchors = [akTop, akRight, akBottom]
|
||||
BorderSpacing.Right = 6
|
||||
Caption = '...'
|
||||
@ -282,8 +282,8 @@ object EditorDisplayOptionsFrame: TEditorDisplayOptionsFrame
|
||||
AnchorSideTop.Control = EditorFontComboBox
|
||||
AnchorSideTop.Side = asrBottom
|
||||
Left = 6
|
||||
Height = 24
|
||||
Top = 42
|
||||
Height = 23
|
||||
Top = 35
|
||||
Width = 50
|
||||
BorderSpacing.Around = 6
|
||||
MinValue = -100
|
||||
@ -295,13 +295,13 @@ object EditorDisplayOptionsFrame: TEditorDisplayOptionsFrame
|
||||
AnchorSideLeft.Side = asrBottom
|
||||
AnchorSideTop.Control = EditorFontComboBox
|
||||
AnchorSideTop.Side = asrBottom
|
||||
Left = 207
|
||||
Height = 30
|
||||
Top = 42
|
||||
Left = 191
|
||||
Height = 23
|
||||
Top = 35
|
||||
Width = 100
|
||||
BorderSpacing.Left = 20
|
||||
BorderSpacing.Around = 6
|
||||
ItemHeight = 0
|
||||
ItemHeight = 15
|
||||
Items.Strings = (
|
||||
'0'
|
||||
'1'
|
||||
@ -316,12 +316,12 @@ object EditorDisplayOptionsFrame: TEditorDisplayOptionsFrame
|
||||
AnchorSideLeft.Control = ExtraLineSpacingComboBox
|
||||
AnchorSideTop.Control = ExtraLineSpacingComboBox
|
||||
AnchorSideTop.Side = asrBottom
|
||||
Left = 207
|
||||
Height = 30
|
||||
Top = 78
|
||||
Left = 191
|
||||
Height = 23
|
||||
Top = 64
|
||||
Width = 100
|
||||
BorderSpacing.Bottom = 6
|
||||
ItemHeight = 0
|
||||
ItemHeight = 15
|
||||
Items.Strings = (
|
||||
'0'
|
||||
'1'
|
||||
@ -337,9 +337,9 @@ object EditorDisplayOptionsFrame: TEditorDisplayOptionsFrame
|
||||
AnchorSideTop.Control = EditorFontSizeSpinEdit
|
||||
AnchorSideTop.Side = asrBottom
|
||||
Left = 6
|
||||
Height = 36
|
||||
Top = 72
|
||||
Width = 195
|
||||
Height = 19
|
||||
Top = 64
|
||||
Width = 172
|
||||
BorderSpacing.Around = 6
|
||||
Caption = 'DisableAntialiasingCheckBox'
|
||||
OnChange = GeneralCheckBoxOnChange
|
||||
@ -350,8 +350,8 @@ object EditorDisplayOptionsFrame: TEditorDisplayOptionsFrame
|
||||
AnchorSideRight.Side = asrBottom
|
||||
AnchorSideBottom.Side = asrBottom
|
||||
Left = 0
|
||||
Height = 150
|
||||
Top = 305
|
||||
Height = 179
|
||||
Top = 276
|
||||
Width = 588
|
||||
Align = alClient
|
||||
BorderSpacing.Top = 6
|
||||
@ -363,7 +363,7 @@ object EditorDisplayOptionsFrame: TEditorDisplayOptionsFrame
|
||||
ParentFont = False
|
||||
TabOrder = 2
|
||||
BookMarkOptions.Xoffset = 30
|
||||
Gutter.Width = 61
|
||||
Gutter.Width = 59
|
||||
Gutter.MouseActions = <
|
||||
item
|
||||
ClickCount = ccAny
|
||||
@ -795,7 +795,7 @@ object EditorDisplayOptionsFrame: TEditorDisplayOptionsFrame
|
||||
MouseActions = <>
|
||||
end
|
||||
object TSynGutterLineNumber
|
||||
Width = 21
|
||||
Width = 19
|
||||
MouseActions = <>
|
||||
MarkupInfo.Background = clBtnFace
|
||||
MarkupInfo.Foreground = clNone
|
||||
|
@ -15,9 +15,9 @@ object FilesOptionsFrame: TFilesOptionsFrame
|
||||
AnchorSideLeft.Control = Owner
|
||||
AnchorSideTop.Control = Owner
|
||||
Left = 2
|
||||
Height = 17
|
||||
Height = 15
|
||||
Top = 2
|
||||
Width = 179
|
||||
Width = 138
|
||||
Caption = 'MaxRecentOpenFilesLabel'
|
||||
ParentColor = False
|
||||
end
|
||||
@ -25,9 +25,9 @@ object FilesOptionsFrame: TFilesOptionsFrame
|
||||
AnchorSideLeft.Control = lblCenter
|
||||
AnchorSideTop.Control = Owner
|
||||
Left = 314
|
||||
Height = 17
|
||||
Height = 15
|
||||
Top = 2
|
||||
Width = 192
|
||||
Width = 146
|
||||
BorderSpacing.Left = 3
|
||||
Caption = 'MaxRecentProjectFilesLabel'
|
||||
ParentColor = False
|
||||
@ -38,9 +38,9 @@ object FilesOptionsFrame: TFilesOptionsFrame
|
||||
AnchorSideTop.Side = asrBottom
|
||||
AnchorSideRight.Side = asrBottom
|
||||
Left = 2
|
||||
Height = 24
|
||||
Top = 54
|
||||
Width = 256
|
||||
Height = 19
|
||||
Top = 48
|
||||
Width = 195
|
||||
BorderSpacing.Top = 6
|
||||
Caption = 'OpenLastProjectAtStartCheckBox'
|
||||
TabOrder = 2
|
||||
@ -51,9 +51,9 @@ object FilesOptionsFrame: TFilesOptionsFrame
|
||||
AnchorSideTop.Side = asrBottom
|
||||
AnchorSideRight.Side = asrBottom
|
||||
Left = 2
|
||||
Height = 24
|
||||
Top = 113
|
||||
Width = 227
|
||||
Height = 19
|
||||
Top = 94
|
||||
Width = 180
|
||||
BorderSpacing.Top = 2
|
||||
Caption = 'ShowCompileDialogCheckBox'
|
||||
OnChange = ShowCompileDialogCheckBoxChange
|
||||
@ -64,9 +64,9 @@ object FilesOptionsFrame: TFilesOptionsFrame
|
||||
AnchorSideTop.Control = AutoCloseCompileDialogCheckBox
|
||||
AnchorSideTop.Side = asrBottom
|
||||
Left = 2
|
||||
Height = 17
|
||||
Top = 171
|
||||
Width = 109
|
||||
Height = 15
|
||||
Top = 142
|
||||
Width = 82
|
||||
BorderSpacing.Top = 10
|
||||
Caption = 'LazarusDirLabel'
|
||||
ParentColor = False
|
||||
@ -78,10 +78,10 @@ object FilesOptionsFrame: TFilesOptionsFrame
|
||||
AnchorSideRight.Side = asrBottom
|
||||
AnchorSideBottom.Control = LazarusDirComboBox
|
||||
AnchorSideBottom.Side = asrBottom
|
||||
Left = 570
|
||||
Height = 29
|
||||
Top = 188
|
||||
Width = 50
|
||||
Left = 597
|
||||
Height = 23
|
||||
Top = 157
|
||||
Width = 23
|
||||
Anchors = [akTop, akRight, akBottom]
|
||||
Caption = '...'
|
||||
OnClick = DirectoriesButtonClick
|
||||
@ -93,11 +93,11 @@ object FilesOptionsFrame: TFilesOptionsFrame
|
||||
AnchorSideTop.Side = asrBottom
|
||||
AnchorSideRight.Control = LazarusDirButton
|
||||
Left = 2
|
||||
Height = 29
|
||||
Top = 188
|
||||
Width = 568
|
||||
Height = 23
|
||||
Top = 157
|
||||
Width = 595
|
||||
Anchors = [akTop, akLeft, akRight]
|
||||
ItemHeight = 0
|
||||
ItemHeight = 15
|
||||
TabOrder = 6
|
||||
Text = 'LazarusDirComboBox'
|
||||
end
|
||||
@ -107,11 +107,11 @@ object FilesOptionsFrame: TFilesOptionsFrame
|
||||
AnchorSideTop.Side = asrBottom
|
||||
AnchorSideRight.Control = CompilerPathButton
|
||||
Left = 2
|
||||
Height = 29
|
||||
Top = 240
|
||||
Width = 568
|
||||
Height = 23
|
||||
Top = 201
|
||||
Width = 595
|
||||
Anchors = [akTop, akLeft, akRight]
|
||||
ItemHeight = 0
|
||||
ItemHeight = 15
|
||||
TabOrder = 8
|
||||
Text = 'CompilerPathComboBox'
|
||||
end
|
||||
@ -121,10 +121,10 @@ object FilesOptionsFrame: TFilesOptionsFrame
|
||||
AnchorSideRight.Side = asrBottom
|
||||
AnchorSideBottom.Control = CompilerPathComboBox
|
||||
AnchorSideBottom.Side = asrBottom
|
||||
Left = 570
|
||||
Height = 29
|
||||
Top = 240
|
||||
Width = 50
|
||||
Left = 597
|
||||
Height = 23
|
||||
Top = 201
|
||||
Width = 23
|
||||
Anchors = [akTop, akRight, akBottom]
|
||||
Caption = '...'
|
||||
OnClick = FilesButtonClick
|
||||
@ -135,9 +135,9 @@ object FilesOptionsFrame: TFilesOptionsFrame
|
||||
AnchorSideTop.Control = LazarusDirComboBox
|
||||
AnchorSideTop.Side = asrBottom
|
||||
Left = 2
|
||||
Height = 17
|
||||
Top = 223
|
||||
Width = 130
|
||||
Height = 15
|
||||
Top = 186
|
||||
Width = 101
|
||||
BorderSpacing.Top = 6
|
||||
Caption = 'CompilerPathLabel'
|
||||
ParentColor = False
|
||||
@ -148,11 +148,11 @@ object FilesOptionsFrame: TFilesOptionsFrame
|
||||
AnchorSideTop.Side = asrBottom
|
||||
AnchorSideRight.Control = FPCSourceDirButton
|
||||
Left = 2
|
||||
Height = 29
|
||||
Top = 292
|
||||
Width = 568
|
||||
Height = 23
|
||||
Top = 245
|
||||
Width = 595
|
||||
Anchors = [akTop, akLeft, akRight]
|
||||
ItemHeight = 0
|
||||
ItemHeight = 15
|
||||
TabOrder = 10
|
||||
Text = 'FPCSourceDirComboBox'
|
||||
end
|
||||
@ -162,10 +162,10 @@ object FilesOptionsFrame: TFilesOptionsFrame
|
||||
AnchorSideRight.Side = asrBottom
|
||||
AnchorSideBottom.Control = FPCSourceDirComboBox
|
||||
AnchorSideBottom.Side = asrBottom
|
||||
Left = 570
|
||||
Height = 29
|
||||
Top = 292
|
||||
Width = 50
|
||||
Left = 597
|
||||
Height = 23
|
||||
Top = 245
|
||||
Width = 23
|
||||
Anchors = [akTop, akRight, akBottom]
|
||||
Caption = '...'
|
||||
OnClick = DirectoriesButtonClick
|
||||
@ -176,9 +176,9 @@ object FilesOptionsFrame: TFilesOptionsFrame
|
||||
AnchorSideTop.Control = CompilerPathComboBox
|
||||
AnchorSideTop.Side = asrBottom
|
||||
Left = 2
|
||||
Height = 17
|
||||
Top = 275
|
||||
Width = 129
|
||||
Height = 15
|
||||
Top = 230
|
||||
Width = 100
|
||||
BorderSpacing.Top = 6
|
||||
Caption = 'FPCSourceDirLabel'
|
||||
ParentColor = False
|
||||
@ -188,9 +188,9 @@ object FilesOptionsFrame: TFilesOptionsFrame
|
||||
AnchorSideTop.Control = FPCSourceDirComboBox
|
||||
AnchorSideTop.Side = asrBottom
|
||||
Left = 2
|
||||
Height = 17
|
||||
Top = 327
|
||||
Width = 105
|
||||
Height = 15
|
||||
Top = 274
|
||||
Width = 81
|
||||
BorderSpacing.Top = 6
|
||||
Caption = 'MakePathLabel'
|
||||
ParentColor = False
|
||||
@ -200,9 +200,9 @@ object FilesOptionsFrame: TFilesOptionsFrame
|
||||
AnchorSideTop.Control = MakePathComboBox
|
||||
AnchorSideTop.Side = asrBottom
|
||||
Left = 2
|
||||
Height = 17
|
||||
Top = 379
|
||||
Width = 119
|
||||
Height = 15
|
||||
Top = 318
|
||||
Width = 91
|
||||
BorderSpacing.Top = 6
|
||||
Caption = 'TestBuildDirLabel'
|
||||
ParentColor = False
|
||||
@ -213,11 +213,11 @@ object FilesOptionsFrame: TFilesOptionsFrame
|
||||
AnchorSideTop.Side = asrBottom
|
||||
AnchorSideRight.Control = MakePathButton
|
||||
Left = 2
|
||||
Height = 29
|
||||
Top = 344
|
||||
Width = 568
|
||||
Height = 23
|
||||
Top = 289
|
||||
Width = 595
|
||||
Anchors = [akTop, akLeft, akRight]
|
||||
ItemHeight = 0
|
||||
ItemHeight = 15
|
||||
TabOrder = 12
|
||||
Text = 'MakePathComboBox'
|
||||
end
|
||||
@ -227,10 +227,10 @@ object FilesOptionsFrame: TFilesOptionsFrame
|
||||
AnchorSideRight.Side = asrBottom
|
||||
AnchorSideBottom.Control = MakePathComboBox
|
||||
AnchorSideBottom.Side = asrBottom
|
||||
Left = 570
|
||||
Height = 29
|
||||
Top = 344
|
||||
Width = 50
|
||||
Left = 597
|
||||
Height = 23
|
||||
Top = 289
|
||||
Width = 23
|
||||
Anchors = [akTop, akRight, akBottom]
|
||||
Caption = '...'
|
||||
OnClick = FilesButtonClick
|
||||
@ -242,11 +242,11 @@ object FilesOptionsFrame: TFilesOptionsFrame
|
||||
AnchorSideTop.Side = asrBottom
|
||||
AnchorSideRight.Control = TestBuildDirButton
|
||||
Left = 2
|
||||
Height = 29
|
||||
Top = 396
|
||||
Width = 568
|
||||
Height = 23
|
||||
Top = 333
|
||||
Width = 595
|
||||
Anchors = [akTop, akLeft, akRight]
|
||||
ItemHeight = 0
|
||||
ItemHeight = 15
|
||||
TabOrder = 14
|
||||
Text = 'TestBuildDirComboBox'
|
||||
end
|
||||
@ -256,10 +256,10 @@ object FilesOptionsFrame: TFilesOptionsFrame
|
||||
AnchorSideRight.Side = asrBottom
|
||||
AnchorSideBottom.Control = TestBuildDirComboBox
|
||||
AnchorSideBottom.Side = asrBottom
|
||||
Left = 570
|
||||
Height = 29
|
||||
Top = 396
|
||||
Width = 50
|
||||
Left = 597
|
||||
Height = 23
|
||||
Top = 333
|
||||
Width = 23
|
||||
Anchors = [akTop, akRight, akBottom]
|
||||
Caption = '...'
|
||||
OnClick = DirectoriesButtonClick
|
||||
@ -271,9 +271,9 @@ object FilesOptionsFrame: TFilesOptionsFrame
|
||||
AnchorSideTop.Side = asrBottom
|
||||
AnchorSideRight.Side = asrBottom
|
||||
Left = 32
|
||||
Height = 24
|
||||
Top = 137
|
||||
Width = 261
|
||||
Height = 19
|
||||
Top = 113
|
||||
Width = 206
|
||||
BorderSpacing.Left = 30
|
||||
Caption = 'AutoCloseCompileDialogCheckBox'
|
||||
TabOrder = 5
|
||||
@ -283,9 +283,9 @@ object FilesOptionsFrame: TFilesOptionsFrame
|
||||
AnchorSideTop.Control = TestBuildDirComboBox
|
||||
AnchorSideTop.Side = asrBottom
|
||||
Left = 2
|
||||
Height = 17
|
||||
Top = 431
|
||||
Width = 198
|
||||
Height = 15
|
||||
Top = 362
|
||||
Width = 153
|
||||
Alignment = taRightJustify
|
||||
BorderSpacing.Top = 6
|
||||
Caption = 'CompilerTranslationFileLabel'
|
||||
@ -299,10 +299,10 @@ object FilesOptionsFrame: TFilesOptionsFrame
|
||||
AnchorSideRight.Side = asrBottom
|
||||
AnchorSideBottom.Control = CompilerTranslationFileComboBox
|
||||
AnchorSideBottom.Side = asrBottom
|
||||
Left = 570
|
||||
Height = 29
|
||||
Top = 448
|
||||
Width = 50
|
||||
Left = 597
|
||||
Height = 23
|
||||
Top = 377
|
||||
Width = 23
|
||||
Anchors = [akTop, akRight, akBottom]
|
||||
Caption = '...'
|
||||
OnClick = CompilerTranslationFileButtonClick
|
||||
@ -316,11 +316,11 @@ object FilesOptionsFrame: TFilesOptionsFrame
|
||||
AnchorSideTop.Side = asrBottom
|
||||
AnchorSideRight.Control = CompilerTranslationFileButton
|
||||
Left = 2
|
||||
Height = 29
|
||||
Top = 448
|
||||
Width = 568
|
||||
Height = 23
|
||||
Top = 377
|
||||
Width = 595
|
||||
Anchors = [akTop, akLeft, akRight]
|
||||
ItemHeight = 0
|
||||
ItemHeight = 15
|
||||
ParentShowHint = False
|
||||
ShowHint = True
|
||||
TabOrder = 16
|
||||
@ -342,8 +342,8 @@ object FilesOptionsFrame: TFilesOptionsFrame
|
||||
AnchorSideRight.Control = lblCenter
|
||||
AnchorSideRight.Side = asrBottom
|
||||
Left = 2
|
||||
Height = 27
|
||||
Top = 21
|
||||
Height = 23
|
||||
Top = 19
|
||||
Width = 305
|
||||
Anchors = [akTop, akLeft, akRight]
|
||||
BorderSpacing.Right = 3
|
||||
@ -357,8 +357,8 @@ object FilesOptionsFrame: TFilesOptionsFrame
|
||||
AnchorSideRight.Control = Owner
|
||||
AnchorSideRight.Side = asrBottom
|
||||
Left = 316
|
||||
Height = 27
|
||||
Top = 21
|
||||
Height = 23
|
||||
Top = 19
|
||||
Width = 304
|
||||
Anchors = [akTop, akLeft, akRight]
|
||||
BorderSpacing.Left = 3
|
||||
@ -370,9 +370,9 @@ object FilesOptionsFrame: TFilesOptionsFrame
|
||||
AnchorSideTop.Control = MultipleInstancesComboBox
|
||||
AnchorSideTop.Side = asrCenter
|
||||
Left = 2
|
||||
Height = 17
|
||||
Top = 87
|
||||
Width = 156
|
||||
Height = 15
|
||||
Top = 73
|
||||
Width = 121
|
||||
Caption = 'MultipleInstancesLabel'
|
||||
ParentColor = False
|
||||
end
|
||||
@ -383,14 +383,14 @@ object FilesOptionsFrame: TFilesOptionsFrame
|
||||
AnchorSideTop.Side = asrBottom
|
||||
AnchorSideRight.Control = Owner
|
||||
AnchorSideRight.Side = asrBottom
|
||||
Left = 166
|
||||
Height = 31
|
||||
Top = 80
|
||||
Width = 454
|
||||
Left = 131
|
||||
Height = 23
|
||||
Top = 69
|
||||
Width = 489
|
||||
Anchors = [akTop, akLeft, akRight]
|
||||
BorderSpacing.Left = 8
|
||||
BorderSpacing.Top = 2
|
||||
ItemHeight = 0
|
||||
ItemHeight = 15
|
||||
Style = csDropDownList
|
||||
TabOrder = 3
|
||||
end
|
||||
|
@ -71,7 +71,6 @@ object IDEOptionsDialog: TIDEOptionsDialog
|
||||
Width = 249
|
||||
Anchors = [akTop, akLeft, akRight, akBottom]
|
||||
BorderSpacing.Top = 6
|
||||
DefaultItemHeight = 18
|
||||
ReadOnly = True
|
||||
TabOrder = 0
|
||||
OnChange = CategoryTreeChange
|
||||
@ -149,7 +148,7 @@ object IDEOptionsDialog: TIDEOptionsDialog
|
||||
Left = 281
|
||||
Height = 23
|
||||
Top = 5
|
||||
Width = 50
|
||||
Width = 23
|
||||
Anchors = [akTop, akLeft, akBottom]
|
||||
BorderSpacing.Left = 1
|
||||
Caption = '...'
|
||||
|
@ -38,14 +38,14 @@ object PackageIntegrationOptionsFrame: TPackageIntegrationOptionsFrame
|
||||
end
|
||||
object DocGroupBox: TGroupBox
|
||||
Left = 0
|
||||
Height = 84
|
||||
Height = 96
|
||||
Top = 209
|
||||
Width = 461
|
||||
Align = alTop
|
||||
AutoSize = True
|
||||
BorderSpacing.Top = 6
|
||||
Caption = 'FPDoc settings'
|
||||
ClientHeight = 64
|
||||
ClientHeight = 76
|
||||
ClientWidth = 457
|
||||
TabOrder = 1
|
||||
object FPDocSearchPathsEdit: TEdit
|
||||
@ -57,9 +57,11 @@ object PackageIntegrationOptionsFrame: TPackageIntegrationOptionsFrame
|
||||
Left = 138
|
||||
Height = 23
|
||||
Top = 6
|
||||
Width = 313
|
||||
Width = 319
|
||||
Anchors = [akTop, akLeft, akRight]
|
||||
BorderSpacing.Around = 6
|
||||
BorderSpacing.Left = 6
|
||||
BorderSpacing.Top = 6
|
||||
BorderSpacing.Bottom = 6
|
||||
ParentShowHint = False
|
||||
ShowHint = True
|
||||
TabOrder = 0
|
||||
|
@ -35,6 +35,9 @@ type
|
||||
procedure SetSelectedPkgType(PkgType: TLazPackageType);
|
||||
function ShowMsgPackageTypeMustBeDesign: boolean;
|
||||
function GetFPDocPkgNameEditValue: string;
|
||||
protected
|
||||
procedure DoAutoAdjustLayout(const AMode: TLayoutAdjustmentPolicy;
|
||||
const AXProportion, AYProportion: Double); override;
|
||||
public
|
||||
function Check: Boolean; override;
|
||||
function GetTitle: string; override;
|
||||
@ -134,6 +137,14 @@ begin
|
||||
Result := lisPckOptsIDEIntegration;
|
||||
end;
|
||||
|
||||
procedure TPackageIntegrationOptionsFrame.DoAutoAdjustLayout(
|
||||
const AMode: TLayoutAdjustmentPolicy; const AXProportion, AYProportion: Double);
|
||||
begin
|
||||
if AMode = lapAutoAdjustForDPI then begin
|
||||
FPDocPathButton.Width := round(FPDocPathButton.Height * AXProportion);
|
||||
end;
|
||||
end;
|
||||
|
||||
procedure TPackageIntegrationOptionsFrame.Setup(ADialog: TAbstractOptionsEditorDialog);
|
||||
begin
|
||||
PkgTypeGroupBox.Caption := lisPckOptsPackageType;
|
||||
@ -165,7 +176,7 @@ begin
|
||||
Name := 'FPDocPathButton';
|
||||
Caption := '...';
|
||||
AutoSize := False;
|
||||
Width := 50;
|
||||
Width := Height;
|
||||
Anchors := [akRight];
|
||||
AnchorParallel(akRight, 6, DocGroupBox);
|
||||
AnchorParallel(akTop, 0, FPDocSearchPathsEdit);
|
||||
|
@ -14,13 +14,13 @@ object PackageUsageOptionsFrame: TPackageUsageOptionsFrame
|
||||
AnchorSideRight.Control = Owner
|
||||
AnchorSideRight.Side = asrBottom
|
||||
Left = 0
|
||||
Height = 133
|
||||
Height = 142
|
||||
Top = 0
|
||||
Width = 535
|
||||
Anchors = [akTop, akLeft, akRight]
|
||||
AutoSize = True
|
||||
Caption = 'Add paths to dependent packages/projects'
|
||||
ClientHeight = 114
|
||||
ClientHeight = 122
|
||||
ClientWidth = 531
|
||||
TabOrder = 0
|
||||
object UnitPathLabel: TLabel
|
||||
@ -29,8 +29,8 @@ object PackageUsageOptionsFrame: TPackageUsageOptionsFrame
|
||||
AnchorSideTop.Side = asrCenter
|
||||
Left = 6
|
||||
Height = 15
|
||||
Top = 9
|
||||
Width = 26
|
||||
Top = 10
|
||||
Width = 22
|
||||
BorderSpacing.Left = 6
|
||||
Caption = 'Unit'
|
||||
ParentColor = False
|
||||
@ -41,8 +41,8 @@ object PackageUsageOptionsFrame: TPackageUsageOptionsFrame
|
||||
AnchorSideTop.Side = asrCenter
|
||||
Left = 6
|
||||
Height = 15
|
||||
Top = 36
|
||||
Width = 45
|
||||
Top = 39
|
||||
Width = 39
|
||||
BorderSpacing.Left = 6
|
||||
Caption = 'Include'
|
||||
ParentColor = False
|
||||
@ -53,8 +53,8 @@ object PackageUsageOptionsFrame: TPackageUsageOptionsFrame
|
||||
AnchorSideTop.Side = asrCenter
|
||||
Left = 6
|
||||
Height = 15
|
||||
Top = 63
|
||||
Width = 41
|
||||
Top = 68
|
||||
Width = 35
|
||||
BorderSpacing.Left = 6
|
||||
Caption = 'Object'
|
||||
ParentColor = False
|
||||
@ -65,8 +65,8 @@ object PackageUsageOptionsFrame: TPackageUsageOptionsFrame
|
||||
AnchorSideTop.Side = asrCenter
|
||||
Left = 6
|
||||
Height = 15
|
||||
Top = 90
|
||||
Width = 43
|
||||
Top = 97
|
||||
Width = 36
|
||||
BorderSpacing.Left = 6
|
||||
Caption = 'Library'
|
||||
ParentColor = False
|
||||
@ -77,7 +77,7 @@ object PackageUsageOptionsFrame: TPackageUsageOptionsFrame
|
||||
AnchorSideRight.Control = AddPathsGroupBox
|
||||
AnchorSideRight.Side = asrBottom
|
||||
Left = 80
|
||||
Height = 21
|
||||
Height = 23
|
||||
Top = 6
|
||||
Width = 401
|
||||
Anchors = [akTop, akLeft, akRight]
|
||||
@ -94,8 +94,8 @@ object PackageUsageOptionsFrame: TPackageUsageOptionsFrame
|
||||
AnchorSideRight.Control = AddPathsGroupBox
|
||||
AnchorSideRight.Side = asrBottom
|
||||
Left = 80
|
||||
Height = 21
|
||||
Top = 33
|
||||
Height = 23
|
||||
Top = 35
|
||||
Width = 401
|
||||
Anchors = [akTop, akLeft, akRight]
|
||||
BorderSpacing.Top = 6
|
||||
@ -111,8 +111,8 @@ object PackageUsageOptionsFrame: TPackageUsageOptionsFrame
|
||||
AnchorSideRight.Control = AddPathsGroupBox
|
||||
AnchorSideRight.Side = asrBottom
|
||||
Left = 80
|
||||
Height = 21
|
||||
Top = 60
|
||||
Height = 23
|
||||
Top = 64
|
||||
Width = 401
|
||||
Anchors = [akTop, akLeft, akRight]
|
||||
BorderSpacing.Top = 6
|
||||
@ -128,8 +128,8 @@ object PackageUsageOptionsFrame: TPackageUsageOptionsFrame
|
||||
AnchorSideRight.Control = AddPathsGroupBox
|
||||
AnchorSideRight.Side = asrBottom
|
||||
Left = 80
|
||||
Height = 21
|
||||
Top = 87
|
||||
Height = 23
|
||||
Top = 93
|
||||
Width = 401
|
||||
Anchors = [akTop, akLeft, akRight]
|
||||
BorderSpacing.Left = 80
|
||||
@ -149,12 +149,12 @@ object PackageUsageOptionsFrame: TPackageUsageOptionsFrame
|
||||
AnchorSideRight.Side = asrBottom
|
||||
Left = 0
|
||||
Height = 171
|
||||
Top = 139
|
||||
Top = 148
|
||||
Width = 535
|
||||
Anchors = [akTop, akLeft, akRight]
|
||||
BorderSpacing.Top = 6
|
||||
Caption = 'Add options to dependent packages and projects'
|
||||
ClientHeight = 152
|
||||
ClientHeight = 151
|
||||
ClientWidth = 531
|
||||
TabOrder = 1
|
||||
object LinkerOptionsLabel: TLabel
|
||||
@ -163,7 +163,7 @@ object PackageUsageOptionsFrame: TPackageUsageOptionsFrame
|
||||
Left = 6
|
||||
Height = 15
|
||||
Top = 6
|
||||
Width = 38
|
||||
Width = 32
|
||||
BorderSpacing.Left = 6
|
||||
Caption = 'Linker'
|
||||
ParentColor = False
|
||||
@ -174,7 +174,7 @@ object PackageUsageOptionsFrame: TPackageUsageOptionsFrame
|
||||
Left = 6
|
||||
Height = 15
|
||||
Top = 74
|
||||
Width = 46
|
||||
Width = 42
|
||||
BorderSpacing.Left = 6
|
||||
Caption = 'Custom'
|
||||
ParentColor = False
|
||||
@ -184,10 +184,10 @@ object PackageUsageOptionsFrame: TPackageUsageOptionsFrame
|
||||
AnchorSideTop.Control = AddOptionsGroupBox
|
||||
AnchorSideRight.Control = AddOptionsGroupBox
|
||||
AnchorSideRight.Side = asrBottom
|
||||
Left = 62
|
||||
Left = 58
|
||||
Height = 62
|
||||
Top = 6
|
||||
Width = 463
|
||||
Width = 467
|
||||
Anchors = [akTop, akLeft, akRight]
|
||||
BorderSpacing.Top = 6
|
||||
BorderSpacing.Right = 6
|
||||
@ -203,10 +203,10 @@ object PackageUsageOptionsFrame: TPackageUsageOptionsFrame
|
||||
AnchorSideRight.Side = asrBottom
|
||||
AnchorSideBottom.Control = AddOptionsGroupBox
|
||||
AnchorSideBottom.Side = asrBottom
|
||||
Left = 62
|
||||
Height = 72
|
||||
Left = 58
|
||||
Height = 71
|
||||
Top = 74
|
||||
Width = 463
|
||||
Width = 467
|
||||
Anchors = [akTop, akLeft, akRight, akBottom]
|
||||
BorderSpacing.Left = 10
|
||||
BorderSpacing.Top = 6
|
||||
@ -223,19 +223,19 @@ object PackageUsageOptionsFrame: TPackageUsageOptionsFrame
|
||||
AnchorSideRight.Control = Owner
|
||||
AnchorSideRight.Side = asrBottom
|
||||
Left = 0
|
||||
Height = 57
|
||||
Top = 316
|
||||
Height = 51
|
||||
Top = 325
|
||||
Width = 535
|
||||
Anchors = [akTop, akLeft, akRight]
|
||||
AutoSize = True
|
||||
BorderSpacing.Top = 6
|
||||
Caption = 'ProjectGroupBox'
|
||||
ClientHeight = 38
|
||||
ClientHeight = 31
|
||||
ClientWidth = 531
|
||||
TabOrder = 2
|
||||
object AddPackageUnitToProjectCheckBox: TCheckBox
|
||||
Left = 6
|
||||
Height = 20
|
||||
Height = 19
|
||||
Top = 6
|
||||
Width = 519
|
||||
Align = alTop
|
||||
|
@ -37,6 +37,9 @@ type
|
||||
LibraryPathButton: TPathEditorButton;
|
||||
FLazPackage: TLazPackage;
|
||||
function PathEditBtnExecuted({%H-}Context: String; var NewPath: String): Boolean;
|
||||
protected
|
||||
procedure DoAutoAdjustLayout(const AMode: TLayoutAdjustmentPolicy;
|
||||
const AXProportion, AYProportion: Double); override;
|
||||
public
|
||||
function GetTitle: string; override;
|
||||
procedure Setup({%H-}ADialog: TAbstractOptionsEditorDialog); override;
|
||||
@ -92,6 +95,17 @@ begin
|
||||
Result := lisPckOptsUsage;
|
||||
end;
|
||||
|
||||
procedure TPackageUsageOptionsFrame.DoAutoAdjustLayout(
|
||||
const AMode: TLayoutAdjustmentPolicy; const AXProportion, AYProportion: Double);
|
||||
begin
|
||||
if AMode = lapAutoAdjustForDPI then begin
|
||||
UnitPathButton.Width := round(UnitPathButton.Height * AXProportion);
|
||||
IncludePathButton.Width := round(IncludePathButton.Height * AXProportion);
|
||||
ObjectPathButton.Width := round(ObjectPathButton.Height * AXProportion);
|
||||
LibraryPathButton.Width := round(LibraryPathButton.Height * AXProportion);
|
||||
end;
|
||||
end;
|
||||
|
||||
procedure TPackageUsageOptionsFrame.Setup(ADialog: TAbstractOptionsEditorDialog);
|
||||
begin
|
||||
AddPathsGroupBox.Caption := lisPckOptsAddPathsToDependentPackagesProjects;
|
||||
@ -110,7 +124,7 @@ begin
|
||||
Parent := AddPathsGroupBox;
|
||||
Caption := '...';
|
||||
AutoSize := False;
|
||||
Width := 50;
|
||||
Width := Height;
|
||||
Anchors := [akRight];
|
||||
AnchorParallel(akRight, 6, AddPathsGroupBox);
|
||||
AnchorParallel(akTop, 0, UnitPathEdit);
|
||||
@ -133,7 +147,7 @@ begin
|
||||
Parent := AddPathsGroupBox;
|
||||
Caption := '...';
|
||||
AutoSize := False;
|
||||
Width := 50;
|
||||
Width := Height;
|
||||
Anchors := [akRight];
|
||||
AnchorParallel(akRight, 6, AddPathsGroupBox);
|
||||
AnchorParallel(akTop, 0, IncludePathEdit);
|
||||
@ -151,7 +165,7 @@ begin
|
||||
Parent := AddPathsGroupBox;
|
||||
Caption := '...';
|
||||
AutoSize := False;
|
||||
Width := 50;
|
||||
Width := Height;
|
||||
Anchors := [akRight];
|
||||
AnchorParallel(akRight, 6, AddPathsGroupBox);
|
||||
AnchorParallel(akTop, 0, ObjectPathEdit);
|
||||
@ -169,7 +183,7 @@ begin
|
||||
Parent := AddPathsGroupBox;
|
||||
Caption := '...';
|
||||
AutoSize := False;
|
||||
Width := 50;
|
||||
Width := Height;
|
||||
Anchors := [akRight];
|
||||
AnchorParallel(akRight, 6, AddPathsGroupBox);
|
||||
AnchorParallel(akTop, 0, LibraryPathEdit);
|
||||
|
Loading…
Reference in New Issue
Block a user