timer zu langsam?

[SleepyMaster]

nimm doch einen eigenen Thread der ungefähr so aussieht:

Delphi-Quellcode:

while true do
  begin
  sleep(1);
  canvas.Pixels[Random(form1.Width), Random(Form1.Height)] := clRed;
  end;

Oder du lässt das sleep einfach ganz weg!