Time <-> Millisekunden

[Uwe Raabe]

Eine Funktion dafür gibt es meines Wissens nicht, aber man kann das auch direkt so schreiben:

Delphi-Quellcode:

var
  myTime: TTime;
  myMilliSeconds: Int64;
begin
  myTime := TimeOf(Now);
  myMilliSeconds := TimeToMilliseconds(myTime);
  myTime := myMilliSeconds*OneMillisecond;
end;