Bitte, bitte, bitte, tu uns allen einen Gefallen: schreib endlich in korrektem Deutsch (das heisst richtige Rechtschreibung, korrekte Zeichensetzung). Das schaffe sogar ich als Italiener. Da ist es egal ob du bei der Arbeit bist und dich beeilen musst damit dich der Chef nicht erwischt.
Zum Problem: Timer auf die Form, Edit auf die Form. Interval vom Timer auf 60000 setzen, Text vom Edit auf 20.
Im OnTimer schreibst du folgenden Code:
Delphi-Quellcode:
Timer1.Enabled := False;
Edit1.Text := IntToStr(StrToInt(Edit1.Text)-1);
Timer1.Enabled := Edit1.Text > '0';
Sobald im Edit '0' steht, macht der Timer nicht mehr weiter, und du musst dann eben eine andere Aktion ausfuehren lassen.
Greetz
alcaeus
PS: Warum fragst du in einem Delphi-Forum wenn du es dann doch in C++ umschreiben musst?
