高手请进!在线等待,成功现场给分!!!(200分)

  • 主题发起人 主题发起人 月河
  • 开始时间 开始时间

月河

Unregistered / Unconfirmed
GUEST, unregistred user!
各位高手,小子小有个问题!!!
我使用的是EPSON TM-U210D小票打印机,打印机后接有一个钱箱,
请问怎么通过程序把钱箱打开,我使用如下
var
mytext : TEXTfile;
begin
assignFile(mytext,'Lpt1');
rewrite(mytext);
Writeln(mytext,chr($b)+chr(27)+'K'+chr(40));
Closefile(mytext);
end;
可是打不开,各位大哥,大姐,怎么样做啊>?????
 
你还是看看这个打印机的说明书吧,里面应该有方法的.
 
Writeln(mytext,chr($b)+chr(27)+'K'+chr(40));
会不会是命令串的顺序不对呀?
 
现在主要的问题是大家如果没用过这款打印机都不知道呀.
之所以你得把开钱箱的那些说明贴出来呀.这样还有可能知道你的代码对不对的.
 
http://www.delphibbs.com/delphibbs/dispq.asp?lid=2545091
 
这个问题,我已经自己解决了
 
叫版主收分吧,不過好像這個要求是奢望的~~~[:D]
 

Similar threads

后退
顶部