Question

Delphi用TfrReport实现打印的时候，打印总是出错，请问这是为什么？

frprt1: TfrReport;
frdbdtst1: TfrDBDataSet;

具体的代码如下
qry1.Close;
qry1.SQL.Add('SELECT * FROM Tree');
qry1.Open;
with frprt1 do
begin
PrepareReport;
PrintPreparedReport('',1,true,frall); //到这一句就报错
end;
frprt1的dateset指向frdbdtst1
frdbdtst1的dateset指向qry1
qry1是能正常显示数据的。
请为什么我执行到哪一步就错误了。
下面是出错的图

Answer 1

我用fastreport，一般是设计好后load进来直接打印

with Rpt do
begin
Rpt.LoadFromFile(pth+'\rp.fr3');
Rpt.PrepareReport(True ) ;
Rpt.Print ;
end;