> A színeket meg innen puskáztam ki: [link]
A fehér ott sem $000000 ...
De a "clWhite", "clBlue" az rendben van.

Esetleg a
"palyakep.canvas.fillrect(vsz,vm,vsz+1,vm+1);" helyett pl . a
"palyakep.canvas.Pixels[vsz,vm]:=clWhite;" nem lenne szebb?

A 3 db "random(100)"-at sokallom egy kicsit, de te látod az eredményt, ha jó, akkor jó.
Remélem, hogy "Randomize;" van a program elején ...

[ Szerkesztve ]