如何通过delphi编程 控制条形码打印 ( 积分: 200 )

萧

萧军

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-06-05

• #1

比如我在delphi里的数据库里读出一张表来，表里有条形码号，品名，批次，尺码，数量
我要按表里的数据，从第一条到最后一条依次打印出来，打印的内容包括，条形码号，品名，批次，尺码．并且按照数量打印相应的张数，打完第一条后再接着打印第二条，张数也是该条记录的数量．我要求直接写相应的命令，然后修改命令的参数，调用命令来打印，不用fastreport,我用的是GODEX EZ-1100条码专用打印机．

 

U

ufo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-06-05

• #2

假设打印机接在并口上：
var
code_bar1: Textfile;
begin
Assignfile(code_bar1,'LPT1');
// 打开端口
Rewrite(code_bar1);
// 准备写文件
Writeln(code_bar1,'写入打印指令');
CloseFile(code_bar1);
//关闭端口
end;

打印指令手册可在条码机生产商网站上下载，不是经销商的网站，是台湾的生产厂家网站上。

 

F

flyerer1

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-07-31

• #3

有会sbpl指令(delphi+cl408e)的请与我联系,RMB结算.

 

K

kfp

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-07-31

• #4

顶一下，学习刚好用得上

 

S

soppy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2007-07-31

• #5

在机器的生产厂家的网站上,应该是有打印机二次开发的代码及指令说明.
(在买条码机时,配套光盘里也应该有)
我做过Argox条码机的接口.