delphi格式化Wmi中的DateTime


本文整理自网络,侵删。

 
通过定义该函数进程转换:
use ComObj,ActiveX,Variants;

function  WmiDateToTDatetime(vDate : OleVariant) : TDateTime;
var
  FWbemDateObj  : OleVariant;
begin;
  FWbemDateObj  := CreateOleObject('WbemScripting.SWbemDateTime');
  FWbemDateObj.Value:=vDate;
  Result:=FWbemDateObj.GetVarDate;
end;
原文
https://stackoverflow.com/questions/22254962/delphi-date-time-conversion?lq=1

相关阅读 >>

Delphi copyrect实现的几个图片的转换效果

Delphi程序常用的公共代码

Delphi url编码与解码工具附代码

Delphi单元文件基本结构

Delphi fdquery 判断记录为空

Delphi如何过xp的防火墙而不被拦截

Delphi设置屏幕分辨率的函数

Delphi 取系统临时路径

Delphi二值图像腐蚀算法

Delphixe 如何调用stringtojstring

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



打赏

取消

感谢您的支持,我会继续努力的!

扫码支持
扫码打赏,您说多少就多少

打开支付宝扫一扫,即可进行扫码打赏哦

分享从这里开始,精彩与您同在

评论

管理员已关闭评论功能...