I have tried this approach, which introduces heavy shape distorsion, making the QR code unusable:
Code: Select all
InitNetwork()
UsePNGImageDecoder()
imageURL$ = "https://nsa40.casimages.com/img/2021/06/04/210604103322144271.png"
*queryresponse = ReceiveHTTPMemory(imageURL$)
img = CatchImage(#PB_Any, *queryresponse, MemorySize(*queryresponse))
CopyImage(img, imgEnlarged)
OpenWindow(0, 50, 0, 900, 300, "")
ImageGadget(350, 0, 0, 0, 0, ImageID(img))
ResizeImage(imgEnlarged, ImageWidth(img)*1.2, ImageHeight(img)*1.2, #PB_Image_Raw) ;;; enlarging by 120%
ImageGadget(351, 450, 0, 0, 0, ImageID(imgEnlarged))
Repeat : Until WaitWindowEvent() = #PB_Event_CloseWindow