Функция FileDateToDateTime в Delphi конвертирует формат даты/времени файла в значение TDateTime.
SysUtils unit
function FileDateToDateTime (const FileDate : Integer) : TDateTime;
Функция FileDateToDateTime конвертирует Целое значение числа FileDate (полученное, например, из FileAge) к более управляемому формату TDateTime.
Есть много подпрограмм в 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;
Результат
Unit1.DCU дата последнего изменения = 10/01/2007
Похожие функции, процедуры и команды
DateTimeToFileDate — преобразует значение TDateTime в формат date/time формат файла.
FileAge — получение даты/время последнего изменения файла, не открывая его.
FileSetDate — установка даты и времени последнего изменения файла.
