SATO打印机软件开发

[win2000pega]

请问谁开发过SATO打印机的软件，我需要一个例子。

[zhushudo]

不明白

[darkliu]

关于SATO打印设备编程，标准都是按照SATO指令集SPL语言来进行，具体指令标准可以参考相关光盘。通过指令控制是一种相对底层的打印方式，可以获得较快的打印速度和稳定性能。也可以利用WINDOWS下的驱动程序，来控制打印机，这样编程工作相对于简化，不过要有可生成条码的控件或者DLL。

[win2000pega]

To=darkliu
多谢指点，能给一个SATO打印机使用指令的例子吗？

[zhushudo]

可以使用直接命令输出的方法。

用WRITELN语句输出。

Assignfile(f,'LPT1');
rewrite(f);
{初始化打印机}
Write(f,chr(27)+'@'); //Chr(27)+'@' 即ESC @ 指令
{设置汉字显示方式}
write(f,chr(28)+chr(ord('&'))); //Chr(28) 即 FS
{设定打印相对水平位置}
Write(f,chr(27)+chr(ord('\'))+chr($CF)+chr($00));
//设置高速打印
//write(f,chr(28)+chr(ord('x'))+chr($01));

Writeln(f,PrintChannel+space(16)+Auserid+space(12)+carType);
Writeln(f);
write(f,chr(27)+chr(ord('\'))+chr($CF)+chr($00));
Write(f, AMoney);
Writeln(f,Space(26)+PrntTicketno);
Writeln(f);
write(f,chr(27)+chr(ord('\'))+chr($CF)+chr($00));
//Writeln(f);
Writeln(f,Apntdate+Space(12)+ApntTime);
//顺时针走纸控制
Writeln(f,chr(27)+chr(ord('J'))+chr($FF));
Writeln(f,chr(27)+chr(ord('J'))+chr($20));

flush(f);
Closefile(f);