Is there any code examples on how to print QR Codes from FiveWin. I have to add a QR Code to an invoice and I am not sure where to start.
Thanks,
last Sample seems to show how to print "qr-code"c:\fwh\samples\qrcode.prg
c:\fwh\samples\barcod01.prg
c:\fwh\samples\pdfharu1.prg
Definir:
REQUEST FWZEBRA
Opción 1:
// Genero e Imprimo Codigo QR.
hBmp := FW_BarCodeBmp( "www.prueba.com","QRCODE", 200, 200 )
@ 220, 20 PRINT TO oPrn IMAGE hBmp SIZE 39.5, 24 MM
Opción 2:
// Imprimo codigo QR directo.
@ 220,20 PRINT TO oPrn TEXT "www.prueba.com" + CRLF + Str(nCerti,10) + CRLF + cRut ;
AS BARCODE TYPE "QR-CODE" SIZE 39.5,24 MM
cTk := "Destino : " + AllTrim( aVar[3] ) + CRLF +;
"Origen: " + AllTrim( aVar[6] ) + CRLF +;
"Fecha/Hora: " + DToC( aVar[5] ) + " - " + aVar[4] + CRLF +;
"Monto Bs : " + Transform( cCodTk, oPi:nMo5 ) +;
"#Tickets : " + aVar[7]
hBmp := FW_BarCodeBmp( cTk, "QRCODE", 300, 300 )
FW_SaveImage( hBmp, "qr\qr_tk.jpg" )
leandro wrote:José como vas?
El QR no tiene limite de caracteres; el tema es que si lo imprimes muy pequeño, se hace difícil para la cámara reconocer los datos, agranda un poco el qr y se soluciona tu problema.
Return to FiveWin for Harbour/xHarbour
Users browsing this forum: No registered users and 99 guests