用delphi语句写出条形码打印程序

如何用de1phi语句写出条形码的打印程序。不用条形码控件能否写出

解决方案 »

  1.   

    能！
    看什么型号的打印机提供的api函数！
    直接调用！
      

  2.   

    一般打印机带的光盘里会有编程手册和Demo
    没有的话向那个供应商要一下就行！
      

  3.   

    俺都是用 fastreport 来打印的
      

  4.   

    API1、如果你的条形码是固定格式的话可以直接分解扫描读取的字串,否的话你得把相关资料都存在数据库里,可以把字段[编号]当作商品代码(条形码号) 2、不知你的条码是怎么形成的,如果是直接用该条码打印机的控制命令可以轻易做到(一般中文比较麻烦),如果你的条形是以其它方法形成的图,可以动态创建一个TBitmap,把它Assign到上面再用DrawText()写一些自己的内容,然后通过Printer.Canvas.StretchDraw()把整个Bibmap打印出来. 3、一般商用   EAN13码(but   它只能最多13位),   128码,93码等都可以,建议用128码.