如何做到不分页打印？(100分)

P

pbz

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-11-28

• #1

我用的打印机是牵引式入纸得，现在有一份报表，想不分页得打印，即页和页之间无空行。
我用的是f1book，打出来自动分了页，将Printer.pringButtonMargin := 0,Printer.PrintopMarGin := 0 都不成功。
请高手指教，是程序问题，还是打印机的问题？

 

C

ChaseSun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-11-29

• #2

设一个变量y，记录打印的纵坐标.
if y+行高>Printer.PageHeight then
begin
y:=0;
Printer.NewPage;
end;

 

P

pbz

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-11-29

• #3

ChaseSun: 现在我不是不能正确分页，是分页后的页头，和前一页的页脚的空白不想要，想整页都打印上内容。有办法马？

 

C

ChaseSun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-11-29

• #4

你是用什么打印控件的？

 

P

pyzfl

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-11-29

• #5

设置上下页边距为0，差不多是不分页。

 

C

ChaseSun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-11-29

• #6

看情况是不能使用加印控件了，看情况须直接用TPrinter类了：
Printer.begin
doc;
printer.textout();
printer.enddoc;