Lo que quieres es posible, pues la propiedad de tiempo del Timer se puede modificar en tiempo de ejecución, si te miras la ayuda sobre la función Random
y lo aplicas tendrás lo que deseas.
Código Delphi
[-]var
I: Integer;
begin
Randomize;
for I := 1 to 50 do begin
Canvas.TextOut(Random(Width), Random(Height), 'Boo!');
end;
end;
De la ayuda de Delphi.
Un Saludo.