Codice per un'applicazione Windows con anteprima dell'immagine ridimensionata in una picturebox e salvataggio differito.
codice:
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Dim x As New ArtLabs.Pictures.Engine
Dim ImmagineGrande As Bitmap
ImmagineGrande = New Bitmap("C:\percorsofile.jpg")
PictureBox1.Image = x.ResizeImage(ImmagineGrande, New Size(200, 300), True)
x.SaveToDisk(PictureBox1.Image, "c:\percorsodidestinazione.jpg", System.Drawing.Imaging.ImageFormat.Jpeg, 100)
x.Dispose()
x = Nothing
End Sub
Codice per un'applicazione web con ridimensionamento e salvataggio immediato della foto.
codice:
Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim x As New ArtLabs.Pictures.Engine
x.ResizeToFile(Server.MapPath("/images/big/foto.jpg"), Server.MapPath("/images/small/foto.jpg"), _
New System.Drawing.Size(300, 300), _
System.Drawing.Imaging.ImageFormat.Jpeg, _
True, 100)
x.Dispose()
x = Nothing
End Sub
In quella classe esistono diversi "metodi" per il trattamento dell'immagine e il relativo salvataggio.