Page 1 of 1
Barcode lib (Cayetano's BarLib)
Posted:
Thu Aug 05, 2010 1:34 pm
by Marc Vanzegbroeck
Hello,
If FW 16bit I used a library 'barlib.lib' where I was able tu print barcodes with the command
@ 1,1 EAN13 artikel->barcode of oPrinter
Is there a simular library for FWH?
I saw there is a 'Cayetano's BarLib enhanced by Enrico', but I can't find the link to download
Thanks,
Marc
Re: Barcode lib (Cayetano's BarLib)
Posted:
Fri Aug 06, 2010 9:22 am
by kok joek hoa
Dear Marc,
give me your email , I have barlib with 32 bit.
regard
kok joek hoa
Re: Barcode lib (Cayetano's BarLib)
Posted:
Fri Aug 06, 2010 8:00 pm
by dutch
Dear kok joek hoa,
May I have too?
Thanks,
dutchez4@gmail.com
Re: Barcode lib (Cayetano's BarLib)
Posted:
Sat Aug 07, 2010 12:07 pm
by kok joek hoa
Dear Dutch,
please see your email.
thanks,
regards,
kok joek hoa
Re: Barcode lib (Cayetano's BarLib)
Posted:
Sat Aug 07, 2010 1:05 pm
by Marc Vanzegbroeck
Kok joek koa,
Can you sent it to my gmail-acount
marc.vanzegbroeck@gmail.comThanks,
Marc
Re: Barcode lib (Cayetano's BarLib)
Posted:
Sat Aug 07, 2010 2:03 pm
by kok joek hoa
Dear Marc,
I already sent to your email.
regards,
kok joek hoa
Re: Barcode lib (Cayetano's BarLib)
Posted:
Sat Aug 07, 2010 2:18 pm
by Patricio Avalos Aguirre
kok joek hoa:
Can you sent it to my gmail-acount
patricio.avalos.aguirre@gmail.comThanks
Re: Barcode lib (Cayetano's BarLib)
Posted:
Sun Aug 08, 2010 2:40 pm
by dutch
Dear kok joek hoa,
Could you please post an example for Barlib32.lib.
Thanks,
Dutch
Re: Barcode lib (Cayetano's BarLib)
Posted:
Sun Aug 08, 2010 5:53 pm
by kok joek hoa
Dear Dutch,
Barlib32.lib asa same as barlib.lib, except barlib32.lib run on 32 bit.
you can download barlib that provide from Enrico.
regards,
kok joek hoa
Re: Barcode lib (Cayetano's BarLib)
Posted:
Mon Aug 09, 2010 3:46 am
by dutch
Thanks, It will find it.
kok joek hoa wrote:Dear Dutch,
Barlib32.lib asa same as barlib.lib, except barlib32.lib run on 32 bit.
you can download barlib that provide from Enrico.
regards,
kok joek hoa
Re: Barcode lib (Cayetano's BarLib)
Posted:
Wed Aug 11, 2010 6:26 pm
by Rick Lipkin
Dutch
If you need the Barlib code .. send me a note .. I have the .prg's you can re-compile .. here is a sample snipit of code I use to print a 3 of 9 barcode :
Rick Lipkin
r1.1955@live.com- Code: Select all Expand view
#INCLUDE "FIVEWIN.CH"
#INCLUDE "BARCODE.CH"
/* other non related code
...
*/
IF mVIEW = "V"
PRINTER oPRINT FROM USER ;
PREVIEW ;
NAME "PCAS Form Print"
ELSE
PRINTER oPRINT from USER ;
NAME "PCAS Form Print"
IF EMPTY( oPRINT:hDC )
MsgStop ( "Printer not Ready !" )
oDlg:END()
RETURN(NIL)
ENDIF
ENDIF
SysReFresh()
oPRINT:SetLandScape()
oFont1 := TFont():New( "ARIAL", 0, -32, .F.,.t.,90,-2,,,,,,,,,oPRINT )
xStep := oPrint:nVertRes()/100
yStep := oPrint:nHorzRes()/5
pLINE := ' '
prntline( pLINE )
oPRINT:SetFont( oFONT1 )
cBARTEXT := SUBSTR(TRIM(oRs:Fields("lname"):Value)+' ';
+TRIM(oRs:Fields("fname"):Value)+SPACE(30),1,30)
// uses barcode.lib
// first line is ssn |||||||| ||| |||||||||| <- something like this but in 3 of 9 bar code
// second line is pay period
// third line is programid
@ 100*xStep,yStep/8.0 code3_9 mSSN of oPrint SIZE -1
@ 100*xStep,yStep*1.17 code3_9 mFYPP of oPrint SIZE -1
@ 100*xStep,yStep*1.82 code3_9 oRs:Fields("progid"):Value of oPrint SIZE -1
oPRINT:SetFont( oFONT )
//--------------------------
static FUNC PRNTLINE( pLINE )
LOCAL i,nCOL
nCOL := 0
FOR i = 1 to LEN(pLINE)
oPRINT:SAY ( LINE, nCOL, SUBSTR(pLINE,i,1) , oFONT )
nCOL += nColStep
NEXT
Line += nRowStep
RETURN(NIL)
Re: Barcode lib (Cayetano's BarLib)
Posted:
Wed Aug 11, 2010 9:09 pm
by dutch
Dear Rick,
Thank you so much, I've downloaded from the forum already.