Salve a tutti, mi sto imbattendo in un problema che non riesco a risolvere o ho pensato di chiedere aiuto qua sul forum.
In un programma gestionale, il cliente, vuole che quando carica un immagine sul sito web venga applicato automaticamente il copyright all'immagine.
Il problema è che quando salvo l'immagine modificata il nuovo file perde qualità se lo salvo in Jepg anche impostando qualità 100
Questo è il codice con cui salvo e imposto la qualità dell'immagine:
Public Function GetEncoder(ByVal format As Imaging.ImageFormat) As Imaging.ImageCodecInfo
Dim codecs As Imaging.ImageCodecInfo() = Imaging.ImageCodecInfo.GetImageDecoders()
Dim codec As Imaging.ImageCodecInfo
For Each codec In codecs
If codec.FormatID = format.Guid Then
Return codec
End If
Next codec
Return Nothing
End Function
Dim jgpEncoder As Imaging.ImageCodecInfo = _img.GetEncoder(Imaging.ImageFormat.Jpeg)
Dim myEncoder As System.Drawing.Imaging.Encoder = System.Drawing.Imaging.Encoder.Quality
Dim myEncoderParameters As New Imaging.EncoderParameters(1)
Dim myEncoderParameter As New Imaging.EncoderParameter(myEncoder, 100)
myEncoderParameters.Param(0) = myEncoderParameter
_imgcopi.Save(CartellaCopyLbl.Text & "/" & _File.Name, jgpEncoder, myEncoderParameters)
La qualità rimane bassa anche se metto 100 o comunque troppo bassa rispetto all'originale.
Ho provato poi a mettere come image format Png
_imgcopi.Save(CartellaCopyLbl.Text & "/" & _File.Name, Imaging.ImageFormat.Png)
la qualità è ottima, ma la dimensione del file è eccessiva, le foto originali sono sui 70 kb se la salvo con il formato in png, supera i 300 kb.
Dove sbaglio? Ho provato con photoshop a fare la modifica e salvare l'immagine in jpeg a qualità 600 e il risultato è ottimo, non perde in qualità e la dimensione rimane costante.
Non so più cosa inventare.
Forse è un problema di compressione?
Grazie a tutti!