Hola Enrico aca te paso un sample de lo que estoy haciendo aver si a vos te funciona ! asi llamo a la funcion del codigo QR desde la rutina de impresion nRow+=nRowStep oPrn:say(nRow,nMargen, replicate('-',45),oFont1) nRow+=nRowStep //..Genera QR llamando a TcodeBars ) BuildQR(oPrn, nRow,nMargen ,cCo...