Private Sub llc_PictureTaken(Data() As Byte) ' OK flip matches phone camera preview, but the image is now rotated vertically
If Data.Length = 0 Then Return
Dim In As InputStream
In.InitializeFromBytesArray(Data, 0, Data.Length)
Dim bmp As Bitmap
bmp.Initialize2(In)
In.Close
Log("Image size: " & bmp.Width & "x" & bmp.Height)
If bmCEf.IsInitialized = False Then
bmCEf.Initialize
End If
Dim flippedBmp As B4XBitmap = bmCEf.FlipHorizontal(bmp)
If flippedBmp.IsInitialized Then
ImageView1.Bitmap = flippedBmp
Log("Flipped image set...