Delphi如何用ESC/POS指令打印?(TP POS58热敏票据打印机)(50分)

  • 主题发起人 CPU风扇
  • 开始时间
C

CPU风扇

Unregistered / Unconfirmed
GUEST, unregistred user!
Delphi如何用ESC/POS指令打印?(TP POS58热敏票据打印机)
给个例子行么?
就比如打一行“我是中国人”,代码怎么写?
先谢了!
 
這個我會但這是商業秘密﹐不能告訴你。
提醒你win98以下的版本才支持這種指令
打印。找個匯編的例子吧
 
不会那么严重吧?
只是写个小小的范例而已啊
 
直接输出到打印口就可以了
var
Port: TextFile;
...
begin

AssignFile(Port, 'LPT1');
Rewrite(Port);
Writeln(Port, '打印内容');
....
CloseFile(Port);
end;
 
如果机子是在局域网的另一台机子呢?怎么做?
不够分的话,可以另外再加
 
先用use net 命令。。影射到你的机子。。
在按上面的
就可以了。。
 
如果是多台打印机,如何指定某一台?
谢谢了
 
每台打印机都有端口的呀,如'Lpt1';的
AssignFile的时候FileName就是端口呀,
不过这种直接打印的方法不是很好,
呵呵~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
 
我是说打印机是装在局域网的另一台机子,我是否也可以用"Write"来打印?
 
可以映射网络打印机嘛
 
用 leejames 的 “直接输出到打印口”
如何去控制字体大小呢?
 
楼上各位, 我的程序要在访问网络打印机(热敏,连接在打印服务器上)
怎么办呢?
请各位帮忙,谢谢!
http://delphibbs.com/delphibbs/dispq.asp?lid=2487152
到这里拿分
 
to crazypc,能不能告诉我怎么使用use net 命令
 
顶部