is it possible?
i would like create Q&A game with a countdown-timer.
if timer=0 then stop the game.

how can i do this? Thank you

Sorry...i am the beginner
i don't know what Tobject is.
Can Pascal do this!? i'm not using Delphi.

Program test;
Uses Crt;

procedure timer(d:integer;var t:byte);
Var i:Byte;  {0..255}
Begin
         Dec(t);{decrease value of 'i' by 1}
         Delay(d); {waiting d millisec}

End;

var time:byte;
begin
time:=60;
repeat
 clrscr;
    writeln('Time: ',time );
    timer(1000,time);
until time=0;

end.

Can i use above code add into the game ?

oh..i see
have any samples!?
i have not any concept to write.
thank you

OH....i saw the post.
it is solved.
thank for your help.

This question has already been answered. Start a new discussion instead.