Matriz de Pixeles. Necesito velocidad!!
Hola. Mi problema es el siguiento.
Estoy haciendo un programa de tratamiento de archivos *.FIT. estos archivos guardan una matriz de números enteros de 16-bits (0 a 65535). Estos se dividen por 256 y la pasamos a 8-bits. En realidad es una foto en blanco y negro con 65536 niveles de grises y la paso a 256 niveles de grises. La represento pixel a pixel para visualizarla, del siguiente modo:
Supongamos que f[i,j] es la matriz que guarda la información de la foto.
la foto es de 512x512 pixeles:
el código es el siguiente:
for j:=0 to 511 do
for i:=0 to 511 do
begin
b:=round(f[i,j]/256); {b:byte}
Image1.canvas.pixel[i,j]:=rgb(b,b,b);
end;
pero esto va extremadamente lento.
Alguien sabe como puedo representar esta matriz mas rápido?
Muchas gracias!
|