Reglage qualité jpg [Résolu]

Signaler
Messages postés
4
Date d'inscription
mercredi 26 septembre 2007
Statut
Membre
Dernière intervention
20 décembre 2008
-
Messages postés
4
Date d'inscription
mercredi 26 septembre 2007
Statut
Membre
Dernière intervention
20 décembre 2008
-
bonjours à tous
voila en fait j'aimerais savoir, comment regler la qualité de mon image jpg enregistrée.
Pour enregistrer j'utilise cette méthode
"PictureBox1.Image.Save(cheminSauv, System.Drawing.Imaging.ImageFormat.Jpeg)"

Merci d'avance.

2 réponses

Messages postés
17286
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
23 décembre 2019
67
Dans ce genre de cas, pense a bien examiner les surcharges qui te sont fournies...
la méthode Save peut prendre bien d'autres parametres...


Imports System
Imports System.Drawing
Imports System.Drawing.Imaging

Public Class Form1
Private Function GetEncoderInfo(ByRef vsMimeType As String) As ImageCodecInfo
Dim oEncoder As ImageCodecInfo
For Each oEncoder In Imaging.ImageCodecInfo.GetImageEncoders
If oEncoder.MimeType = vsMimeType Then
Return oEncoder
End If
Next
Return Nothing
End Function

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Try
Dim oEncoder As ImageCodecInfo = GetEncoderInfo("image/jpeg")
Dim oParameters As EncoderParameters = New EncoderParameters(1)
oParameters.Param(0) = New EncoderParameter(Imaging.Encoder.Quality, 20)

PictureBox1.Image.Save("C:\a.jpg", oEncoder, oParameters)
Catch ex As Exception
MessageBox.Show(ex.Message)
End Try
End Sub
End Class
Messages postés
4
Date d'inscription
mercredi 26 septembre 2007
Statut
Membre
Dernière intervention
20 décembre 2008

Merci beaucoup Renfield c'est exactement ce que je voulais .