Sub loadktp(namafl As String)
Dim kt As Bitmap
kt.Initialize(File.DirAssets,"back2.jpg")
kt = imgKTP.Bitmap
Dim out As OutputStream
out = File.OpenOutput(LokasiImg, "A.jpg", False)
kt.WriteToStream(out, 60, "JPEG")
out.Close
End Sub
Sub loadselfie(namafl As String)
Dim sf As Bitmap
sf.Initialize(File.DirAssets,"back2.jpg")
sf = imgSelfie.Bitmap
Dim out1 As OutputStream
out1 = File.OpenOutput(LokasiImg, "B.jpg", False)
sf.WriteToStream(out1, 60, "JPEG")
out1.Close
End Sub