Dim xui As XUI
Dim img As B4XBitmap
img = xui.LoadBitmap(dir,File)
img = img.Rotate(90)
Dim Out As OutputStream
Out = File.OpenOutput(dir, File, False)
img.WriteToStream(Out, 100, "JPEG")
Out.Close
Dim xui As XUI
Dim img As B4XBitmap
img = xui.LoadBitmap(dir,File)
img = img.Rotate(90)
Dim Out As OutputStream
Out = File.OpenOutput(dir, File, False)
img.WriteToStream(Out, 100, "JPEG")
Out.Close