ChangeSeriesType使用错误?(100分)

  • 主题发起人 主题发起人 eyangyj
  • 开始时间 开始时间
E

eyangyj

Unregistered / Unconfirmed
GUEST, unregistred user!
With TChart.SeriesList Do Begin {±¾º¯Êý¸Ä±äͼÐÎÏÔʾµÄÀàÐÍ}
ASeriesClass := TChartSeriesClass(TBarSeries )
For i:=0 To Count-1 Do Begin
ASeries := Series;
ChangeSeriesType( ASeries, ASeriesClass );
End;
End;
我用以上的一段程序动态将所有TLineSeries改为TBarSeries后,只有i=0时是正确的,其他的全不对,我试了一下任何两种TChartSeries的改变当循环改变都有这个问题,不知道这样全部改变图形类型如何操作
 
后退
顶部