Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   C++ Builder (https://www.clubdelphi.com/foros/forumdisplay.php?f=13)
-   -   Como Comparar Imagenes (https://www.clubdelphi.com/foros/showthread.php?t=77987)

Jusar 10-03-2012 17:34:06

Como Comparar Imagenes
 
Otra vez de nuevo por aca. Me gustaria que me dijeran como puedo comparar imagenes para saber si son iguales...

ecfisa 11-03-2012 01:40:22

Hola jusar.

Usando bitmap podés hacer:
Código:

bool IsBitmapsEqual(Graphics::TBitmap* B1, Graphics::TBitmap* B2)
{
  if( B1->Height != B2->Height || B1->Width != B2->Width ||
      B1->PixelFormat != B2->PixelFormat )
    return false;
  for(int i =0; i < B1->Height ; i++ )
    if(memcmp(B1->ScanLine[i],
      B2->ScanLine[i],B1->Width * (B1->PixelFormat) / 8) != 0)
      return false;
 return true;
}

Ejemplo llamada:
Código:

void __fastcall TForm1::Button1Click(TObject *Sender)
{
  ShowMessage( IsBitmapsEqual(Image1->Picture->Bitmap,
    Image2->Picture->Bitmap ) ? "IGUALES" : "DIFERENTES" );
}

Saludos.

ecfisa 11-03-2012 02:41:46

Hola de nuevo.

Para ampliar un poco más, si querés utilizar imágenes .jpg podrías hacer:
Código:

#include<Jpeg.hpp>

bool IsBitmapsEqual(Graphics::TBitmap* B1, Graphics::TBitmap* B2)
{
  if( B1->Height != B2->Height || B1->Width != B2->Width ||
      B1->PixelFormat != B2->PixelFormat )
    return false;
  for(int i =0; i < B1->Height ; i++ )
    if(memcmp(B1->ScanLine[i],
      B2->ScanLine[i],B1->Width * (B1->PixelFormat) / 8) != 0)
      return false;
 return true;
}

Graphics::TBitmap *JpgToBmp(AnsiString AName)
{
Graphics::TBitmap *B1 = new Graphics::TBitmap;
TJPEGImage *J1 = new TJPEGImage;
  try {
    J1->LoadFromFile(AName);
    B1->Height = J1->Height;
    B1->Width = J1->Width;
    B1->Assign(J1);
  }
  catch(...) {
    delete(J1);
    throw Exception("Error al cargar la imágen");
  }
  delete(J1);
  return B1;
}

Llamada de ejemplo:
Código:

void __fastcall TForm1::Button1Click(TObject *Sender)
{
 Image1->Picture->Bitmap = JpgToBmp("C:\\Users\\User\\Pictures\\Imagen1.jpg");
 Image2->Picture->Bitmap = JpgToBmp("C:\\Users\\User\\Pictures\\Imagen2.jpg");
 ShowMessage(IsBitmapsEqual(Image1->Picture->Bitmap,
  Image2->Picture->Bitmap ) ? "IGUALES" : "DIFERENTES");
}

Saludos.

CSIE 13-03-2012 20:51:49

Si lo que quieres saber es si son totalmente idénticos puedes comparar el hash de los archivos o de los streams.

Saludos

Jusar 14-03-2012 23:26:44

De nuevo yo gente realmente lo que estoy realizando es un vector al cual le genero numeros aletorios para luego poder concatenar y poder cargar imagenes todo esto ya lo tengo realizado y corre a la perfeccion.

El problema que tengo ahora es que a cada imagen le pongo un bonton a ensima para poder oculturlas, entonces a la hora q le doy click al boton se visualiza la imagen q esta atras osea oculto el boton y queda visible la imagen pero lo que pasa en que no se como asociar le boton con el vector para luego que le de click a otro pueda visualizar la otra imagen y poder compararlas para saber si son iguales

ecfisa 14-03-2012 23:42:01

Hola Jusar.

¿ No te han funcionado las opciones sugeridas para comparar imágenes o estás haciendo otra consulta ?

Saludos.

Jusar 15-03-2012 08:01:01

Realmente no se como implementarlas al codigo que llevo hecho...

ecfisa 15-03-2012 12:50:01

Cita:

Empezado por Jusar (Mensaje 427711)
Realmente no se como implementarlas al codigo que llevo hecho...

Hola Jusar.

Supongo que para mostrar las imágenes usarás el componente TImage. Entonces hagamos las funciones más genéricas, usando como parámetros los TImage...

Si las imágenes son Bitmap, para compararlas usá esta función:
Código:

bool SameBMPImages(TImage *Img1, TImage *Img2)
{
  if(Img1->Picture->Bitmap->Height != Img2->Picture->Bitmap->Height ||
    Img1->Picture->Bitmap->Width != Img2->Picture->Bitmap->Width ||
    Img1->Picture->Bitmap->PixelFormat != Img2->Picture->Bitmap->PixelFormat)
    return false;
  for(int i =0; i <Img1->Picture->Bitmap->Height ; i++ )
    if(memcmp(Img1->Picture->Bitmap->ScanLine[i],
      Img2->Picture->Bitmap->ScanLine[i],
        Img1->Picture->Bitmap->Width * (Img1->Picture->Bitmap->PixelFormat) / 8) != 0)
      return false;
 return true;
}

Si son JPG, utiliza esta:
Código:

bool SameJPGImages(TImage *Img1, TImage *Img2)
{
TJPEGImage *J1 = new TJPEGImage;
TJPEGImage *J2 = new TJPEGImage;
  __try {
    J1->Assign(Img1->Picture->Graphic);
    Img1->Picture->Bitmap->Height = J1->Height;
    Img1->Picture->Bitmap->Width = J1->Width;
    Img1->Picture->Bitmap->Assign(J1);
    J2->Assign(Img2->Picture->Graphic);
    Img2->Picture->Bitmap->Height = J2->Height;
    Img2->Picture->Bitmap->Width = J2->Width;
    Img2->Picture->Bitmap->Assign(J2);
  }
  __finally {
    delete(J1);
    delete(J2);
  }
  if( Img1->Picture->Bitmap->Height != Img2->Picture->Bitmap->Height ||
      Img1->Picture->Bitmap->Width != Img2->Picture->Bitmap->Width ||
      Img1->Picture->Bitmap->PixelFormat != Img2->Picture->Bitmap->PixelFormat)
    return false;
  for(int i =0; i < Img1->Picture->Bitmap->Height ; i++ )
    if(memcmp(Img1->Picture->Bitmap->ScanLine[i],
      Img2->Picture->Bitmap->ScanLine[i],Img1->Picture->Bitmap->Width *
        (Img1->Picture->Bitmap->PixelFormat) / 8) != 0)
      return false;
 return true;
}

Ejemplo de llamada a las funciones:
Código:

  // BMP
  if ( SameJPGImages(Image1, Image2 ) )  // true si son iguales
  ...
  //JPG
  if ( SameJPGImages(Image1, Image2 ) ) // true si son iguales
  ...

De ese modo sólo tenés que enviar como argumento los dos TImage seleccionados para comprobar su igualdad. Que es lo que solicitaste inicialmente.


Saludos.


La franja horaria es GMT +2. Ahora son las 14:06:51.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi