Seríais tan amables de construir este ejemplo en vuestro PC y compartir aqui el resutado ?
muchas gracias!
Code: Select all | Expand
#include "fivewin.ch"
REQUEST FWZEBRA // required for barcodes
function Main()
local oPrn, cText := "Texto a QR"
PRINT oPrn
PAGE
@ 2,2 PRINT TO oPrn TEXT cText AS BARCODE TYPE "QR" SIZE 2,2 INCHES
ENDPAGE
ENDPRINT
return nil
