Is anyone printing QR codes with Fivewin? - ¿Alguien esta imprimiendo codigos QR con Fivewin?

52 views
Skip to first unread message

nicolas.dps

unread,
Aug 2, 2021, 11:30:35 AMAug 2
to
Hello
Is anyone printing QR codes with Fivewin?
If so, I would be grateful if you could tell me
1. Libraries to link
2. .CH files to include in the compilation
3. Some PRG example of how the function would be called where you can see what parameters are passed.
----------------
Hola
¿Alguien esta imprimiendo codigos QR con Fivewin?
Si asi fuese agradeceria me indicasen
1. Librerias a linkar
2. ficheros .CH a incluir en la compilacion
3. Algun ejemplo PRG de como se llamaria a la funcion donde se vea que parametros se pasan

Eduardo Motta

unread,
Aug 3, 2021, 12:22:55 PMAug 3
to
#include "fivewin.ch"

Function u_Teste()
Local cStr := "QRCODE text"
Local cFile := "arq.bmp"
Local oDlg
Local oBmp1

QRCode(cStr,cFile) // aqui vc chama a funcao passando como parametro o conteudo do QRCODE e o arquivo BMP que será gerado

DEFINE DIALOG oDlg FROM 0,0 TO 300,300 TITLE "Exibir QRCODE" PIXEL

@ 10,10 BITMAP oBmp1 FILE cFile OF oDlg Size 200,200 Pixel NOBORDER

ACTIVATE DIALOG oDlg CENTERED

Return

// link download qrcodelib.dll => http://www.emotta.com.br/qrcode/qrcode.rar
DLL32 STATIC FUNCTION QRCode(cStr As STRING, cFile As STRING) AS LONG PASCAL FROM "FastQRCode" LIB "QRCodelib.Dll"
Reply all
Reply to author
Forward
0 new messages