Re: Egalité d'images

[Eric Ferrer <wonderfef at gmail dot com>]

Le 21 avr. 2008 à 20:53, Antoine Crêtaux a écrit :

> je cherche à faire un test pour comparer deux images

Déjà, une comparaison sur les tailles des images permet de faire  
rapidement un premier tri :
if image1.width <> image2.width or image1.height <> image2.height then
        return false
end if


Ensuite, la seule solution que je vois est une comparaison pixel à  
pixel...
Certainement pas très rapide, mais bon :

for y = 0 to image1.height-1
        for x = 0 to image1.width-1
                if image1.RGBSurface.Pixel(x, y) <> image2.RGBSurface.Pixel(x, 
y) then
                        return false
                end if
        next
next
return true


Selon la taille des images, cette fonction sera certainement très très  
lente.
Mais peut-être n'est-il pas nécessaire de comparer chaque pixel un à un.
Peut-être 1 pixel sur 10 suffirait ?

Je te laisse tester.


Bon courage
Eric