Delphi中获取Unix时间戳(秒、毫秒)

按秒转换:

uses DateUtils;
DateTimeToUnix(Now)
可以转换到unix时间，但是，它得到的时间比c语言中time()得到的时间大了86060
这是因为Now是当前时区的时间，
c语言中time()是按格林威治时间计算的，
北京时间比格林威治时间多了8小时
DateTimeToUnix(Now)-86060 就和c语言中time()得到的一样了。

Delphi中的DateTimeToUnix时间函数没有经过任何的转换，是直接读取系统时间

就算改变当前计算机时区，发现Delphi返回值没有任何改变。

在C++中，改变计算机时区，则time()返回值也随着改变，这就说明C++中标准时间是通过本地时间和当前时区进行计算得来的。

在Delphi开发时，需要注意Delphi获取的时间戳是当前计算机所在时区时间，并非标准UTC时间。

UnixToDateTime()函数并没有对时区进行转换，仅仅是对时间进行了转换。

按毫秒转换
function DateTimeToMilliseconds(const ADateTime: TDateTime): Int64; //获得毫秒
var
LTimeStamp: TTimeStamp;
begin
LTimeStamp := DateTimeToTimeStamp(ADateTime);
Result := LTimeStamp.Date;
Result := (Result * MSecsPerDay) + LTimeStamp.Time;
end;
乐考网