fastreport能否在同一次打印中打印不同表格形式的报表? ( 积分: 100 )

  • 主题发起人 主题发起人 yf168
  • 开始时间 开始时间
Y

yf168

Unregistered / Unconfirmed
GUEST, unregistred user!
现在有个需求:
一次打印出不同的几张报表(也就是几个不同的frf文件),怎样
获得总页数且一次打印出来(中间不会出来几次打印对话框)?
用下面的语句是不行的,不知谁有好方法? ...
self.frReport1.LoadFromFile('1.frf')
self.frReport1.ShowReport;
...
self.frReport1.LoadFromFile('2.frf')
self.frReport1.ShowReport;
...
 
现在有个需求:
一次打印出不同的几张报表(也就是几个不同的frf文件),怎样
获得总页数且一次打印出来(中间不会出来几次打印对话框)?
用下面的语句是不行的,不知谁有好方法? ...
self.frReport1.LoadFromFile('1.frf')
self.frReport1.ShowReport;
...
self.frReport1.LoadFromFile('2.frf')
self.frReport1.ShowReport;
...
 
ShowReport是预览吧,直接打印好像是
frReport1.Clear;
//将上一次的打印结果清除
frReport1.LoadFromFile('c:/test.frf');
frReport1.PrepareReport;
frReport1.PrintPreparedReportDlg;
 
LoadFromFile后直接打印:
if frReport1.PrepareReport then

frReport1.PrintPreparedReport(' ',1,false,frAll);
procedure PrintPreparedReport(PageNumbers: String;
Copies: Integer;
Collate: Boolean;
PrintPages: TfrPrintPages);
PageNumbers字符串指定要打印的页,其中包含被逗号分开的页码,或者页范围(例如,“1,3,5-12"
)。 如果这个字符串是空的,则打印所有页。
Copies 参数指定要打印的份数。
Collate 参数告诉FR 比较拷贝。
PrintPages参数选择要打印的页: 全部,奇数页或者偶数页 ((frAll, frOdd, frEven)。
 
只有采用动态报表,在同一frf中创建多页,每一页不同的格式就可以实现。
如何创建动态报表,在FR的DEMO中有的
 
感谢各位参与,
我估计levi说的应该是对的,我还没有实验!
先把分瓜分了先!!!
本人很久以前作的FTP:
http://www.delphibbs.com/delphibbs/dispq.asp?lid=2478536
 
后退
顶部