Function PrintBarCode()
Local oPrn
Local oBc6
printer oPrn preview
page
oBC6 := VRDBarcode():New( oPrn:hDcOut , "12345678", 80, 80, 10, 10,2 )
oBC6:lCircular:=.t.
oBC6:ShowBarcode()
endpage
endprint
return nil
Is that you mean the barlib on this forum ?
Return to FiveWin for Harbour/xHarbour
Users browsing this forum: No registered users and 20 guests