Ver Mensaje Individual
  #1131  
Antiguo 20-07-2021
NVS NVS is offline
Miembro
 
Registrado: jun 2021
Posts: 10
Reputación: 0
NVS Va por buen camino
Cita:
Empezado por batuzail Ver Mensaje
Hola,
Yo lo que hago es usar una dll quricol32.dll y con este sencillo ejemplo genero el QR
Código Delphi [-]
Option Explicit
 
Private Enum TErrorCorretion
    QualityLow
    QualityMedium
    QualityStandard
    QualityHigh
End Enum
 
Private Declare Sub GenerateBMP _
                Lib "C:\Temp\quricol32.dll" _
                Alias "GenerateBMPW" ( _
                ByVal FileName As Long, _
                ByVal Text As Long, _
                ByVal Margin As Long, _
                ByVal Size As Long, _
                ByVal Level As TErrorCorretion)
                
Private Sub Form_Load()
    
    GenerateBMP StrPtr("C:\Temp\Example.bmp"), StrPtr("Hello world!"), 3, 5, QualityLow
    
End Sub
La puedes descargar de aqui: h t t p ://users.telenet.be/ws36637/download/quricol.zip

Como en CR no puedo usar imagenes dinámicas, lo que hago es generar el QR y guardarlo en la tabla de cabecera de factura y luego la pinto en el Report.

Saludos
Lo primero muchas gracias por tu rápida contestación!!
Y ok, entiendo lo de generar el QR con la librería y guardar la imagen, pero esto no lo he entendido:

" generar el QR y guardarlo en la tabla de cabecera de factura y luego la pinto en el Report."

guardas la imagen en la BBDD?? a eso te refieres?? lo guardas en BBDD y lo muestras como un campo mas??? Nunca he guardado imagenes en BBDD, la verdad



Saludos
Responder Con Cita