Erstellungs-/Änderungs- und letzte Zugriffszeit

[shmia]

Delphi-Quellcode:

function ConvertFileTime(ft:TFileTime):TDateTime;
var
   st : TSystemTime;
begin
   if Windows.FileTimeToSystemTime(ft, st) then
      Result := SysUtils.SystemTimeToDateTime(st)
   else
      Result := 0.0;
end;

var
   erzeugt : TDatetime;
begin
   erzeugt := ConvertFileTime(search.FindData.ftCreationTime);