сек перевести в DD:HH:MM:SS

[niockasd]

Господа... понимаю что это тупа математика, ну беда у меня с ней...

Нужно перевести время данное в секундах в Дни -часы- минуты- секунды

Сейчас у меня реализовано только часы - минуты - секунды

       ATime:= JSON.GetValue<TJSONNumber>('downtime_system').AsInt;

       H := ATime div 3600;
       M := (ATime - H * 3600) div 60;
       S := ATime - H * 3600 - M * 60;

Как еще добавить дни ? ) Atime делить на 86400....

[niockasd]

       ATime:= JSON.GetValue<TJSONNumber>('downtime_system').AsInt;

       D := ATime div 86400;
          Atime:= Atime - D * 86400;
       H := (ATime div 3600)  ;
       M := (ATime - H * 3600) div 60;
       S := ATime - H * 3600 - M * 60;

вот... допетлял...