In Switzerland we must very soon issue invoices with QR.
Any idea how to add this possibility to CaVo 2.8 ?

Thanks
Henry

Good question Henry. I can see it becoming more and more required around the world.
I'd be interested also if anyone knows how it is done.

Craig.

Hello
Thats the reason why i moved from VO to XSharp.
XSharp has the same language like VO and has a lot of solutions in C# or other .NET languages you can easy use in your app.
If you dont like to move, mabe you can write a little EXE in XSharp and call this from VO with the parameters for the QR code, then the exe will generate a QR jpg and you can use it in VO.

Horst

Free open source QR code for Windows..

https://listoffreeware.com/open-source-qr-code-generator-software-windows/#:~:text=Zint%20Barcode%20Studio%20is%20a%20free%20open%20source,Barcode%2C%20QR%20code%2C%20Postnet%2C%20Telepen%2C%20Pharmacode%2C%20and%20more.

https://github.com/coregameHD/QRplusplus

https://www.zint.org.uk/

Hey,

A website that can generate QRs for you: https://epc-qr.eu/
response image = http string with parameters

Best regards,
Frans

Henry,

this FoxPro-Class uses a free DLL to create QR-Barcodes:
github.com/VFPX/FoxBarCodeQR

You can use the free BarCodeLibrary from that download with VO. No registration needed - that dll only has to be in the EXE-Path.

To use that dll with VO:
_DLL FUNCTION GenerateFile (cData AS PSZ, cFileName AS PSZ) AS INT PASCAL:BarCodeLibrary.GenerateFile
_DLL FUNCTION SetConfiguration (nSize AS INT, nImageType AS INT) AS INT PASCAL:BarCodeLibrary.SetConfiguration
_DLL FUNCTION LibraryVersion () AS PSZ PASCAL:BarCodeLibrary.LibraryVersion

To create your QR-Code:

SetConfiguration (4, 1))
GenerateFile (String2Psz("Das ist ein Mustertext mit QR-Code"), String2Psz("QR_Muster.jpg"))

/****
tnSize: The size of the generated image. Receives an integer between 2 and 12
2 = 66 x 66 (in pixels)
3 = 99 x 99
4 = 132 x 132
5 = 165 x 165
6 = 198 x 198
7 = 231 x 231
8 = 264 x 264
9 = 297 x 297
10 = 330 x 330
11 = 363 x 363
12 = 396 x 396

tnType: The type of the generated image file. Receives an integer between 0 and 2.
0 = BMP
1 = JPG
2 = PNG
********/

HTH

Gerhard Bunzel

Gerhard Bunzel schrieb am Montag, 28. Februar 2022 um 17:50:24 UTC+1:
> Henry,
>
> this FoxPro-Class uses a free DLL to create QR-Barcodes:
> github.com/VFPX/FoxBarCodeQR
>
> You can use the free BarCodeLibrary from that download with VO. No registration needed - that dll only has to be in the EXE-Path.
>
> To use that dll with VO:
> _DLL FUNCTION GenerateFile (cData AS PSZ, cFileName AS PSZ) AS INT PASCAL:BarCodeLibrary.GenerateFile
> _DLL FUNCTION SetConfiguration (nSize AS INT, nImageType AS INT) AS INT PASCAL:BarCodeLibrary.SetConfiguration
> _DLL FUNCTION LibraryVersion () AS PSZ PASCAL:BarCodeLibrary.LibraryVersion
>
>
> To create your QR-Code:
>
> SetConfiguration (4, 1))
> GenerateFile (String2Psz("Das ist ein Mustertext mit QR-Code"), String2Psz("QR_Muster.jpg"))
>
> /****
> tnSize: The size of the generated image. Receives an integer between 2 and 12
> 2 = 66 x 66 (in pixels)
> 3 = 99 x 99
> 4 = 132 x 132
> 5 = 165 x 165
> 6 = 198 x 198
> 7 = 231 x 231
> 8 = 264 x 264
> 9 = 297 x 297
> 10 = 330 x 330
> 11 = 363 x 363
> 12 = 396 x 396
>
> tnType: The type of the generated image file. Receives an integer between 0 and 2.
> 0 = BMP
> 1 = JPG
> 2 = PNG
> ********/
>
>
> HTH
>
> Gerhard Bunzel
Hello,

i cant get a readable QR-Code. Can you please help with this?
cBC:="BCD"+CRLF
cBC+="001"+CRLF
cBC+"1"+CRLF
cBC+="SCT"+CRLF
cBC+=oSelect:FIELDGET(#BIC)+CRLF
cBC+=AllTrim("MeinKunde")+CRLF
cBC+=oSelect:FIELDGET(#IBAN)+CRLF
cBC+="EUR"+StrSQL(oDCSleWErt:VALUE,2)+CRLF
cBC+="RECH"+CRLF
cBC+=StrSQL(_dwRechDruckNr,0)

SetConfiguration (12, 2)
GenerateFile (String2Psz(cBC), String2Psz(WorkDir()+"\QRCode.png"))

thanks!

On Tuesday, March 1, 2022 at 3:50:24 AM UTC+11, Gerhard Bunzel wrote:
> Henry,
>
> this FoxPro-Class uses a free DLL to create QR-Barcodes:
> github.com/VFPX/FoxBarCodeQR
>
> You can use the free BarCodeLibrary from that download with VO. No registration needed - that dll only has to be in the EXE-Path.
>
> To use that dll with VO:
> _DLL FUNCTION GenerateFile (cData AS PSZ, cFileName AS PSZ) AS INT PASCAL:BarCodeLibrary.GenerateFile
> _DLL FUNCTION SetConfiguration (nSize AS INT, nImageType AS INT) AS INT PASCAL:BarCodeLibrary.SetConfiguration
> _DLL FUNCTION LibraryVersion () AS PSZ PASCAL:BarCodeLibrary.LibraryVersion
>
>
> To create your QR-Code:
>
> SetConfiguration (4, 1))
> GenerateFile (String2Psz("Das ist ein Mustertext mit QR-Code"), String2Psz("QR_Muster.jpg"))
>
> /****
> tnSize: The size of the generated image. Receives an integer between 2 and 12
> 2 = 66 x 66 (in pixels)
> 3 = 99 x 99
> 4 = 132 x 132
> 5 = 165 x 165
> 6 = 198 x 198
> 7 = 231 x 231
> 8 = 264 x 264
> 9 = 297 x 297
> 10 = 330 x 330
> 11 = 363 x 363
> 12 = 396 x 396
>
> tnType: The type of the generated image file. Receives an integer between 0 and 2.
> 0 = BMP
> 1 = JPG
> 2 = PNG
> ********/
>
>
> HTH
>
> Gerhard Bunzel

Thanks Gerhard, it works like a charm!

Kind Regards, Craig Dawson