Функция FileDateToDateTime – конвертирует формат даты/времени файла в значение TDateTime

Функция FileDateToDateTime в Delphi конвертирует формат даты/времени файла в значение TDateTime.

Функция FileDateToDateTime: Преобразование даты последнего изменения файла в значение TDateTime

var
  fileName   : string;
  fileDate   : Integer;

begin
  // Попытка открыть файл Unit1.DCU для текущего проекта
  fileName := 'Unit1.DCU';
  fileDate := FileAge(fileName);

  // Мы получили возраста файла?
  if fileDate > -1 then
    ShowMessage(fileName+' дата последнего изменения = '+
                DateToStr(FileDateToDateTime(fileDate)));
end;

Main Menu