Diferen�a de segundos

Question

Algu�m sabe se no Delphi ja existe alguma fun��o que quando eu passo os segundos para ela me retorna um string formatado falando qtas hora e minutos s�o aqueles segundos.
Por Exemplo:
65 segundos
Ela me retorna :
01:05

Sabado · Answer

function FormatSecsToHMS(Secs: LongInt): string;
var
Hrs, Min: Word;
begin
Hrs := Secs div 3600;
Secs := Secs mod 3600;
Min := Secs div 60;
Secs := Secs mod 60;
Result := Format(��d:�d:�d�, [Hrs, Min, Secs]);
end;

Foxcyber · Answer

Esta fun��o n�o funciona pro meu caso, pois ela retorna assim :0:1:5E este formato n�o � o formato que quero que me retorne. Ja tinha testado ela antes....

Foxcyber · Answer

Achei a solu��o : Result := Format(��2.2d:�2.2d:�2.2d�, [Hrs, Min, Secs]);...

Sabado · Answer

Para trabalhar com horas, precisa converte-las ou trabsforma-las em hora centesimal, como uma concession�ria, por exemplo...