for i:=Chart1.SeriesCount-1 downto 0 do
begin
Chart1.Series[i].Free;
end;
二、运行时候创建一个Series, 有多种方法。
1.Var MySeries : TBarSeries ;
MySeries := TBarSeries.Create( Self );
MySeries.ParentChart := Chart1 ;
2.Chart1.AddSeries( TBarSeries.Create( Self ) );
3.Var MyClass : TChartSeriesClass;
MyClass := TBarSeries ;
Chart1.AddSeries( MyClass.Create( Self ) );
在这里根据,用到循环结构动态添加多条Series。
for j:=0 to NXUGMU-1 do
begin
series:=TFastLineSeries.Create(Chart1);
Chart1.AddSeries(Series); //动态增加series
series.LinePen.Width:=2; //设定线宽
Chart1.Series[j].Title:='速度 '+StrVelocity[j]; //动态标题
randomize;
end;
三、在chart中画出的曲线某个点上标记出该点的值
series.Marks.Visible:=True;
Series.Marks.Style:=smsValue;
四、固定TChart中的坐标,不使TChart中的坐标跟随Series的变化而变化
//设置底座标
with Chart1.BottomAxis do
begin
Automatic:=false;
Minimum:=0;
LabelStyle := talText;
end;
五、添加坐标值,自动绘制曲线
Chart1.Series[j].AddXY(Xzhi,Yzhi,Label,color);
最后生成的曲线图如下: