Bonjour à tous je recupérais depuis mon scanner une image et je l'enregistrait au format tiff directement sur mon disque sans la compresser. L'image ainsi enregistré étant lourde j'ai décidé de la compresser. en utilisant le code suivant.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
img = New ImageFile

Prcs = New ImageProcess

Prcs.Filters.Add(Prcs.FilterInfos("Convert").FilterID)

Prcs.Filters(1).Properties("FormatID").Value = 
Prcs.Filters(1).Properties("Compression").Value = "CCITT4"
img = CurrentItem.Transfer
img = Prcs.Apply(img)
mais depuis avoir ajouté la ligne de compression j'ai une exception à la partie img = Prcs.Apply(img)
Je rappel que la partie compression je l'ai eu depuis un exemple en vb6. Pourriez vous me mettre sur la voie SVP. Je rappel encore que sans la ligne compression le code s'exécute correctement.