Delphi 请求时间，为当前时间，数值为1970-01-01以来的毫秒数

本文整理自网络，侵删。

 
//和Java获取的数值一致

function TWorkWindowForm.GetJavaTime(d: TDateTime): Int64;
var
  dJavaStart: TDateTime;
begin
  //java里的时间是从1970年1月1日0点到当前的间隔
  dJavaStart := EncodeDateTime(1970, 1, 1, 0, 0, 0, 0);
  Result := MilliSecondsBetween(d, dJavaStart);
end;


――――――――――――――――

原文链接：https://blog.csdn.net/qq_39951605/article/details/82691110
 

相关阅读 >>

Delphi 用浏览器来显示带图片的邮件内容，图片无需保存为本地文件

Delphi xe 应用程序横竖屏设置

Delphi中for in 语法应用实例

Delphi : tstringlist的find，indexof和sort

Delphi 判断dll动态链接库是否可用

Delphi messagebox 和 messagedlg用法

Delphi 使用泛型的 tarray 为动态数组排序

Delphi让程序运行后自我删除或恢复名称

Delphi有用的函数extractfilename、extractfilepath

Delphi 移动端使用 sqlite数据库查询

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » Delphi 请求时间，为当前时间，数值为1970-01-01以来的毫秒数