关于打印的,很简单,进来看一下! (100分)

W

wlyft

Unregistered / Unconfirmed
GUEST, unregistred user!
我使用以下语句会使打印机打印完把纸退出来!
但我要使打印机打印完后纸不退出保留在原位,有打印任务再继续打印,语句怎么写?
printer.begin
doc;
printer.canvas.TextOut(20,(1+printer.canvas.textheight('cctv'))*cctv33_pageline,cts[line]);
printer.enddoc;
printer.enddoc去掉会在右下角显示一个打印机图标,但是打印机就是不打印!
 
打印完不走纸只能在针式打印机能够实现,在其它的如激光等打印机等则不行
 
我就是使用针式的,怎么写代码!
 
我就是使用针式的,怎么写代码!
 
来人说说看!
 
再来回答一下吧!
 
这个有点意思学习一下。
 

VAR
lpt :TextFile
begin
AssignFile( lpt, 'LPT1' );
ReWrite( lpt );
Write( lpt, '打印测试' );
Write( lpt, #12 );
//打印机换页
CloseFile( lpt );
END
 
不太清楚
 
你不用enddoc,直接用printer.abort就应该可以了,你试一下
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
I
回复
0
查看
638
import
I
顶部