 |
如果安装了Office2000，则在Program Files\Microsoft Office\Office\目录下可以找到Msbcode9.ocx 及 Msbcode9.hlp条形码控件。
李海注：如果在目录中找不到该控件，说明安装的时候没有选择。可以再运行安装程序，并在Access 2000下找到Barcode控件项。安装后在Visual Basic等软件中显示为Microsoft Barcode Control 9.0。Office97没有该控件，但Office XP中包括了这个控件，仍然为Msbcode9.ocx。
在PB7中,Insert -> Control ->OLE...
出现Insert Object对话框
选择Insert Control页
单击Register New 指定..\office\Msbcode9.ocx 路径
(或run: regsvr32 c:\office2k\office\Msbcode9.ocx)
(好象不重新注册不能在VB & PB... 中使)
代码:
long Job
Job = PrintOpen( )
Ole_1.border=false
ole_1.Print(Job, 500,1000)
PrintClose(Job)
Ole_1.border=true
效果不错!
虽然Msbcode9.ocx本身没有Print方法,但PB中的OLE容器有Print方法(意外)。
反问: 在 VB & Delphi 中怎样实现打印 条形码控件(最好别用PictureBox) 呢？
主持人注：可以使用控件，参考QA001319 "在VFP中怎样打印条形码"。
在http://www.torry.net/barcodes.htm可以找到Delphi的免费控件。
supercmm: 在用Microsoft Barcode Control 9.0时，请问如何修改条码的数值？
李海：Value 属性是实际上用以指定产生条形码符号的值。
 zeng的意见：
可以安装barcode字体，这样就可以在任何text或label控件中使用条形码了。例如：http://www.squaregear.net/fonts/free3of9.shtml。
郑茂强的意见：
目前打印条码的打印机有很多，你提到的是“条形码打印机如何驱动”如果是用Argox可以安装PPLA.DLL然后用PPLA.DLL内建函数打印,这里有个Argox打印函数库下载，也有例子说明.
http://www.argox.com.cn/downloads/Library/Library3.03.exe
如果你是用TSC的函数要用TSC.DLL
赵敏的意见：
若使用Delphi，则第三方控件fast report(http://www.fast-report.com/)中有一打印条形码的控件，在fast report的设计器中。
此问题由于溪玥回答。
附加关键字：编程, 源程序, programming, source code, Delphi, VCL, Borland, Power Builder, PB, sybase, Visual Basic, VB, 打印与报表, print, report crystal report, active report。
|
如何打印条形码
