Delphiran - Delphi Tips Question : How can I
decode a TFileTime to a TDateTime ?
Answer
: function
FileTimeToDateTime(ft:TFileTime):TDateTime; var ft1:TFileTime; st:TSystemTime; begin if ft.dwLowDateTime+ft.dwHighDateTime=0 then Result:=0 elsebegin FileTimeToLocalFileTime(ft,ft1); FileTimeToSystemTime(ft1,st); Result:=SystemTimeToDateTime(st);
end;
end;