Gibt es Hexen?

[Popov]

Damit glaubt jeder wieder an Hexen:

Delphi-Quellcode:

procedure TForm1.Timer1Timer(Sender: TObject);
begin
  TTimer(Sender).Interval := 10;
  Left := Left + (Random(5) - 2);
  Top := Top + (Random(5) - 2);
end;