怎么实现在fastreport下的票据连续打印，大虾请帮忙！！

Question

fastreport3.0.2，谢谢

Answer 1

在打印前计算出打印纸长度,比较容易实现在你看看这个吧:
可以在打印前计算出纸张的长度再设置不就可以了,我用过,可以实现的.
    frm_print.frprint.Pages.Pages[0].pgSize:=256;
    frm_print.frprint.Pages.Pages[0].pgWidth:=2100;
    frm_print.frprint.Pages.Pages[0].pgHeight:=(5*dm_xsgl.q_xsdmx.RecordCount+33+33+40)*10;
    frm_print.frprint.PrepareReport;
    frm_print.frprint.ShowReport以上是我实现的代码:5是每条记录的高度*记录数量,33页高,33:表尾高度,40:每页打印完后走纸的高度.这样就可以了.其中:5,33,33,40可根据自己的报表量出来就好了.