mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-06-25 10:08:15 +02:00
IDE: made options memo in Show Compiler Options dialog read-only
This commit is contained in:
parent
8d0afe3d1f
commit
e572621c4b
@ -1,67 +1,68 @@
|
|||||||
object ShowCompilerOptionsDlg: TShowCompilerOptionsDlg
|
object ShowCompilerOptionsDlg: TShowCompilerOptionsDlg
|
||||||
Left = 341
|
Left = 341
|
||||||
Height = 420
|
Height = 472
|
||||||
Top = 318
|
Top = 318
|
||||||
Width = 645
|
Width = 726
|
||||||
Caption = 'Compiler Options'
|
Caption = 'Compiler Options'
|
||||||
ClientHeight = 420
|
ClientHeight = 472
|
||||||
ClientWidth = 645
|
ClientWidth = 726
|
||||||
Constraints.MinHeight = 194
|
Constraints.MinHeight = 218
|
||||||
Constraints.MinWidth = 390
|
Constraints.MinWidth = 439
|
||||||
|
DesignTimePPI = 108
|
||||||
|
Position = poOwnerFormCenter
|
||||||
OnClose = FormClose
|
OnClose = FormClose
|
||||||
OnCreate = FormCreate
|
OnCreate = FormCreate
|
||||||
OnDestroy = FormDestroy
|
OnDestroy = FormDestroy
|
||||||
Position = poOwnerFormCenter
|
|
||||||
LCLVersion = '2.1.0.0'
|
|
||||||
object CloseButton: TBitBtn
|
object CloseButton: TBitBtn
|
||||||
AnchorSideTop.Side = asrBottom
|
AnchorSideTop.Side = asrBottom
|
||||||
AnchorSideRight.Control = Owner
|
AnchorSideRight.Control = Owner
|
||||||
AnchorSideRight.Side = asrBottom
|
AnchorSideRight.Side = asrBottom
|
||||||
AnchorSideBottom.Control = Owner
|
AnchorSideBottom.Control = Owner
|
||||||
AnchorSideBottom.Side = asrBottom
|
AnchorSideBottom.Side = asrBottom
|
||||||
Left = 564
|
Left = 635
|
||||||
Height = 29
|
Height = 38
|
||||||
Top = 385
|
Top = 427
|
||||||
Width = 75
|
Width = 84
|
||||||
Anchors = [akRight, akBottom]
|
Anchors = [akRight, akBottom]
|
||||||
AutoSize = True
|
AutoSize = True
|
||||||
BorderSpacing.Around = 6
|
BorderSpacing.Around = 7
|
||||||
Cancel = True
|
Cancel = True
|
||||||
Caption = '&Close'
|
Caption = '&Close'
|
||||||
Constraints.MinHeight = 22
|
Constraints.MinHeight = 25
|
||||||
Constraints.MinWidth = 75
|
Constraints.MinWidth = 84
|
||||||
Default = True
|
Default = True
|
||||||
Kind = bkClose
|
Kind = bkClose
|
||||||
TabOrder = 1
|
TabOrder = 1
|
||||||
end
|
end
|
||||||
object PageControl1: TPageControl
|
object PageControl1: TPageControl
|
||||||
AnchorSideBottom.Control = CloseButton
|
AnchorSideBottom.Control = CloseButton
|
||||||
Left = 6
|
Left = 7
|
||||||
Height = 373
|
Height = 413
|
||||||
Top = 6
|
Top = 7
|
||||||
Width = 633
|
Width = 712
|
||||||
ActivePage = CmdLineParamsTabSheet
|
ActivePage = CmdLineParamsTabSheet
|
||||||
Align = alTop
|
Align = alTop
|
||||||
Anchors = [akTop, akLeft, akRight, akBottom]
|
Anchors = [akTop, akLeft, akRight, akBottom]
|
||||||
BorderSpacing.Around = 6
|
BorderSpacing.Around = 7
|
||||||
TabIndex = 0
|
TabIndex = 0
|
||||||
TabOrder = 0
|
TabOrder = 0
|
||||||
object CmdLineParamsTabSheet: TTabSheet
|
object CmdLineParamsTabSheet: TTabSheet
|
||||||
Caption = 'CmdLineParams'
|
Caption = 'CmdLineParams'
|
||||||
ClientHeight = 342
|
ClientHeight = 381
|
||||||
ClientWidth = 629
|
ClientWidth = 702
|
||||||
object CmdLineMemo: TMemo
|
object CmdLineMemo: TMemo
|
||||||
AnchorSideBottom.Control = RelativePathsCheckBox
|
AnchorSideBottom.Control = RelativePathsCheckBox
|
||||||
Left = 6
|
Left = 7
|
||||||
Height = 306
|
Height = 344
|
||||||
Top = 6
|
Top = 7
|
||||||
Width = 617
|
Width = 688
|
||||||
Align = alTop
|
Align = alTop
|
||||||
Anchors = [akTop, akLeft, akRight, akBottom]
|
Anchors = [akTop, akLeft, akRight, akBottom]
|
||||||
BorderSpacing.Around = 6
|
BorderSpacing.Around = 7
|
||||||
Lines.Strings = (
|
Lines.Strings = (
|
||||||
'CmdLineMemo'
|
'CmdLineMemo'
|
||||||
)
|
)
|
||||||
|
ReadOnly = True
|
||||||
ScrollBars = ssAutoVertical
|
ScrollBars = ssAutoVertical
|
||||||
TabOrder = 0
|
TabOrder = 0
|
||||||
end
|
end
|
||||||
@ -69,55 +70,55 @@ object ShowCompilerOptionsDlg: TShowCompilerOptionsDlg
|
|||||||
AnchorSideTop.Side = asrCenter
|
AnchorSideTop.Side = asrCenter
|
||||||
AnchorSideBottom.Control = CmdLineParamsTabSheet
|
AnchorSideBottom.Control = CmdLineParamsTabSheet
|
||||||
AnchorSideBottom.Side = asrBottom
|
AnchorSideBottom.Side = asrBottom
|
||||||
Left = 6
|
Left = 7
|
||||||
Height = 24
|
Height = 23
|
||||||
Top = 318
|
Top = 358
|
||||||
Width = 184
|
Width = 182
|
||||||
Anchors = [akLeft, akBottom]
|
Anchors = [akLeft, akBottom]
|
||||||
Caption = 'RelativePathsCheckBox'
|
Caption = 'RelativePathsCheckBox'
|
||||||
Checked = True
|
Checked = True
|
||||||
OnChange = RelativePathsCheckBoxChange
|
|
||||||
State = cbChecked
|
State = cbChecked
|
||||||
TabOrder = 1
|
TabOrder = 1
|
||||||
|
OnChange = RelativePathsCheckBoxChange
|
||||||
end
|
end
|
||||||
object MultilineCheckBox: TCheckBox
|
object MultilineCheckBox: TCheckBox
|
||||||
AnchorSideLeft.Control = RelativePathsCheckBox
|
AnchorSideLeft.Control = RelativePathsCheckBox
|
||||||
AnchorSideLeft.Side = asrBottom
|
AnchorSideLeft.Side = asrBottom
|
||||||
AnchorSideTop.Control = RelativePathsCheckBox
|
AnchorSideTop.Control = RelativePathsCheckBox
|
||||||
AnchorSideBottom.Side = asrBottom
|
AnchorSideBottom.Side = asrBottom
|
||||||
Left = 205
|
Left = 206
|
||||||
Height = 24
|
Height = 23
|
||||||
Top = 318
|
Top = 358
|
||||||
Width = 151
|
Width = 151
|
||||||
BorderSpacing.Left = 15
|
BorderSpacing.Left = 17
|
||||||
Caption = 'MultilineCheckBox'
|
Caption = 'MultilineCheckBox'
|
||||||
Checked = True
|
Checked = True
|
||||||
OnChange = MultilineCheckBoxChange
|
|
||||||
State = cbChecked
|
State = cbChecked
|
||||||
TabOrder = 2
|
TabOrder = 2
|
||||||
|
OnChange = MultilineCheckBoxChange
|
||||||
end
|
end
|
||||||
end
|
end
|
||||||
object InheritedParamsTabSheet: TTabSheet
|
object InheritedParamsTabSheet: TTabSheet
|
||||||
Caption = 'InheritedParams'
|
Caption = 'InheritedParams'
|
||||||
ClientHeight = 342
|
ClientHeight = 381
|
||||||
ClientWidth = 629
|
ClientWidth = 702
|
||||||
object InhTreeView: TTreeView
|
object InhTreeView: TTreeView
|
||||||
Left = 0
|
Left = 0
|
||||||
Height = 287
|
Height = 306
|
||||||
Top = 0
|
Top = 0
|
||||||
Width = 477
|
Width = 702
|
||||||
Align = alClient
|
Align = alClient
|
||||||
ReadOnly = True
|
ReadOnly = True
|
||||||
RightClickSelect = True
|
RightClickSelect = True
|
||||||
TabOrder = 0
|
TabOrder = 0
|
||||||
OnSelectionChanged = InhTreeViewSelectionChanged
|
|
||||||
Options = [tvoAutoItemHeight, tvoHideSelection, tvoKeepCollapsedNodes, tvoReadOnly, tvoRightClickSelect, tvoShowButtons, tvoShowLines, tvoShowRoot, tvoToolTips, tvoThemedDraw]
|
Options = [tvoAutoItemHeight, tvoHideSelection, tvoKeepCollapsedNodes, tvoReadOnly, tvoRightClickSelect, tvoShowButtons, tvoShowLines, tvoShowRoot, tvoToolTips, tvoThemedDraw]
|
||||||
|
OnSelectionChanged = InhTreeViewSelectionChanged
|
||||||
end
|
end
|
||||||
object InhItemMemo: TMemo
|
object InhItemMemo: TMemo
|
||||||
Left = 0
|
Left = 0
|
||||||
Height = 61
|
Height = 69
|
||||||
Top = 292
|
Top = 312
|
||||||
Width = 477
|
Width = 702
|
||||||
Align = alBottom
|
Align = alBottom
|
||||||
ReadOnly = True
|
ReadOnly = True
|
||||||
ScrollBars = ssAutoVertical
|
ScrollBars = ssAutoVertical
|
||||||
@ -126,9 +127,9 @@ object ShowCompilerOptionsDlg: TShowCompilerOptionsDlg
|
|||||||
object InhSplitter: TSplitter
|
object InhSplitter: TSplitter
|
||||||
Cursor = crVSplit
|
Cursor = crVSplit
|
||||||
Left = 0
|
Left = 0
|
||||||
Height = 5
|
Height = 6
|
||||||
Top = 287
|
Top = 306
|
||||||
Width = 477
|
Width = 702
|
||||||
Align = alBottom
|
Align = alBottom
|
||||||
ResizeAnchor = akBottom
|
ResizeAnchor = akBottom
|
||||||
end
|
end
|
||||||
|
Loading…
Reference in New Issue
Block a user