串口打印机编程 ( 积分: 80 )

我用的是siupo串口微型打印机。９６００波特率，８位，无校验
打印命令： 1、初始化打印机：格式： ASCII：ESC @
十进制: 27 64
十六进制：1B 40

2、进入汉字打印命令： 格式： ASCII：FS &
十进制: 28 38
十六进制：1C 26
。。。。。。
以下是我写的程序，可是打印时有动作，但打印出的数据全是0
procedure TForm1.Button1Click(Sender: TObject);
var
F:TEXTFILE;
begin
ASSIGNFILE(F,'COM3');
REWRITE(F);
//初始化命令
WRITELN(F,#27#64);
//设置行间距
WRITELN(F,#27#49+'0');
WRITELN(F,'12345');
CLOSEFILE(F);
end;

请问：我上面的程序错在哪儿？我该用什么方法编程？怎么用这些打印命令？希望能提供源码

直接找个SPCOMM用吧，反正你已经知道了指令集，很简单的

在控制面板，设备管理区，端口，端口设置
你看看把波特率，奇偶校验等参数设置为和打印机一样。
另外WRITELN(F,'12345');这里，看看打印机说明书，是否还需要什么特殊的前缀符之类的。

设备管理区，端口设置波特率，奇偶校验等参数设置为和打印机都要样
WRITELN(F,'12345')命令我只是想随便打印几个字符
打印机说明书只有一些打印命令，没有前缀之类的

接个分，帮你顶