[Harbour-users] Anyone know of a Clipper BARCODE funcs?

[Bruno Luciani]

Massimo it is posible to use this fonts and code sample in linux ?

Bruno


2010/1/31 Massimo Belgrano <mbelgrano at deltain.it>

> One way for printing barcode code 128 symbologies  is use font
> here you can find a open source solution
> http://sourceforge.net/projects/openbarcodes/
> here a commercial solution http://www.barcodesoft.com/code128_font.aspx
>
> Folllow a untested sample
>
> oPrn := win_prn():New(GetDefaultPrinter())
> oPrn:SetFont("code128",11,,,,255)  // please try different   value
>  oPrn:TextOut("ÑABC!Ó",.t.)   // TEXT ready to TO PRINT
>  oPrn:TextOut(code128("ABC"),.t.)   // TEXT TO PRINT IF YOU HAVE CONVERT
> FUNC
> oPrn:NewPage()
>