Thema: Delphi Countdown

Einzelnen Beitrag anzeigen

stefan2007

Registriert seit: 18. Jun 2007
3 Beiträge
 
#7

Re: Countdown

  Alt 18. Jun 2007, 22:00
Delphi-Quellcode:
start: integer;

procedure TForm3.FormCreate(Sender: TObject);
begin
 start:=15;
 Timer1.Enabled:= true;
end;

procedure TForm3.Timer1Timer(Sender: TObject);
begin
 start := start -1;
 if start = 0 then begin close; Timer1.Enabled := false; end;
damit habe ich es probiert, hat auch geklappt, leider aber nur einmal

und wie gesagt, beim countdown weiß ich nicht so recht weiter....


[edit=Matze][delphi]-Tags gesetzt, zukünftig bitte selbst erledigen. MfG, Matze[/edit]
  Mit Zitat antworten Zitat