image is rotated when bitmap is loaded in the imageview

Hi,

Code:

  Sub chooser_Result (Success As Boolean, Dir As String, FileName As String)
If Success Then
Dim bmp As Bitmap
        bmp.Initialize(Dir, FileName)
        imgFoto.Bitmap = bmp
End If
.
.
.  

The image in the chooser is shown right, no matter if the picture was taken portrait or landscape or if it is a screenshot.

I've tried using the ExifData library, but orientation returns always 0:

Code:

  Dim exif As ExifData
Dim sOrientation As String...  

image is rotated when bitmap is loaded in the imageview

from B4X Community - Android, iOS, desktop, server and IoT programming tools http://ift.tt/2boo5h5
via IFTTT