Hallo
Im Prinzip nicht schwer. Du fängst so an:
X & Y sind Gleitkommazahlen.
Delphi-Quellcode:
Randomize;
X:=Random(10)+10;
Y:=Random(10)+10;
Und dann bei jedem Timer-Aufruf:
Delphi-Quellcode:
X:=X-((Random(40)/10)-2);
Y:=Y-((Random(40)/10)-2);
Sollte eigentlich gehen. (Habs aber nicht getestet)
Gruß
Onz
"Optimistisch ist diejenige Weltanschauung, die das Sein höher als das Nichts stellt und so die Welt und das Leben als etwas an sich Wertvolles bejaht."
Albert Schweitzer