File Time to System Time - Delphi

DarkCoderSc
Jean-Pierre LESUEUR
uses
uHelper, System.SysUtils, Winapi.Windows;
// ...
function FileTimeToDateTime(const AFileTime: TFileTime): TDateTime;
begin
var ALocalFileTime: TFileTime;
if not FileTimeToLocalFileTime(AFileTime, ALocalFileTime) then
raise EWindowsException.Create('FileTimeToLocalFileTime');
var ASystemTime : TSystemTime;
if not FileTimeToSystemTime(AFileTime, ASystemTime) then
raise EWindowsException.Create('FileTimeToSystemTime');
///
Result := SystemTimeToDateTime(ASystemTime);
end;
function TryFileTimeToDateTime(const AFileTime: TFileTime): TDateTime;
begin
try
result := FileTimeToDateTime(AFileTime);
except
result := Now;
end;
end;
// ...
Creating and researching code snippets takes time and effort. You’re welcome to share them through your own platforms, but please don’t forget to credit the original author, here: Jean-Pierre LESUEUR.
Depends On
Featured Windows APIs
Created
September 17, 2025
Last Revised
September 17, 2025