请教在Delphi环境下编写票据打印机报表的问题。请做过商场系统的朋友回答。 (100分)

  • 主题发起人 主题发起人 simon_jyw
  • 开始时间 开始时间
S

simon_jyw

Unregistered / Unconfirmed
GUEST, unregistred user!
我正在做一个类似与商场系统的程序,但是在做一个票据打印机的报表的时候出了问题。
我的报表做好了,在大的喷墨打印机上可以正常打印出来,但是在票据打印机上打出来的
就是乱码了。我现在用的时Delphi5.0,打印机型号是EPSON TM210A (Model TU-119A)。
由于我没有做过票据打印机的报表,所以不知道在程序上有什么是没有设置好的。请各位
大虾指教。
我的打印报表宽度设为:70mm。我用的是QReport做的报表。请问出了什么问题?
 
先安装EPSON TM210A 的驱动。
try
Assignprn(F);

Rewrite(F);
Writeln(F, '----------------------------------------');
Writeln(F, '超市代码:'+mdbh+' '+datetimetostr(date);
Writeln(F, '收款机:'+skjh+' '+'收款员:'+skyh+' '+'交易号:'+'0000001');
Writeln(F, ' 货号 品名 数量 金额 ');
Writeln(F, '----------------------------------------');
Writeln(F, '商品总件数: '+'5');
Writeln(F, '应收金额(人民币): '+'50.20'+'元');
Writeln(F, '实收金额(人民币): '+'60.00'+'元');
Writeln(F, '找零金额(人民币): '+'9.80'+'元');
CloseFile(F);
except
on EInOutErrordo
MessageDlg('打印机输出错误.', mtError, [mbOk], 0)
end;
有谁能够不安装驱动,而直接调用它里面的字库打印汉字的不。
 
我用的是QReport,用Writeln可以吗?这不是文件的读写程序吗?
 
我也想知道,学习学习
 
票据打印机要直接写段口呀
 
呵呵,如果做得完美一点得自编打印程序,推荐:DELPHI 4开发大全。
 
可参考 《DELPHI 4 开发大全》里面的打印章节,第十章,这本书可到超星图书馆里找
 
我是做商业MIS的,EPSON TM210A没有硬字库,你可以到驱动之家下一个驱动EPSON TM210D中
有TM210A的驱动。另外,我的前台是用C++Builder写的,我先将数据存成一个文本。然后
写入端口。
 
主要是打印机的驱动的问题,建议你看看这种打印机的特性,还有就是,最好在
打印机的纸张属性里面设定为“自定义”,可以解决好多问题
 
这种打印问题我觉得最好使用OPOS来做,这是零售行业的外设接口标准,
EPSON就有OPOS下载。
基本上所有零售设备厂商都支持OPOS标准,所以建议这么做,使系统的移植性会比较好。
 
多人接受答案了。
 
老吊說的不錯
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
D
回复
0
查看
1K
DelphiTeacher的专栏
D
D
回复
0
查看
1K
DelphiTeacher的专栏
D
D
回复
0
查看
1K
DelphiTeacher的专栏
D
后退
顶部