Objekte zufällig bewegen lassen

[patti]

Im OnCreate rufst du einmalig folgendes auf:

Randomize; In der Routine zum Setzen der Position der Objekte kannst du dann per

Delphi-Quellcode:

x := random(GrenzeX);
y := random(GrenzeY);

Die Position per Zufall bestimmen lassen (Du musst GrenzeX bzw. GrenzeY natürlich noch anpassen).

Außerdem könntest du dem Objekt noch eine zufällige x-Geschwindigkeit geben:

Delphi-Quellcode:

v := random(2) - 1;
if v = 0 then v := 1;

Jedes mal, wenn sich das Objekt bewegen soll, machst du dann noch:

x := x + v; Dann hättest du eine zufällige Position und eine Bewegung in eine zufällige Richtung.

Der Code ist jetzt eher Pseudocode und funktioniert so natürlich noch nicht, aber vielleicht gibt dir das ja schonmal einen kleinen Denkanstoß!

mfg

Edit: Übrigens willkommen in der DP