Форум: "Начинающим";
Текущий архив: 2006.06.04;
Скачать: [xml.tar.bz2];
ВнизСвойство фала Найти похожие ветки
← →
KyRo (2006-05-17 13:59) [0]Подскажите как узнать время создания и модификации файла ?
← →
manevil (2006-05-17 14:19) [1]GetFileDate
← →
manevil (2006-05-17 14:20) [2]
function GetFileDate(TheFileName: string): string;
var
FHandle: integer;
begin
FHandle := FileOpen(TheFileName, 0);
result := DateTimeToStr(FileDateToDateTime(FileGetDate(FHandle)));
FileClose(FHandle);
end;
← →
Fay © (2006-05-17 14:34) [3]2 manevil (17.05.06 14:20) [2]
Фигня это. Не факт, что получится открыть файл.
Нужно брать FindFirst(File)
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2006.06.04;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.04 c