使用FastReport建立TChart/TDBChart非常容易,首先使用Delphi建立统计图表,然后在您的报表加入Chart元件,最後在TfrReport.OnBeforePrint事件指定統計图表至报表。參考如下:
procedure TForm1.frReport1BeforePrint(Memo: TStringList;
View: TfrView);
begin
if View.Name = 'Chart1' then
begin
// 建立统计图
// 指定统计图給FastReport
TfrChartView(View).AssignChart(DBChart1);
end;
end;