Italian [Risolto] QR Code [b4j]

[ivanomonti]

Ciao tutti, chi ha qualche esempio di come produrre un qr code da valore passato come ad esempio telefono!

Ho scaricato la classe ma non ho un esempio da studiare...

 

[Star-Dust]

Sul forum trovi una classe multipiattaforma creata da Erel a questo scopo

 

[ivanomonti]

Sul forum trovi una classe multipiattaforma creata da Erel a questo scopo

risolto

Private Sub QrCode(value As String) As Boolean
    Dim QRGenerator1 As QRGenerator
    QRGenerator1.Initialize(B4XImageView1.mBase.Width)
    B4XImageView1.Bitmap = QRGenerator1.Create(value)
    B4XImageView1.ResizeMode = "FILL"
    B4XImageView1.mBackgroundColor = xui.Color_White
    B4XImageView1.Update
End Sub