为了提高速度和降低成本，建议用户采用激光打印机打印发货单。在批量打印发货单时，有时候会出现同一个订单打印在两张A4纸上。可以做如下处理。

1）菜单：自定义-报表配置-发货单，点编辑

2）编辑状态下：

在编辑区复制如下代码：

     if [Line#]>1 then
     begin
          nHeight:=[ADOQuery6."GoodsListCount"]*35+DetailFooter1.Height+MasterData1.Height+10;
          if FreeSpace<nHeight then
               Newpage;
     end

如图：

用同样的办法，在“自定义-快递单设计”中可以对快递单添加流水编号。

我按楼主的方法，结果有出错提示，为什么啊 ！！！