delphi 网络时间校对

本文整理自网络，侵删。

 delphi 网络时间校对

客户端登录的时候，自动同中间件校对时间。

 

procedure TdmCommonFun.setLocalDateTime(Value: TDateTime);
var
  lSystemDateTime: TSystemTime;
begin
  DateTimeToSystemTime(Value, lSystemDateTime);
  SetLocalTime(lSystemDateTime);
end;
 

相关阅读 >>

devexpress vcl 动态调用皮肤

Delphi获取机器的mac地址

Delphi 显示选择文件夹对话框 (有新建按钮)

Delphi 不用控件用函数实现发email

Delphi 拷贝文件时有进度显示

Delphi xe中使用tchart绘制平滑曲线

Delphi 无法结束进程的程序

Delphi enumwindows 获取窗体句柄 进程id 窗体信息

Delphi获取进程快照(snapshot)

delph记录输出日志

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

转载请注明出处：木庄网络博客 » delphi 网络时间校对