【经验分享】fastreport打印斑马条码

作者：somemak (mak) 2016-7-11 16:14:36 

打印条码主要有3种方式：

1.ZPL指令写端口。
这种方式兼容性最好，但是不够直观，修改一个条码格式，需要不断的调试。
2.fastreport报表工具。
这种方式最方便，所见即所得。但是不能用代码来控制打印速率、浓度等必要属性。
3.ole调用第三方软件。
这种方式功能最强大。版权问题。。。你懂得。。。

如果把第1，2种方式结合起来，应该是目前比较好的方式了，步骤如下：
1.用fastreport设计条码，并保存fr3报表文件。程序在打印时，写代码控制打印到文件。（这个文件用文本编辑器会看到，该文件是由ZPL指令组成）
frxReport1.PrintOptions.ShowDialog := False;//不显示打印对话框
frxReport1.PrintOptions.PrnOutFileName := sTempFile;//输出的文件名
Printer.SetPrinter(PChar(defaultPrintName),PChar(defaultPrintName),'File',0);//打印到文件，需要在uses 增加Printers

2.用文本编辑器打开打印的文件。（参考附件）
写代码修改该文件中关于左、上边距，打印速率，打印浓度的ZPL指令，具体指令请参考ZPL指令帮助文档
^LH是控制边距，^PR是控制打印速率，~SD是控制打印浓度

3.将修改好的文件，打印到条码打印机的端口
 AssignFile(tempFile, defaultPrintPort);//写端口

OK，是不是发现很简单快速？利用了fastreport的所见即所得，快速设计条码格式，然后以ZPL指令输出到条码打印机。一个新的条码格式只需要几分钟就可以交货了哦

但是请注意：用fastreport这类报表工具做的条码，只适用于精度要求不高的场合。具体情况大家试试。

希望可以帮到有需要的delphier，这么多年来，delphier越来越少了。。。

此帖子包含附件: 大小:156.5K