Delphi Zufalls-Bewegung - Delphi-PRAXiS

Thema durchsuchen

Ansicht

Themen-Optionen

Zufalls-Bewegung

Ein Thema von Aria · begonnen am 19. Okt 2005 · letzter Beitrag vom 19. Okt 2005

Vorheriger Beitrag

Nächster Beitrag

glkgereon

Registriert seit: 16. Mär 2004
2.287 Beiträge

#10

Re: Zufalls-Bewegung

19. Okt 2005, 22:36

pass auf...

du sagst in jedem ontimer nicht

markieren

Delphi-Quellcode:

			image2.Top:=image2.Top+10; 

image2.Left:=image2.left+10;

sondern

markieren

Delphi-Quellcode:

			image2.Top:=image2.Top+(Random(3)-1)*10; 

image2.Left:=image2.left+(Random(3)-1)*10;

Random(2) gibt 0, 1 oder 2 zurück...Random(2)-1 also -1,0 oder 1
also bewegt sich das Image nicht mehr nur nach unten, sondern nach unten, nach oben oder gar nicht
für rechts/links ist es analog.

im OnCreate der Form rufst du dann noch Randomize; auf um den Zufallgenerator zu initialisieren.
Fertig!

»Unlösbare Probleme sind in der Regel schwierig...«