tester une image pour déterminer sa profondeur

Bonjour à tous.

Savez-vous comment je peux tester une image, afin de savoir si elle est en couleur ou en N/B ?
Les formats du fichier à tester pouvant être JPG, EPS, TIF, BMP

Le but est de trier des dossiers de plus de 300 000 images, afin d'appliquer des scripts totoshop pour convertir toutes les images en EPS.
EPS\NB ou EPS\COUL

Je tiens tout d'abord à remercier ceux et celles qui viendront à mon aide.

Guillaume.

Bonjour

Je te propose d'ouvrir toutes les images les unes après les autres et d'appeller cette fonction :

private function IsNB(byval pImg as Bitmap) as boolean
    dim lPix as color
    for X as integer=0 to pImg.Size.Width-1
       For Y as integer =0 to pImg.Height-1
          lPix=pImg.GetPixel(x,y)
          if lPix.R<>lPix.G or lPix.G<>lPix.b then
             Return false
          end if
       next
    next
    return true
end function


c'est pas le plus rapide, mais une méthode simple.

Il est plus facile de batiser quelqu'un que de la convertir.(surtout en programmation)
VB (6, A excel, .NET), C++, C#.Net
Mon site

Bonjour NHenry,

 

Tant qu'à y aller pixel par pixel, je ne ferais alors personnellement que ta double boucle que je quitterais immédiatement dès le 1er pixel rencontré dont la valeur RGB serait différente de RGB(0,0,0) et RGB(255,255,255) puisqu'il  n'accepte que le noir et le blanc. Celà éviterait de tout parcourir inutilement.

salut,

si ca peut servir :
http://www.vbfrance.com/codes/NET-LIRE-ECRIRE-METADONNEES-EXIF-IPTC-PNG-GIF_38910.aspx

ShareVB

Bonjour

Pour info : Return quitte immédiatement la fonction/sub.

Il est plus facile de batiser quelqu'un que de la convertir.(surtout en programmation)
VB (6, A excel, .NET), C++, C#.Net
Mon site