Hello Infos.
Yes, this is certainly possible. Here is your code below. This coded in Windev.
The QRCode file/image needs to be in the correct format so that it can be recognized properly.
Remember, I coded this in Windev 2025. I don't know if this code is supported in earlier versions.
Regards !
QRCode example (Save it somewhere for test)
//sImage is string = fSelect(fexedir(), "", "Odaberite QR Code", "*.png"+cr+"*.jpg", "png") // For Windev
sImage is string = AlbumPicker(albumImage) // For Mobile
IF sImage = "" THEN
ToastDisplay("Niste odabrali sliku", toastShort, vaMiddle, haCenter)
RETURN
END
bc is BarCode
bc = BCDecode(sImage)
IF ErrorOccurred = False _AND_ bc.TypeBarCode = BC_QRCODE
Info("QR kod uspješno pročitan!" + CR + "Sadržaj: " + bc.Content)
Info(bc.TypeBarCode, bc.ContentType, bc.Content )
IF Lower(Left(bc.Content,4)) = "http" THEN
ShellExecute(bc.Content)
END
ELSE
Error("Nije moguće pročitati QR kod sa slike." + CR + "Mogući razlozi: neispravan format, loša kvaliteta slike, ili nepostojanje QR koda.")
END
Edited 5 time(s). Last edit at 10/17/2025 11:07AM by IsmirB.
