Zeitsummen > 24h als string formatieren

[Niko]

Hi,

falls du eine Ausgabe mit Tagen möchtest, schau dir mal die Funktion DateTimeToStr oder FormatDateTime an.

Wenn du nur Stunden (und Minuten) ausgeben möchtest wäre ein Integer (bzw. Double) imho besser geeignet. Sonst musst du TDateTime entsprechend selbst umwandeln. Das ganze könnte dann etwa so aussehen:

Delphi-Quellcode:

function DateTimeToHours(hours: TDateTime): String;
begin
  result := Format('%.2d:%.2d', [24 * Trunc(hours) +  Trunc(24 * Frac(hours)), Round(Frac(24 * Frac(hours)) * 60)]);
end;