Ich wollte dir das programmieren, aber ich schaff's nicht.
Keine Ahnug, wieso's nicht geht! Es ist dann auch noch so, dass statt 00 nur 0 dasteht, aber bei mir zählt es die Minuten hoch??
Delphi-Quellcode:
var Min, Sek, HundSek: Integer;
...
procedure TForm1.Timer1Timer(Sender: TObject);
begin
Timer1.Interval:=10;
inc(HundSek);
if HundSek mod 100 = 0 then
begin
HundSek:=0;
inc(Sek);
end;
if Sek mod 60 = 0 then
begin
Sek:=0;
inc(Min);
end;
Label1.Caption:=IntToStr(Min)+':'+IntToStr(Sek)+':'+IntToStr(HundSek);
end;
Weiß zufällig jemand, wieso das nicht geht?
Sorry, dass ich auch nicht helfen konnte.
