R runcow Unregistered / Unconfirmed GUEST, unregistred user! 2004-02-16 #1 在Delphi中如何执行ESC/POS指令打印东西? 在线等待!
流 流云飘雪 Unregistered / Unconfirmed GUEST, unregistred user! 2004-03-02 #2 var F:System.Text; begin AssignFile(F,'LPT1'); Rewrite(F); Printer.Canvas.Font.Name:='宋体'; Printer.Canvas.Font.Size:=9; Writeln(F,StringOfChar(' ',6)); Writeln(F,'时间:'+FormatDateTime('mm"月"dd"日" hh:mm', Now)); System.CloseFile(F); end;
var F:System.Text; begin AssignFile(F,'LPT1'); Rewrite(F); Printer.Canvas.Font.Name:='宋体'; Printer.Canvas.Font.Size:=9; Writeln(F,StringOfChar(' ',6)); Writeln(F,'时间:'+FormatDateTime('mm"月"dd"日" hh:mm', Now)); System.CloseFile(F); end;
W wwwwb Unregistered / Unconfirmed GUEST, unregistred user! 2004-03-02 #3 var F:TEXTFILE; begin ASSIGNFILE(F,'LPT1'); REWRITE(F); WRITELN(F,chr(27) '@'); //initial the printer WRITELN(F,'TEST1 FIRST LINE'); WRITELN(F,chr(12)); // move the paper to a new page CLOSEFILE(F);
var F:TEXTFILE; begin ASSIGNFILE(F,'LPT1'); REWRITE(F); WRITELN(F,chr(27) '@'); //initial the printer WRITELN(F,'TEST1 FIRST LINE'); WRITELN(F,chr(12)); // move the paper to a new page CLOSEFILE(F);
W whbell Unregistered / Unconfirmed GUEST, unregistred user! 2004-03-05 #5 楼上各位, 我的程序要在访问网络打印机(热敏,连接在打印服务器上) 怎么办呢? 请各位帮忙,谢谢!