FastReport 6中图形控件 TfrxChart 该怎样动态赋值?
如题,网上找了一圈没找到答案,不过看到之前也有人在其他版本 遇到这个问题。直接贴过来。有高手遇到过吗。
我在报表中使用了TfrxChart控件,名称是chart1,打印前需要根据实际的数据重新绘制图形
我按照原来使用Tchart控件的习惯编写的代码如下,
编译后发现除了能修改Series[0]标题其它命令均无效,
无法清除已有曲线也无法显示新的曲线,
使用MyChart.SeriesData.Clear 可以清除已有图形,但其它命令仍无效
procedure TForm1.frxReport2BeforePrint(c: TfrxReportComponent);
var
MyChart: TfrxChartView;
i, j: Integer;
begin
if c is TfrxChartView then
Begin
MyChart := TfrxChartView(c);
If MyChart.Name='Chart1' Then
Begin
//MyChart.SeriesData.Clear;
MyChart.Chart.Series[0].Title:='good';
MyChart.Chart.Series[0].Clear;
MyChart.Chart.Series[1].Clear;
For i:=1 To 100 Do
MyChart.Chart.Series[0].AddXY(i,i,'test1');
For j:=1 To 100 Do
MyChart.Chart.Series[1].AddXY(j,100-j,'test2');
End;
End;
end;