获取当前时间毫秒

Dau*_*evy 3 delphi

如何以毫秒为单位获取当前时间?我知道要使用Now,但我需要花费几毫秒的时间.

var
  today : TDateTime;
begin
  today := Now;
Run Code Online (Sandbox Code Playgroud)

kot*_*nci 16

DateUtils.MilliSecondsBetween(Now, 0);
Run Code Online (Sandbox Code Playgroud)


LU *_* RD 5

使用DateUtils MilliSecondOfTheDay:

ms := MillisecondOfTheDay(Now);
Run Code Online (Sandbox Code Playgroud)

返回指定的TDateTime值与同一天开头之间的毫秒数.

如果你想从另一个时间框架毫秒,还有其他类似的功能,如:MilliSecondOfTheYear,MilliSecondsBetween等等.