Thanks for your help :-)
It now works as I want it to :-)
Global variable : gas as integer, gas := 1000 in my startmain procedure and the following:
The for loop is so attractive but I understand that the timer is the for loop :-)Code:procedure TForm1.RemainingGas; begin Gas := Gas -1; car.Moved := (gas>0); end;
Thanks again, you guys/girls are brilliant!
Bookmarks