[[coso]]

Código Delphi [-]
for X:= 0 to 17 do
  for Y:= 0 to 17 do
    Bmp.Canvas.Pixel[X,Y]:= clWhite;

no se si ya lo has arreglado...

PD: nada, ahora vi q lo escribias de memoria