Millisekunden in Sekunden umrechnen

[Uwe Raabe]

Ich würde das so machen:

Delphi-Quellcode:

uses
  System.SysUtils, System.TimeSpan;
var
  span: TTimeSpan;
begin
  span := TTimeSpan.FromMilliseconds(3234567890);
  Writeln(Format('%d [Std] %d [Min] %d [Sek] %d [ms]', [span.Hours, span.Minutes, span.Seconds, span.Milliseconds]));
end;