Von 5 sekunden runter auf 0 zählen

[mr47]

Genau wie DerAndereMicha gesagt hat: MAch einen Timer, eine Variable mit dem Startwert 5 (in Form1.OnActivate: variable:=5; ) und dann Timer Intervall auf 1000 stellen und in den Timer:

Delphi-Quellcode:

  zeit:=zeit-1;
  if (zeit=0) then
  begin
    //Game Starten
    Timer1.Destroy;
  end;

fertig!


//edit: Fehler verbessert!
//edit2: Fehler 2 verbessert!