javier buenos dias
te adjunto el foxbarcode lo dejas en la carpeta en que tienes tu
proyecto y luego en tu proyecto en el reporte que debes colocar un
campo de imagen y antes de enviar la impresión en el formulario
agregas las lineas de comando que te dejo aca
**IMPRIME EL DOCUMENTO CON EL QR
*!* *
https://vfpavanzado.wordpress.com/2018/11/05/usando-codigos-qr-en-nuestras-aplicaciones/
LOCAL lcMiTexto, lcMiArchivoImagen, loQR, lcQR_Imagen
*lcMiTexto = "BEMA01#BENITEZ#MARÍA#
bma...@hotmail.com#0981-234567#ASUNCIÓN#PARAGUAY#"
ESTE ES UN EJEMPLO DE LO QUE QUERES QUE LLEVE EL QR
lcQR_Imagen=" "
lcMiTexto =" "
*** EN LA LINEA QUE ACONTINUACION VES ES LO QUE DESEO QUE VAYA EN EL
CODIGO QR MIO
lcMiTexto ="N: "+cnfactura+"Fech: "+TTOC(cfechafac)+"NitF: "+nit_fe+;
"DocAdq: "+cnit_adq+"VFac: "+cvalfac+"Viva: "+ALLTRIM(cval_iva)+"VOIm: 0"+;
"VTFac: "+tot_fac+" CUFE:"+_cufe
lcMiArchivoImagen = Sys(5) + Curdir() + "MiImagenQR.PNG"
SET PROCEDURE TO FOXBARCODEQR ADDITIVE
loQR = CreateObject("FoxBarCodeQR")
lcQR_Imagen = loQR.QRBarCodeImage(lcMiTexto, lcMiArchivoImagen, 6, 3)
SET PROCEDURE TO
espero te sirva
El lun., 2 nov. 2020 a las 21:03, Javier Bernal
(<
jbsys...@gmail.com>) escribió:
>
> Alguien ya ha experimentado con código QR, con imagen, yo quiero iniciar con este proyecto si alguien ya inicio me uno a la investigación.
>
> Espero sus propuestas en esta semana subo mis experimentos.
>
> Gracias.
>
> --
> Visita el Blog de la Comunidad Visual FoxPro en Español:
http://comunidadvfp.blogspot.com
> ---
> Has recibido este mensaje porque estás suscrito al grupo "Comunidad de Visual Foxpro en Español" de Grupos de Google.
> Para cancelar la suscripción a este grupo y dejar de recibir sus mensajes, envía un correo electrónico a
publicesvfoxp...@googlegroups.com.
> Para ver esta conversación en el sitio web, visita
https://groups.google.com/d/msgid/publicesvfoxpro/71ef9813-686b-42e0-8aef-f977421cb917n%40googlegroups.com.