Forums Últimos mensajes - Powered by IBM
 
Tags Palabras claves

¿ Imagenes no son iguales ?

09/08/2006 - 08:25 por Bingen | Informe spam
Ayuda Hacer una pregunta
Hola a todos.

En una parte de mi programa debo de comprobar si dos imagenes son iguales.
Con el siguiente código, parece que debería de indicar que las imagenes son
iguales pero no es así. ¿Como determino si dos imagenes son iguales ? . He
probado varias cosas... pero nada.

Dim m_Croquis As Image = Image.FromFile(Application.StartupPath & "\" &
m_ImagenDefault) 'Donde m_ImagenDefault es una imagen en disco.
Dim m_Croquis2 As Image = Image.FromFile(Application.StartupPath & "\" &
m_ImagenDefault)

If Image.Equals(m_Croquis, m_Croquis2) Then
MessageBox.Show("Iguales")
else
MessageBox.Show("Son diferentes")
End If

Un saludo

Bingen
email Siga el debateRespuesta 1 respuestaRespuesta Tengo una respuesta
DRAGON AGE™: INQUISITION – Matadragones
 

Leer las respuestas

#1 Javier Agreda
28/11/2006 - 18:12 | Informe spam
yo lo hago asi!, mira cada imagen es una matriz de colores que tienes que
recorrer con un par de 'for', luego con getpixel obtienes pixel por pixel y
lo comparas.
nota: creo que para usar getpixel tiene que ser de tipo Bitmap y no de tipo
Image

aunque, si existe un metodo parecido a lo que dices, igual de corto,
porfavor hazmelo saber, por que como yo lo hago se suele demorar un poco.





Programar... es mucho mas que codificar


"Bingen" wrote:

Hola a todos.

En una parte de mi programa debo de comprobar si dos imagenes son iguales.
Con el siguiente código, parece que debería de indicar que las imagenes son
iguales pero no es así. ¿Como determino si dos imagenes son iguales ? . He
probado varias cosas... pero nada.

Dim m_Croquis As Image = Image.FromFile(Application.StartupPath & "\" &
m_ImagenDefault) 'Donde m_ImagenDefault es una imagen en disco.
Dim m_Croquis2 As Image = Image.FromFile(Application.StartupPath & "\" &
m_ImagenDefault)

If Image.Equals(m_Croquis, m_Croquis2) Then
MessageBox.Show("Iguales")
else
MessageBox.Show("Son diferentes")
End If

Un saludo

Bingen




Preguntas similares

 

Busqueda sugerida :