delphi中怎样实现报表批量打印(200分)

L

linfox

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-11-08

• #1

我以前做过的报表都是用QReport从数据库中读出一条记录,然后打印.
现在有这样的需求:如果记录较多,而用户又不想每一条报表都去Preview,而想一次把所有的报表全部打印出来,
我该怎么做呢?谢谢各位了!

 

N

netatom

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-11-08

• #2

直接QuickRep.print;

 

L

linfox

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-11-08

• #3

我的意思是每一张报表都对应数据库一条记录,都是一张完整的报表,而现在要根据数据库中
的多条记录批量打印报表

 

F

fxingf

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-11-08

• #4

那就读多条了

 

N

netatom

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-11-08

• #5

while 条件满足do
begin
Qrp1.print;
Qrp2.print;
.......
table1.next;
end;
qrp1,qrp2等的dataset都设为table1

 

J

jxyghm

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-11-08

• #6

放一个TQRCompositeReport 难道不行吗

 

F

fpsky

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-13

• #7

gz

 

D

dopro

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-13

• #8

打印一条记录就设报表换页就行了，不知你用的是什么报表控件。

 

L

lbd

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-08-06

• #9

还是分组打印一下