Как получить дату и время создания файла в виде 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;

Недавно добавленные исходники
• DeLiKaTeS Tetris (Тетрис) 3 634 • TDictionary Custom Sort 5 768 • Fast Watermark Sources 5 576 • 3D Designer 8 154 • Sik Screen Capture 5 876 • Patch Maker 6 357 • Айболит (remote control) 6 346 • ListBox Drag & Drop 5 207 • Доска для игры Реверси 94 488 • Графические эффекты 6 541 • Рисование по маске 5 611 • Перетаскивание изображений 4 729 • Canvas Drawing 5 107 • Рисование Луны 4 831 • Поворот изображения 4 383 • Рисование стержней 3 091 • Paint on Shape 2 328 • Генератор кроссвордов 3 197 • Головоломка Paletto 2 526 • Теорема Монжа об окружностях 3 301 • Пазл Numbrix 2 176 • Заборы и коммивояжеры 2 825 • Игра HIP 1 796 • Игра Go (Го) 1 717 • Симулятор лифта 2 049 • Программа укладки плитки 1 775 • Генератор лабиринта 2 215 • Проверка числового ввода 1 896 • HEX View 2 199 • Физический маятник 1 889

Как получить дату и время создания файла в виде TDateTime

Похожие по теме исходники