Qualcuno mi sa spiegare perchè il seguente spezzone di codice fa il suo sporco lavoro (ossia ruotare di 90 gradi un'immagine) ma l'immagine ruotata è ben più pesante dell'originale ?
Di un fattore circa uguale a 8 (coincidenza ?)
Precisamente da 1920x1080 e 123 KB si passa a 1080x1920 e 972 KB.
C'è un modo per ottenere lo stesso risultato senza che l'output sia così pesante ?
Grazie per l'attenzione.
Di un fattore circa uguale a 8 (coincidenza ?)
Precisamente da 1920x1080 e 123 KB si passa a 1080x1920 e 972 KB.
C'è un modo per ottenere lo stesso risultato senza che l'output sia così pesante ?
Grazie per l'attenzione.
B4X:
'--- ruoto Main.GlobalFotoXXX
Dim b1 As Bitmap
Dim B2 As Bitmap
b1=LoadBitmap(Main.folderPath, Main.GlobalFotoXXX)
B2=b1.Rotate (90)
Dim out As OutputStream=File.OpenOutput(File.DirInternal,"tmp.png",False)
B2.WriteToStream(out,"80","PNG")
out.Close
'--- debug
File.Copy(File.DirInternal, "tmp.png",Main.folderPath, "tmp_ruotato_90.png")