Thema: Delphi Quiz mit Stoppuhr

Einzelnen Beitrag anzeigen

HuxXx
(Gast)

n/a Beiträge
 
#8

Re: Quiz mit Stoppuhr

  Alt 20. Mai 2006, 18:47
achso, du meinst, dass "00:02:00" angezeigt werden soll?
dann mach es doch so:

Delphi-Quellcode:
var zeit:integer=0; //lokal

procedure Timer1.......

var std,min,sek:Integer;
begin
zeit:=zeit+1;
std:=Format('%.2d',[zeit div 3600]);
min:=Format('%.2d',[zeit div 60]);
sek:=Format('%.2d',[zeit mod 60]);
Label1.Caption:=IntToStr(std)+':'+IntToStr(min)+':'+IntToStr(sek));
end;
Keine Ahnung ob das tut..., bin grad in so einem komischen Internet Café..., und da gibt es kein Delphi^^

Greetz by Hux
  Mit Zitat antworten Zitat