答者有分，熟识QR的请进。(50分)

Nicro · 2003-04-22

本人想在一张A4的纸上实现QrBand的显示行数为8行，超过的转到下一页，（例如：现在我的
明细资料有25条，那么就用四页来打印完此任务，也就是说8，8，8，1。）。
请问有好的方法可以实现此效果吗？及时回答完整的高手，本人另外加50分。

siuping · 2003-04-22

调试好每页打印记录数为8条即可.可以调节打印页的top,bottom,或者记录与记录之音的行距,以达到每页打印8条记录.

Nicro · 2003-04-22

有其它方法吗？我现在就用此方法，不过此方法不但不准，而且调试速度也很慢。

wem888 · 2003-04-22

代碼控制﹐onneeddata事件

realLearning · 2003-04-22

procedure TForm1.Table1AfterScroll(DataSet: TDataSet);
begin
if table1.RecNo mod 8 =0 then
q.NewPage;
end;

zhangyangood · 2003-04-22

if((i%8)==0)
QuickRep1->NewPage();

Nicro · 2003-04-22

realLearning的方法有效，不过头页会只7行明细，还有具体点的方法吗？

command_zhao · 2003-04-22

(table1.RecNo-1) mod 8 =0

Nicro · 2003-04-22

多谢大家帮忙，问题解决了。