1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
|
object ShowCompilerOptionsDlg: TShowCompilerOptionsDlg
Left = 341
Height = 420
Top = 320
Width = 481
AutoSize = True
Caption = 'Compiler Options'
ClientHeight = 420
ClientWidth = 481
Constraints.MinHeight = 194
Constraints.MinWidth = 390
OnClose = FormClose
OnCreate = FormCreate
OnDestroy = FormDestroy
Position = poOwnerFormCenter
LCLVersion = '1.9.0.0'
object CloseButton: TBitBtn
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = Owner
AnchorSideBottom.Side = asrBottom
Left = 400
Height = 28
Top = 386
Width = 75
Anchors = [akRight, akBottom]
AutoSize = True
BorderSpacing.Around = 6
Caption = '&Close'
Constraints.MinHeight = 22
Constraints.MinWidth = 75
Kind = bkClose
TabOrder = 0
end
object PageControl1: TPageControl
AnchorSideBottom.Control = CloseButton
Left = 0
Height = 380
Top = 0
Width = 481
ActivePage = CmdLineParamsTabSheet
Align = alTop
Anchors = [akTop, akLeft, akRight, akBottom]
TabIndex = 0
TabOrder = 1
object CmdLineParamsTabSheet: TTabSheet
Caption = 'CmdLineParams'
ClientHeight = 353
ClientWidth = 477
object CmdLineMemo: TMemo
AnchorSideBottom.Control = RelativePathsCheckBox
Left = 6
Height = 317
Top = 6
Width = 465
Align = alTop
Anchors = [akTop, akLeft, akRight, akBottom]
BorderSpacing.Around = 6
Lines.Strings = (
'CmdLineMemo'
)
ScrollBars = ssAutoVertical
TabOrder = 0
end
object RelativePathsCheckBox: TCheckBox
AnchorSideTop.Side = asrCenter
AnchorSideBottom.Control = CmdLineParamsTabSheet
AnchorSideBottom.Side = asrBottom
Left = 6
Height = 24
Top = 329
Width = 155
Anchors = [akLeft, akBottom]
Caption = 'RelativePathsCheckBox'
Checked = True
OnChange = RelativePathsCheckBoxChange
State = cbChecked
TabOrder = 1
end
object MultilineCheckBox: TCheckBox
AnchorSideLeft.Control = RelativePathsCheckBox
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = RelativePathsCheckBox
AnchorSideBottom.Side = asrBottom
Left = 176
Height = 24
Top = 329
Width = 128
BorderSpacing.Left = 15
Caption = 'MultilineCheckBox'
Checked = True
OnChange = MultilineCheckBoxChange
State = cbChecked
TabOrder = 2
end
end
object InheritedParamsTabSheet: TTabSheet
Caption = 'InheritedParams'
ClientHeight = 353
ClientWidth = 477
object InhTreeView: TTreeView
Left = 0
Height = 287
Top = 0
Width = 477
Align = alClient
ReadOnly = True
RightClickSelect = True
TabOrder = 0
OnSelectionChanged = InhTreeViewSelectionChanged
Options = [tvoAutoItemHeight, tvoHideSelection, tvoKeepCollapsedNodes, tvoReadOnly, tvoRightClickSelect, tvoShowButtons, tvoShowLines, tvoShowRoot, tvoToolTips, tvoThemedDraw]
end
object InhItemMemo: TMemo
Left = 0
Height = 61
Top = 292
Width = 477
Align = alBottom
ReadOnly = True
ScrollBars = ssAutoVertical
TabOrder = 1
end
object InhSplitter: TSplitter
Cursor = crVSplit
Left = 0
Height = 5
Top = 287
Width = 477
Align = alBottom
ResizeAnchor = akBottom
end
end
end
end
|
