Справочник функций и процедур Delphi: FileAge
  Навигация по первой букве:

A  B  C  D  E  F  G  H  I  J  K  L  M  N  O  P  Q  R  S  T  U  V  W  X  Y  Z
  Навигация по категории:

Compiler directives, Directives, Keywords / Types, Variables, Constants / Functions, Procedures

FileAge
Функция		 Получение датя/время последнего изменения файла, не открывая его SysUtils unit
  function FileAge ( const FileName : string ) : Integer;

Delphi Sources

Описание
Функция FileAge возвращает дату и время последнего изменения файла FileName.

Нет никакой потребности в открытие или закрытие файла - эта функция обрабатывает эти операции без них.

Возвращенное значение находится в 32 битном разделенном формате. Используйте функцию FiledateToDateTime, чтобы конвертировать в управляемое значение TDateTime.

Если дата файла не найдена (например, FileName было ошибочное), то возвращается -1.
Похожие команды
DateTimeToFileDate  Преобразует значение TDateTime в формат date/time формат файла

FileDateToDateTime  Конвертирует формат даты/времени файла в значение TDateTime

FileSetDate  Установка даты и времени последнего изменения файла

FileGetAttr  Выдаёт атрибуты файла

FileSetAttr  Устанавливает атрибуты файла

  
Пример кода : Получение даты последнего изменения текущего файла формы Модуля
var
  fileName   : string;
  fileDate   : Integer;

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

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

Unit1.DCU дата последнего изменения = 10/01/2007