Sein Code funktioniert so, dass der Vogel sich bei jedem Timerevent um 10 Pixel bewegt.
Mit dem Random(100)=0 will er erreichen, dass sich die Bewegungsrichtung des Vogels ändert.
Da es sich bei RichtungX aber wahrscheinlich um eine lokale Variable handelt, wird der Code so nicht laufen.
Anderer Vorschlag:
Delphi-Quellcode:
if random(100)=0 then x:=1 else x:=-1;
Vogel.left:= Vogel.left+x*random(20);
Damit verschiebt sich dein Vogel jedesmal um 0-19 Pixel und änder etwa alle hundert Events die Rchtung.