如何批量打印条码？求一解决方案(200分)

我用fastReport批量生成条码，但是我觉得速度跟不上，而且我用的是专业条码打印机，用fastReport不太好控制格式，所以求一解决方案，或用其他办法也行。希望各位大侠帮帮我.具体一点

你还是用专业的条码软件吧，叫bar什么来着
可设置条码打印的速度

我这个是一套固定资产的条码应用系统，其他软件不可替代的。
再问： 如何提高打印速度？

1 你用的什么样得条码打印机？桌面型还是工厂有的那种？
2 你条码事动态的吗？

我用的是DataMaX-l-4208 ,条码是根据数据库一个编号字段产生的，
我听说可以用它自带的语言直接写串口，那样速度会很快，可是不知道如何下手，有那位朋友有这方面经验的请赐教。在此先谢过！

你可以试试我司开发的labelcool条码标签排版打印软件，是我司自主开发的，可定制开发
www.labelcool.com

不同打印机可能指令集会不同，自己参考以下说明书
***** 八种常用类型条码命令*****
（1） EAN--13
Write( lpt, CHR(28)+CHR(80)+CHR(1)+CHR(2)+CHR(2)+CHR(3)+CHR(12)+'012345678901');
（2） EAN--8
Write( lpt, CHR(28)+CHR(80)+CHR(2)+CHR(2)+CHR(2)+CHR(3)+CHR(7)+'4718290');
（3） UPC--A
Write( lpt, CHR(28)+CHR(80)+CHR(3)+CHR(2)+CHR(2)+CHR(3)+CHR(11)+'012345678900');
（4） UPC--E
Write( lpt, CHR(28)+CHR(80)+CHR(4)+CHR(2)+CHR(2)+CHR(3)+CHR(7)+'0143121');
（5） CODE--39
Write( lpt, CHR(28)+CHR(80)+CHR(5)+CHR(2)+CHR(2)+CHR(3)+CHR(8)+'*C0DE39*');
（6） INTERLEAVED--25
Write( lpt, CHR(28)+CHR(80)+CHR(6)+CHR(2)+CHR(3)+CHR(3)+CHR(4)+'3214');
（7） CODABAR
Write( lpt, CHR(28)+CHR(80)+CHR(7)+CHR(2)+CHR(2)+CHR(3)+CHR(5)+'D123D');
（8） CODE--128
Write( lpt, CHR(28)+CHR(80)+CHR(8)+CHR(2)+CHR(2)+CHR(3)+CHR(5)+CHR(137)+'C128');
例：
VAR
lpt :TextFile
begin
AssignFile( lpt, 'LPT1' );
ReWrite( lpt );
Write( lpt, CHR(28)+CHR(80)+CHR(1)+CHR(2)+CHR(2)+CHR(3)+CHR(12)+'012345678901');
Write( lpt, #12 );
//打印机换页
CloseFile( lpt );
END

条码打印指令格式
　 ASC II： Fs p n s h m k d1 d2… dk
　 十进制码： 28 80 n s h m k d1 d2…dk
　 十六进制码： 1C 50 n s h m k d1 d2…dk

AssignFile( lpt, 'LPT1' );
请问"LPT1",是什么意思，是打印机端口吗？
我的条码机，用的是“Com1”口，是不是要把“LPT1”改成"Com1"呀，请指教。

是这样的

我做了一个用来从数据库里调数据出来批量打卡的，也是用FR做的，可以调格式呀，感觉还可以呀，你是觉着怎么不方便法呢？

不是不好用，只是速度太慢
我想用打印指令应该快一点