comparaison entre deux images

Version imprimable

07/03/2008, 17h38
gash59

comparaison entre deux images

bonjours à tous,

voilà en fait je cherche à effectuer une comparaison entre deux images mais je ne vois pas quelle démarche suivre si quelqu'un aurait rien qu'une petite piste se serait sympa

merci d'avance

Ben tu peux comparer pixel par pixel... Utilise la classe Bitmap pour manipuler les images

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
 
Dim img1 as Bitmap
Dim img2 as Bitmap
 
' chargement des images
img1 = CType(Image.FromFile("c:\image1.jpg"), Bitmap)
img2 = CType(Image.FromFile("c:\image2.jpg"), Bitmap)
 
' comparaison de la taille
if img1.Size <> img2.Size then
    msgbox "les images sont différentes"
else
    ' comparaison pixel par pixel
    for x = 0 to img1.Width - 1
        for y = 0 to img1.Height - 1
            if img1.GetPixel(x, y) <> img2.GetPixel(x, y) then
                msgbox "les images sont différentes"
                return
            end if
        next y
    next x
 
    msgbox "les images sont identiques"
 
end if

07/03/2008, 20h05
gash59

je vais essayé merci si il y'a d'autres méthodes n'hésitez pas j'essaye de voir celle qui va le mieux dans ce que je veux faire en testant