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
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
|
object frmMain: TfrmMain
Left = 261
Height = 459
Top = 153
Width = 484
Caption = 'frmMain'
ClientHeight = 459
ClientWidth = 484
LCLVersion = '2.3.0.0'
object Chart1: TChart
Left = 0
Height = 211
Top = 42
Width = 484
AxisList = <
item
Marks.LabelBrush.Style = bsClear
Minors = <>
Title.LabelFont.Orientation = 900
Title.LabelBrush.Style = bsClear
end
item
Intervals.MaxLength = 80
Alignment = calBottom
Marks.LabelBrush.Style = bsClear
Minors = <>
Title.LabelBrush.Style = bsClear
end>
BackColor = clWhite
Extent.UseXMax = True
Extent.UseXMin = True
Extent.UseYMax = True
Extent.UseYMin = True
Extent.XMax = 5
Extent.XMin = -5
Extent.YMax = 1
Extent.YMin = -1
Foot.Brush.Color = clBtnFace
Foot.Font.Color = clBlue
Title.Brush.Color = clBtnFace
Title.Font.Color = clBlue
Title.Text.Strings = (
'TAChart'
)
Align = alClient
object Chart1FuncSeries1: TFuncSeries
Extent.UseXMax = True
Extent.UseXMin = True
Extent.XMax = 5
Extent.XMin = -5
Pen.Color = clPurple
OnCalculate = Chart1FuncSeries1Calculate
end
object Chart1FuncSeries2: TFuncSeries
Pen.Color = clLime
OnCalculate = Chart1FuncSeries2Calculate
end
end
object ListView1: TListView
Left = 8
Height = 150
Top = 286
Width = 468
Align = alBottom
BorderSpacing.Left = 8
BorderSpacing.Right = 8
Color = clWhite
Columns = <>
Items.LazData = {
6C0000000400000000000000FFFFFFFFFFFFFFFF00000000050000004974656D
3001000000FFFFFFFFFFFFFFFF00000000050000004974656D3102000000FFFF
FFFFFFFFFFFF00000000050000004974656D3203000000FFFFFFFFFFFFFFFF00
000000050000004974656D34
}
SmallImages = ChartImageList
TabOrder = 1
end
object ToolBar1: TToolBar
Left = 0
Height = 42
Top = 0
Width = 484
AutoSize = True
ButtonHeight = 40
ButtonWidth = 40
Caption = 'ToolBar1'
EdgeBorders = [ebBottom]
Images = ChartImageList
ShowCaptions = True
TabOrder = 2
object tbAdd: TToolButton
Left = 1
Top = 0
Caption = 'Add'
ImageIndex = 1
OnClick = tbAddClick
end
object tbQuit: TToolButton
Left = 46
Top = 0
Caption = 'Quit'
ImageIndex = 0
OnClick = tbQuitClick
end
object tbSep1: TToolButton
Left = 41
Height = 40
Top = 0
Caption = 'tbSep1'
Style = tbsDivider
end
end
object StatusBar1: TStatusBar
Left = 0
Height = 23
Top = 436
Width = 484
Panels = <>
end
object Label1: TLabel
Left = 8
Height = 15
Top = 269
Width = 468
Align = alBottom
BorderSpacing.Left = 8
BorderSpacing.Top = 16
BorderSpacing.Right = 8
BorderSpacing.Bottom = 2
Caption = 'This ImageList displays all images contained in the ChartImagelist:'
end
object RandomChartSource1: TRandomChartSource
PointsNumber = 10
RandSeed = 1965225964
XMax = 5
XMin = -5
YMax = 1
YMin = -1
Left = 191
Top = 159
end
object ChartImageList: TChartImageList
Chart = Chart1
OnPopulate = ChartImageListPopulate
Left = 192
Top = 97
Bitmap = {
4C7A020000001000000010000000690300000000000078DACD93ED4F5B6514C0
F903349ACC98F8C1F869DF8C4643B6102C1BCCD2413B2BB371A576B303659971
C3422B03DB52461728A42B4586F4BD40D9E6C8C6706CEBA6663216D804365E1A
16D9744E232E3598B8C4A032FD79EFA56BDC2B4EB2C40FBFDCE439E797739E73
CF03A4F1806C0BC49DEFF826E64B3EBAF0F38378EF85A62E092EBB7AA7D1794E
60F87038713366B7DBB1D96C582C16AAAAAAA8A8A8C06C36535656863114A734
3445DD2797E99EBCC6C76333689B6214EE1E4CF956AB15AFD72BE1F3F924FC7E
BF4469709203E33FD22DD0367415CFE96F78DD7D9CF5CEFE942FD614DDF59E42
BC3EAFE405020189777D63EC3BFF03EEFE2B383FBF4CA3C06BAE63281D9FA57C
B15FB1A6AC414E5E835AF282C1A04449EB081DC3DF4B6EED89691C02058D4759
633B9678B9651D391E25AB5C6B9139E56C8CBE8D2EB21979AD9250282461683E
4768E83B6A63D358FB2E623B7211B5B38FCCCADE4476533E2D13613C633E5CA3
AD38879B719C7551D0A625DB924B381C46B7FB0C6D03DF62113C53CF149BCECC
A2AC3F427A797722AB3117F7792FD6C13A760CD450FE85059340E5E91AF29AD4
68AA37A0719EA2E5D4D7980FC6298E5D4519879CC618CF6EDF9BC8ACCB49D5B4
0FD6F3C1402D15FDD528DCEBC834ADA2BDBD1D95E324AE4F2FB17DFF38257BC7
79B3EF0A8A5DBD2CDFDA9E58B9338B745B262F54AEE439733A799E57C975ABC8
2897496E474707725B1FF5C7BF624BE705368746280E8F08F3E9E599B702A9F9
1B0C06229108B2F7B35961CC903C91CECE4E649587D929DCBD48F074BE736CF2
7FC99A9A1E9E32B4A57CBD5E2FD57BA97C3511E12B7A22D1689415A603587BE2
BC21B89A3D43685BCF926D3FC4327D4BCAD76AB5B7D4143D91AEAE2E9E2FED62
47F784C024E5FBC6D91A196575F5211E2BF424C49D331A8D68341A0A0A0A50AB
D5A8542AF2F3F3512814C8E572966F09F2A2693F324B0F0AC7515E69384996ED
208F6C7027FECDBB7BBAD8FFA470D78C2736EE297A5CD75CFFA8B629BA4CDF7C
43F067F90FEFFFE17243602EADA148CE3F11CF16628BF9F302D725FFDA684C62
C1BF2E9CFF91CCF9EB1E7545F75781D9BBF83F2563BFDFA38FB9B4851A62DECC
5DFC9964EC9764EEADFEEDF7BDDDBF731E77FA37F317E361F94BE91F7E4BCE6F
F63EF39B4DE6CC2DE1FFCD2FB247F7DB9FF925EFEF9FFFB3F7F637D1E68FA3
}
end
end
|
