Wollte einen einfachen Countdown programmieren,den Code kann man kompilieren,es kommt keine Fehler meldung.
Will wirklich keine zeit von euch verschwenden.
Delphi-Quellcode:
var
Form1: TForm1;
TotalTime:TTime;
implementation
{$R *.dfm}
procedure TForm1.Timer1Timer(Sender: TObject);
begin
totaltime:=1000;
timer1.Interval:=1000;
label1.Caption:=Timetostr(totaltime-1);
end;
end.