SOLUCIONADO
Utilice este procedimiento:
Código Delphi
[-]
function ConverTime(Seconds: Integer): string;
var Horas,Minutos,Segundos:integer;
begin
Horas := Seconds div 3600;
Minutos := (Seconds - (Horas*3600)) div 60;
Segundos := (Seconds - (Horas*3600)) mod 60;
Result:= Format('%.*d',[2,Horas])+':'+Format('%.*d',[2,Minutos])+':'+Format('%.*d',[2,Segundos]);
end;
Con respecto a los dias, no los necesito, puesto a que por otro lado, el ingreso de datos esta limitado a un máximo de 24hs.
Saludos
__________________
Código Delphi
[-]
try
ProgramarMicro(80C52,'Intel',MnHex,True);
except
On Exception do
MicroChip.IsPresent(True);
end;