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 中的split 函数

tstringgrid 添加鼠标拖动功能

Delphi 用idhttp得到本机外网ip

Delphi tidhttp 超时设置无效的解决方法

Delphi 得到文件创建时间，修改时间，访问时间

Delphi利用getprocessmemoryinfo获取进程占用内存大小

Delphi源码一个对字符加密解密的实例

Delphi unigui unistringgrid1 清空

Delphi 调用clipboard 收集剪切板信息

Delphi 清除ie缓存 internet临时文件 cookie 历史记录 表单记录 上网密码

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

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