Ciao a tutti,uso questo codice per convertire una img in tif.
Solo che mi da come errore,parametro non corretto,ho letto su vari forum che il problema sta nel fatto che l'img di origine deve essere trasformata in bitonale,ma mi succede anche quando converto già una img che è già in formato tif gruppo 4.codice:Dim compressione As Imaging.Encoder Dim ratio As Imaging.EncoderParameter Dim codecParams As Imaging.EncoderParameters Dim imgCodec As Imaging.ImageCodecInfo compressione = Imaging.Encoder.Compression ratio = New Imaging.EncoderParameter(compressione, System.Drawing.Imaging.EncoderValue.CompressionCCITT4) codecParams = New Imaging.EncoderParameters(1) codecParams.Param(0) = ratio imgCodec = GetImageCodec(ImageType) Try currentImage.Save(FilePath, imgCodec, codecParams) Return True Catch ex As Exception Return False Finally ratio.Dispose() codecParams.Dispose() compressione = Nothing ratio = Nothing codecParams = Nothing imgCodec = Nothing End Try

Rispondi quotando