procedure TForm1.Button3Click(Sender: TObject); var si:TChartSeries; begin si:=TChartSeries.Create(Chart2); si.Assign(Chart1.Series[0]); Chart2.AddSeries(si); end;
procedure TForm1.FormCreate(Sender: TObject); begin Chart1.Series[0].Add(123,'123'); Chart1.Series[0].Add(321,'321'); end;
----------------------------------------------
维护世界和平,共创美好盒子。