Cita:
Empezado por mamu
Hola, necesito hacer una función que partiendo de una varieble float que contiene el tiempo total en segundos, me devuelva un string formateado en HH:MM:SS;...
|
Bueno, tomando la función de ixMike y sin dejar de usar un float;
Código Delphi
[-]function ConvertTime(Seconds: Extended): string;
var Value: int64;
begin
Value := Trunc(Seconds);
Result := IntToStr(Value div 3600) + ':' + IntToStr(Value div 60) + ':' + IntToStr(Value mod 60);
end;
Valga la redundancia
Saludos