怎样让打印不换页?(50分)

  • 主题发起人 主题发起人 Serena
  • 开始时间 开始时间
S

Serena

Unregistered / Unconfirmed
GUEST, unregistred user!
我希望在打印完后不换页,以便继续打印其他的内容.
可是每次都是要走完一页纸,怎么才能办到?
 
直接用printer对象控制输出到打印机,

用printer.begin
doc开始,
其间不用printer.newpage,
最后来一个printer.enddoc, 真正开始打印内容就可以了.
 
能不能全使用Qreport控件的。用printer对数据库操作来说太麻烦了。
 
但是在enddoc之后就会换页,我想在enddoc
之后继续在同一页打印一些内容,是连在一起打.
怎么办到?
 
自定义纸张为你的实际纸的 一半
打一页这个内容,再打一页那个内容,实际打的2页加起来就是真正纸的 1 页
 
delphi给的Tprinter以页为单位的封装好了
这样也许可以
type TMyPrinter=class(Tprinter)
public
wlq:HDC;
procedure start;
procedure end;

procedure 一行送打印机
procedure 送回车和换行符
end;

笨笨的方法,呵呵
 
使用字符直接驱动。
 
接受答案了.
 

Similar threads

D
回复
0
查看
867
DelphiTeacher的专栏
D
D
回复
0
查看
836
DelphiTeacher的专栏
D
后退
顶部