Power Builder - Generar Código QR

 
Vista:
Imágen de perfil de Adolfo
Val: 250
Bronce
Ha mantenido su posición en Power Builder (en relación al último mes)
Gráfica de Power Builder

Generar Código QR

Publicado por Adolfo (199 intervenciones) el 17/09/2021 01:12:27
Por si necesitan generar código QR en PB es mas sencillo de lo que parece.

Primero declaramos 2 Funciones globales externas(la segunda FullQRCode es opcional, yo no la utilizo pero se las dejo):

1
2
Function Boolean FastQRCode(String Texto,String FileName) Library "QRCodeLib.dll" ALIAS FOR "FastQRCode;Ansi"
Function Boolean FullQRCode(Integer AutoConfigurate,Integer AutoFit,Long Back, Long BarColor,String Texto,Integer CorrectionLevel,Integer Encoding,Integer MarginPixels,Integer ModuleWidth,Integer Heig,Integer Widt,String FileName) Library "QRCodeLib.dll" ALIAS FOR "FullQRCode;Ansi"

Para el botón Generar QR:
1
2
3
FileDelete("CodigoQR.bmp")
FastQrCode(sle_dato.text,"CodigoQR.bmp")
p_code.picturename = "CodigoQR.bmp"

Para el botón FULL QR:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Long ll_backcolor
Integer li_corrlevel, li_encoding, li_margin, li_modwith
 
FileDelete("CodigoFull.bmp")
 
if rb_blanco.checked   then ll_backcolor = 16777215
if rb_amarillo.checked then ll_backcolor = 65535
if rb_azul.checked     then ll_backcolor = 16728833
 
li_corrlevel = 1
li_encoding  = 1
li_margin    = 1
li_modwith   = 10
FullQRCode(1,1,ll_backcolor,0,sle_dato.text,li_corrlevel,li_encoding,li_margin,li_modwith,400,400,"CodigoFull.bmp")
 
p_code2.picturename = "CodigoFull.bmp
CodigoQR
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
1
Responder

Generar Código QR

Publicado por ANTONIO (1269 intervenciones) el 19/09/2021 05:00:49
Hola Adolfo:

Excelente aportación y mil gracias por compartirlo...

Tengo una pregunta, en esta librería se puede agregar una imagen al QR?...

He visto muchos lugares que sus QR llevan su logo en medio de la imagen del QR.


Saludos,
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
Imágen de perfil de Adolfo
Val: 250
Bronce
Ha mantenido su posición en Power Builder (en relación al último mes)
Gráfica de Power Builder

Generar Código QR

Publicado por Adolfo (199 intervenciones) el 20/09/2021 15:18:40
Lo que yo intentaría en tu lugar es mandar imprimir el codigo con PrintJob un Group Box (gb_gr) dentro de este group box colocas el Picture del Qr y dentro de este picture (encimado) otro picture que es la imagen que quieres, intenta leerlo porque no se si esto afecte la lectura del QR, eso es lo que yo intentaría


1
2
3
4
5
6
ULong Job
Boolean lb_setup
 
Job = PrintOpen("Codigo QR Pedido",True)
gb_qr.Print(Job,10,1)
PrintClose(Job)
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

Generar Código QR

Publicado por bunker (118 intervenciones) el 23/09/2021 05:23:15
Hola
Además de lo que Adolfo nos dice

Si usas PB2019 Puedes Usar la Api de Google
Tambien en Codexchanged en Appeon hay una app QRCodeGenerator con una dll incluida


saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
sin imagen de perfil

Generar Código QR

Publicado por Clark (5 intervenciones) el 30/09/2021 05:03:17
Buenas Tardes
Por favor me podrías ayudar sobre generar QR
He seguido tus indicaciones como hacerlo en Power builder
Al ejecutar el programa cuando presiono el boton de generar QR sale un error en la linea 2 que es justo donde llamo la función FastQrCode(sle_dato.text,"CodigoQR.bmp")

Yo trabajo con Power builder 9
Con un windows 7 64bits

nota.-Tambien quise registrar el
regsvr32.exe c:\windows\SysWOW64\qrcodelib.dll pero no me deja
No es necesario registralo ?


Gracias
Clark






error
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
Imágen de perfil de Adolfo
Val: 250
Bronce
Ha mantenido su posición en Power Builder (en relación al último mes)
Gráfica de Power Builder

Generar Código QR

Publicado por Adolfo (199 intervenciones) el 30/09/2021 15:25:52
No es necesario registrar la .dll PERO si debe estar en la misma carpeta donde esta corriendo de programa.

Ya lo hice en PB 12.6, lo compilé a 32 bits y lo corri en una maquina con W7 a 64 bits y funcionó bien.

Te recomiendo que instales PB 12.6,

https://drive.google.com/file/d/1aGmqQCHkq3YUDjzOekO4SkFo9YDM3wbn/view
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
sin imagen de perfil

Generar Código QR

Publicado por pbman (2 intervenciones) el 30/09/2021 19:29:59
Por favor, ¿pueden ayudarme? Necesito darme un archivo listo para usar en la versión 12.6 porque intenté hacer el ejemplo, pero al ejecutar, aparece un mensaje de error como está en los archivos adjuntos.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
Imágen de perfil de Adolfo
Val: 250
Bronce
Ha mantenido su posición en Power Builder (en relación al último mes)
Gráfica de Power Builder

Generar Código QR

Publicado por Adolfo (199 intervenciones) el 30/09/2021 19:40:19
Lo que significa ete mensaje de error es 1 de 2 cosas:

No has definido la función el área de Global external funcions
ó
El archivo qrcodelib.dll no este en la misma carpeta donde esta ejecutandose tu aplicación

o talvez las 2
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
Imágen de perfil de Adolfo
Val: 250
Bronce
Ha mantenido su posición en Power Builder (en relación al último mes)
Gráfica de Power Builder

Generar Código QR

Publicado por Adolfo (199 intervenciones) el 30/09/2021 21:11:56
No te entiendo lo que quieres hacer.

Si tu caso codificar un qr con caracteres que no sean los UTF-8 entonces no se
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
sin imagen de perfil

Generar Código QR

Publicado por Clark (5 intervenciones) el 30/09/2021 21:59:13
Muchas Gracias por tu ayuda
Hice lo que me comentaste es decir instale el power builder 12 y ahora si funciona

Pero a generar el código QR sale es q una Demo ,sabes donde puedo adquirir esta dll sin este aviso

Atte.
Clark
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
Imágen de perfil de Adolfo
Val: 250
Bronce
Ha mantenido su posición en Power Builder (en relación al último mes)
Gráfica de Power Builder

Generar Código QR

Publicado por Adolfo (199 intervenciones) el 30/09/2021 22:48:33
El QR o PB, porque he estado utilizando el QR y nunca me ha aparecido que que es un demo.

Si es el PB y descargaste de la liga que te pase, ahi viene el crack
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
sin imagen de perfil

Generar Código QR

Publicado por Clark (5 intervenciones) el 01/10/2021 00:32:53
Tenías razón , fue error mío

ya sale correctamente el QR

Gracias



qrver
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar