Форум: "Начинающим";
Текущий архив: 2007.01.14;
Скачать: [xml.tar.bz2];

Вниз

Изменение даты создания файла   Найти похожие ветки 

← →
kukuikar ©   (2006-12-22 12:41) [0]

Такая процедура изменяет дату последненго изменения файла.
procedure CopyFileDate(const Source, Dest: String);
var
 SourceHand, DestHand: word;
begin
 SourceHand := FileOpen(Source, fmOutput);
 DestHand := FileOpen(Dest, fmInput);
 FileSetDate(DestHand, FileGetDate(SourceHand));
 FileClose(SourceHand);
 FileClose(DestHand);
end;

А как можно изменить и все остальные даты, (создания навсегда)?

---

← →
Anatoly Podgoretsky ©   (2006-12-22 12:49) [1]

> kukuikar  (22.12.2006 12:41:00)  [0]

SetFileTime

---

Страницы: 1 вся ветка

Форум: "Начинающим";
Текущий архив: 2007.01.14;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.013 c