Ver Mensaje Individual
  #1  
Antiguo 19-10-2005
fmtidona fmtidona is offline
Miembro
 
Registrado: sep 2005
Posts: 17
Reputación: 0
fmtidona Va por buen camino
Scanline - BMP Monocromo

El siguiente código es un fragmento de un programa que lee de una imagen BMP monocromática.

En teoría cuando leo con scanline los valores tendrían que ser 0 o 1, dependiendo si es blanco o negro, ya que es una imagen monocromática? O cada píxel es de 8 bit? Para mi un píxel representa un bit, no?

Haciendo pruebas, el valor de “a” es 0 siempre que leo un píxel negro, pero a los blancos los lee con diferentes valores, porque?

Gracias

Código Delphi [-]
 for y := 0 to BitMap.Height-1 do
 begin
   P := BitMap.ScanLine[y];
   for x := 0 to BitMap.Width-1 do
   begin
     a := P[x];
     if a=255 then
       blanco:=blanco+1
     else
       otro:= otro+1;
   {...}

Última edición por dec fecha: 19-10-2005 a las 22:41:21. Razón: ¡¡Encerrad el código fuente entre las etiquetas [DELPHI] ... [/DELPHI]!!
Responder Con Cita