delphi 獲取時間戳 如何得到 和 js 中 new Date().getTime();的 相同？

new Date().getTime();  //1533213439019

 

通過，啟發

function DateTimeToUnix(const AValue: TDateTime): Int64;
begin
Result := SecondsBetween(UnixDateDelta, AValue);
if AValue < UnixDateDelta then
Result := -Result;
end;

得到秒級別的，本人改造一下：

MilliSecondsBetween(UnixDateDelta, Now )；得到的是比 JavaScript  得到的大很多的數，猜想應該獲取的是 

解析：它得到的時間比c語言中time()得到的時間大了8*60*60
這是因為Now是當前時區的時間，c語言中time()是按格林威治時間計算的，
北京時間比格林威治時間多了8小時

 

最終寫成：現在的時候 -8 

MilliSecondsBetween(UnixDateDelta, IncHour(Now,-8) )