Step 1: convert the image to base 64 encoding. I did it with B4J:
B4X:
Dim su As StringUtils
Dim b() As Byte = File.ReadBytes("C:\Users\H\Downloads\111789.png", "")
File.WriteString("C:\Users\H\Downloads", "img.txt", su.EncodeBase64(b))
Step 2: decode it:
B4X:
Dim su As StringUtils
Dim b() As Byte = su.DecodeBase64(File.ReadString(File.DirAssets, "img.txt"))
Dim img As Bitmap
Dim in As InputStream
in.InitializeFromBytesArray(b, 0, b.Length)
img.Initialize2(in)