B4X:
Sub AppStart (Form1 As Form, Args() As String)
MainForm = Form1
MainForm.RootPane.LoadLayout("1") 'Load the layout file.
MainForm.Show
Dim qr As QRGenerator
qr.Initialize(ImageView1.Width)
BmpQR = qr.Create("B4X QR Generator!!!")
logo = xui.LoadBitmapResize(File.DirAssets,"c2.png",250,250,False)
ImageView1.SetBitmap(BmpQR)
ImageView2.SetBitmap(CreateRoundBitmap(logo,200))
End Sub
I would like to resize the image so that the qrcode will be still readable and place at center.
And is it possible to change the color in the part of the generated qrcode like below?