Error extrañisimo prouducido por delphi

[lag_0]

ahora no tengo tiempo por que tengo que irme rapido, me leeei las respuestas por encima y solo deciros que muchas gracias, grandes ideas, despues programaré.


y... si!!! se arreglo el error de la ram!!!
muchisimas gracias =), luego sigo!

[[Delphius]]

Por curioso llegué hasta este hilo, y viendo los códigos... legué hasta el de seoane...

Suelo entender algunas códigos.. pero debo admitir que esta parte me dejó mudo.

Código Delphi [-]
case Bitmap1.PixelFormat of
      pf16bit: j:= (Bitmap1.Width*2) -1;
      pf24bit: j:= (Bitmap1.Width*3) -1;
      pf32bit: j:= (Bitmap1.Width*4) -1;
      else j:= Bitmap1.Width -1;
    end;
    for i:= 0 to Bitmap1.Height - 1 do
      if not CompareMem(Bitmap1.ScanLine[i],Bitmap2.ScanLine[i],j) then
        Exit;

En particular... lo que está en rojo. ¿Qué significa la operacion del case? La verdad es que me interesa esto ya que ando viendo cosas sobre tratamiento de imagen para mi tesis.

[[Lepe]]

Delphius el kit de la cuestion es el parámetro "j" que es la longitud a comparar.

si la imagen tienen 16 bit de profundidad, para almacenar un pixel hace falta 2 bytes de memoria (2 bytes x 8 bits = 16 bits).
si la imagen tienen 24 bit de profundidad, para almacenar un pixel hace falta 3 bytes de memoria (3 x 8 = 24).
En el caso de 32 bits... más de lo mismo.

En el "else" estamos diciendo que es de una profundidad de 8 bits (1 byte) o inferior... pero como mínimo necesitamos un byte.

Como la Imagen empieza en el índice cero, hay que restarle uno (se podría sacar fuera del case, ya que siempre se hará .

Saludos

[[seoane]]

La propiedad PixelFormat del bitmap nos indica el formato de la imagen, es decir, el numero de bits que utiliza para representar cada pixel. Necesitamos saber esa información ya que la propiedad Scanline es un puntero, pero no da información sobre el tamaño de la memoria a la que apunta. Para calcularlo multiplicamos el numero de pixels que hay en una linea de la imagen (width) por el numero bytes necesarios para representar cada pixel. Espero haberme explicado

Por ejemplo si la imagen es de 24bits (un formato muy habitual) cada pixel se representa con 3 bytes (RGB). Normalmente cuando trato con imágenes lo que hago es asegurarme de que la imagen tiene el formato pf24bit, asignando ese valor a la propiedad PixelFormat, de esta forma puedo trabajar con cada canal de color por separado sin problemas. En este caso sin embargo, como no se trata de trabajar con la imagen, sino solo de compararlas, evito asignar la propiedad PixelFormat ya que el proceso de conversión de un formato a otro seria una perdida de tiempo, y lo que hago es adaptarme al que ya tiene.

[[Delphius]]

Gracias Lepe y Seoane por aclararmelo.

Conocía bien la propiedad PixelFormat... y lo de los canales RGB (ahorita estoy investigando los otros formatos de representación)... me había llamado la atención aquella operatoria... aquellos valores constantes (2,3 y 4).. para mi eran sacados de la galera....

Gracias nuevamente,