跪求 LQ150k 的相关信息 ,特别是 退纸 命令啊 在线等啊 100分 ( 积分: 100 )

跪求 LQ150k 的相关信息 ,特别是 退纸 命令啊 在线等啊 100分

跪求 LQ150k 的相关信息 ,特别是 退纸 命令啊 在线等啊 100分

没人知道啊

http://www.delphibbs.com/delphibbs/dispq.asp?lid=2231196
标题： 如何控制打印机进退纸？ (50分)

－－－－－－－－－－－－－－－－－转自网络
进纸：
var
MyFile: TextFile;
strTemp : WideString;
begin
Assignfile(MyFile,'lpt1');
Rewrite(MyFile);
strTemp := chr($b)+chr(27)+'J'+chr(140);
writeln(MyFile, strTemp);
System.CloseFile(MyFile);
end;

退纸：
var
MyFile: TextFile;
strTemp : WideString;
begin
Assignfile(MyFile,'lpt1');
Rewrite(MyFile);
strTemp := chr($b)+chr(27)+'K'+chr(40);
writeln(MyFile, strTemp);
System.CloseFile(MyFile);
end;


这个有用不

不对 啊 兄弟
你那是u220b的啊
这个lq150k 不太一样啊
连用户手册上 都没有 退纸命令啊

散分 了啊
不晓得的 帮忙顶啊
也有分啊

接受答案了.