打印汉字乱码，急急急！！！在线等待 ( 积分: 100 )

VAR
lpt :TextFile;
begin
AssignFile( lpt, 'LPT1' );
ReWrite( lpt );
Write( lpt, #28#38 );
//设置汉字打印
Write( lpt, '123打印测试!' );
//Write( lpt, #12 );
//打印机换页
Writeln(lpt, #13#10);
CloseFile( lpt );
end;

我用的是star ar970打印机，用上面代码打印（delphi 7），打印出汉字是乱码，数字都对，谁能帮小弟解决一下，跪谢了。

有3种可能的原因:一,打印机无内置字库;二,控制码不正确;三,打印机未设置成中文
解决方法:
第一种,基本无解.但AR970应该有内置字库的.
第二种,再查查相关的控制码的资料
第三种,看看AR970的操作说明,调整一下打印机