| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Дата и время создания файла, Модификация [D7, WinXP]

pixelweb ©   (2007-01-05 16:42:00) 

Здравствуйте, может кто сталкивался с такой проблемой?
Как осуществить модификацию даты и времени созданияфайла?
Вот например:

procedure fsetdate(fname:string);
var
 FileHandle : Integer;
 dat:TDate;
 dint:integer;
 st:string;
begin
 FileHandle := FileOpen(fname, fmOpenWrite or fmShareDenyNone);
 if FileHandle > 0 then
 begin
     st:='03.01.2007';
     dat:=StrToDateTime(st);
     dint:=DateTimeToFileDate(dat);
     FileSetDate(FileHandle, dint);
 end;
end;

Здесь я реализовал модификацию даты последнего изменения файла, но никак не могу найти способа зменить дату созданияфайла

---

pixelweb   (2007-01-06 00:12:00) [1]

Спасибо за направление, вроде что-то похожее получается :)

---

Anatoly Podgoretsky   (2007-01-05 17:07:00) [2]

> pixelweb  (05.01.2007 16:42:00)  [0]

АПИ функция SetFileTime

---

Наверх