本文整理自网络,侵删。
通过定义该函数进程转换: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》频道 >>