iOS Question Decode bitmap to base64 string

[borofan]

hey, anybody worked out how to encode a bitmap to a base64 string in b4i?

 

[Erel]

It is the same as in B4A:

Sub ImageToBase64(img As Bitmap) As String
   Dim su As StringUtils
   Dim out As OutputStream
   out.InitializeToBytesArray(0)
   img.WriteToStream(out, 100, "JPEG")
   Return su.EncodeBase64(out.ToBytesArray)
End Sub