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;