Как получить дату и время создания файла в виде TDateTime
Чтобы получить дату и время файла, необходимо вызвать функцию FileAge и
преобразовать полученное значение при помощи функции FileDateToDateTime в
значение TDateTime:
function GetFileDateTime(FileName: string): TDateTime;
var
intFileAge: LongInt;
begin
intFileAge := FileAge(FileName);
if intFileAge = -1 then
Result := 0
else
Result := FileDateToDateTime(intFileAge)
end;
Статья Как получить дату и время создания файла в виде TDateTime раздела Файловая система Файлы может быть полезна для разработчиков на Delphi и FreePascal.
