应用场景
有时候需要修改文件的时间,或者提取文件创建时间等等会使用到。
函数代码
function DateTimeToWinFileTime(DT: TDateTime): TFileTime;
var
ST: TSystemTime;
begin
DateTimeToSystemTime(DT, ST);
Win32Check(SystemTimeToFileTime(ST, Result));
end;
function WinFileTimeToDateTime(FT: Windows.TFileTime): TDateTime;
var
SysTime: Windows.TSystemTime;
begin
Win32Check(Windows.FileTimeToSystemTime(FT, SysTime));
Result := SystemTimeToDateTime(SysTime);
end;