怎样实现每一页纸打印一条纪录的信息?(50分)

  • 主题发起人 主题发起人 gamma
  • 开始时间 开始时间
G

gamma

Unregistered / Unconfirmed
GUEST, unregistred user!
我在设计报表打印时,报表的设计风格是整体打印,
请问怎样才能实现每一页纸打印一条纪录的信息.
比如用于成绩单的打印,需要给每一个考生打印一份寄出.
 
如果你是使用QREPORT的话,将资料明细区的forcenewpage属性设为true即可.
 
很多都可以作到这一点的,
我一向都是把这种数据使用COM来控制word生成报表的,
你只要写完一条记录,
就让word换页就可,
WordApplication.Selection.InsertBreak(newpage);
用这一句就可让word换页,
一切都很简单。
 
追加一个问题:如何再打印报表的时候实现网格打印?
我可以设置横线,但是不知道怎么设置竖线,请指教
 
画斜线呀,你画一个有斜线的图片放上合适的地方就可。
 
程云,首先谢谢你的帮助。
关于设置竖线的问题,难道就没有什么设置或者别的办法?
我也想过画斜线的办法,可是觉得那样太笨了,Delphi不至于这点功能都要用
图片来实现吧。
希望得到大家更好的方法,谢谢!
 
使用 QRShape,将 Shape 属性设为 qrsVertLine。
 
谢谢zml,我已经实现每一页纸打印一条纪录的信息,
现在有了另外的一个问题,我的程序是打印学生的成绩单,如果每页只打印一个学生,
多少有点浪费,尤其是要打印的比较多的时候,能不能实现每页打印两个学生的成绩单呢?
 
很简单,那你不用forcenewpage属性设为true,设回false.把明细资料区域的的大小
设成是一页的一半.这样他不就自动分页了每页两条记录了.
 
zml,你说的方法虽然可以实现每页打印2个纪录,可是这样的方法,标题只有在第一页有,
可是我需要的是每个纪录都要有标题的,要分别发给每个学生的.
 
你在标题区域不要放内容,直接把内容放在明细区域中就行了.
 
多人接受答案了。
 
后退
顶部