请教:fastrReport问题(50分)

  • 主题发起人 主题发起人 Dramer
  • 开始时间 开始时间
D

Dramer

Unregistered / Unconfirmed
GUEST, unregistred user!
本人想在点下按钮时不显示预览而直接进行打印,查看帮助后知道TfrReport有一个PrintPreparedReport方法,但我不知道如何传进它的参数。
procedure TfrReport.PrintPreparedReport(PageNumbers: String;
Copies: Integer;
Collate: Boolean;
PrintPages: TfrPrintPages);
谢谢!
 
fr.PrintPreparedReport('',1,True,frAll)
 
谢谢你
但是传进次参数后,提示:List index out of bounts(0)
 
amao123说的是对的,你把程序给贴出来看看吧
 

[red][h3]去下载fastreport250并安装,在demo中用很多例子:
http://www.lingphi.com
http://lingphi.delphibbs.com
[/h3][/red]
 
我的程序很简单
procedure Tkc_form.printerbtnClick(Sender: TObject);
begin
frDBDataSet1.Dataset:=database.ADOQkcb;
frReport1.LoadFromFile('fr/dqkcb.frf');
//frReport1.ShowReport;
frReport1.PrintPreparedReport('',1,True,frAll);

end;
 
程序应该没问题的,应该从你的表本身找找。
procedure Tkc_form.printerbtnClick(Sender: TObject);
begin
frDBDataSet1.Dataset:=database.ADOQkcb;
frReport1.LoadFromFile('fr/dqkcb.frf');
frreport1.PrepareReport;
frReport1.PrintPreparedReport('',1,True,frAll);

end;

 
谢谢我试一下
 
行了,谢谢大家了!
 
多人接受答案了。
 
后退
顶部