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 Form1: TForm1
Left = 380
Height = 307
Top = 164
Width = 585
Caption = 'Form1'
ClientHeight = 307
ClientWidth = 585
LCLVersion = '2.3.0.0'
object Chart1: TChart
AnchorSideBottom.Control = cbAtDataOnly
AnchorSideBottom.Side = asrBottom
Left = 0
Height = 276
Top = 0
Width = 585
AxisList = <
item
Grid.Visible = False
TickColor = clRed
AxisPen.Color = clRed
AxisPen.Visible = True
Marks.LabelFont.Color = clRed
Marks.LabelBrush.Style = bsClear
Minors = <>
Title.LabelFont.Color = clRed
Title.LabelFont.Orientation = 900
Title.Visible = True
Title.Caption = '1st y axis'
Title.LabelBrush.Style = bsClear
Transformations = ChartAxisTransformations1
end
item
Alignment = calBottom
AxisPen.Visible = True
Marks.LabelBrush.Style = bsClear
Minors = <>
Title.LabelBrush.Style = bsClear
end
item
Grid.Visible = False
TickColor = clBlue
AxisPen.Color = clBlue
AxisPen.Visible = True
Marks.LabelFont.Color = clBlue
Marks.LabelBrush.Style = bsClear
Minors = <>
Title.LabelFont.Color = clBlue
Title.LabelFont.Orientation = 900
Title.Visible = True
Title.Caption = '2nd y axis'
Title.LabelBrush.Style = bsClear
Transformations = ChartAxisTransformations2
end>
BackColor = clWhite
Foot.Brush.Color = clBtnFace
Foot.Font.Color = clBlue
Frame.Visible = False
Title.Brush.Color = clBtnFace
Title.Font.Color = clBlue
Title.Text.Strings = (
'TAChart'
)
object Chart1LineSeries1: TLineSeries
AxisIndexX = 1
AxisIndexY = 0
LinePen.Color = clRed
Source = RandomChartSource1
end
object Chart1LineSeries2: TLineSeries
AxisIndexX = 1
AxisIndexY = 2
LinePen.Color = clBlue
Source = RandomChartSource2
end
end
object cbAtDataOnly: TCheckBox
AnchorSideLeft.Control = Owner
AnchorSideBottom.Control = Owner
AnchorSideBottom.Side = asrBottom
Left = 6
Height = 19
Top = 282
Width = 115
Anchors = [akLeft, akBottom]
BorderSpacing.Around = 6
Caption = 'y axes at data only'
OnChange = cbAtDataOnlyChange
TabOrder = 1
end
object cbGrouped: TCheckBox
AnchorSideLeft.Control = cbAtDataOnly
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = cbAtDataOnly
Left = 137
Height = 19
Top = 282
Width = 64
BorderSpacing.Left = 16
Caption = 'Grouped'
OnChange = cbGroupedChange
TabOrder = 2
end
object ChartAxisTransformations1: TChartAxisTransformations
Left = 96
Top = 112
object ChartAxisTransformations1AutoScaleAxisTransform1: TAutoScaleAxisTransform
end
end
object ChartAxisTransformations2: TChartAxisTransformations
Left = 440
Top = 112
object ChartAxisTransformations2AutoScaleAxisTransform1: TAutoScaleAxisTransform
MaxValue = 2
MinValue = 1
end
end
object RandomChartSource1: TRandomChartSource
PointsNumber = 10
RandSeed = 1004835833
XMax = 1
YMax = 1
Left = 96
Top = 176
end
object RandomChartSource2: TRandomChartSource
PointsNumber = 5
RandSeed = 1004914276
XMax = 1
YMax = 1000
YMin = -1000
Left = 440
Top = 176
end
end
|
