info
Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss
Is anyone printing QR codes with Fivewin? - ¿Alguien esta imprimiendo codigos QR con Fivewin?
60 views
Skip to first unread message
nicolas.dps
Aug 2, 2021, 11:30:35 AM8/2/21
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
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
Aug 3, 2021, 12:22:55 PM8/3/21
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"
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"
0 new messages