Ein Tag hat 86400 Sekunden. Eine Stunde hat 3600 Sekunden. Eine Minute hat 60 Sekunden.
Daraus folgt:
Delphi-Quellcode:
//...
//Tage
Tage := SecGes div 86400;
SecGes := SecGes mod 86400;
//Stunden
Stunden := SecGes div 3600;
SecGes := SecGes mod 3600;
//Minuten
Minuten := SecGes div 60;
Sekunden := SecGes;
//...
//edit
Da war wohl jemand schneller als ich und auch noch ne bessere Loesung