Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Как сделать файл НЕ УДАЛЯЕМЫМ в определенный момент [D5, D6]

Petrovitch © (2004-02-16 11:38:00)
Имеется сеть. Где-то на диске(HDD) укладываются файлы. Эти файлы можно удалять, но по истечении определенного времени нужно сделать так что бы файлы удалить с диска было невозможным.
Есть-ли у кого соображения. Я понимаю, что защиты от дурака нет, но все же...

juicenman (2004-02-18 21:59:00) [1]
какая система?

Плохиш (2004-02-17 17:17:00) [2]

> Petrovitch (17.02.04 17:12) [5]
> Нет, братцы. Не то.
> Отдельные файлы Windows держит под себя. И их никак не удалишь
> из под Windows

Это файлы, которые используются вындовс в данный момент, т.е. открытые.

Petrovitch (2004-02-17 17:12:00) [3]
Нет, братцы. Не то.
Отдельные файлы Windows держит под себя. И их никак не удалишь из под Windows. Как бы указать (и где) Windows'у что определенные файлы "типа его" ?
Мне нужно что бы определенные файлы с какого-то момента всегда были защищены от удаления....

Zew (2004-02-16 19:32:00) [4]
var
fs: TFileStream;

procedure TForm1.Button1Click(Sender: TObject);
begin
fs:=TFileStream.Create('C:\Zew.txt', fmOpenRead, fmShareDenyNone);//Ставим ограничение
end;

procedure TForm1.Button2Click(Sender: TObject; var Action: TCloseAction);
begin
fs.Free;//Снимаем ограничение.
end

Александр1 (2004-02-16 19:13:00) [5]
А как это сделать на delphi? Открыть их с "монопольным" доступом????????

clickmaker (2004-02-16 18:10:00) [6]
Если на NTFS, сбросить право на удаление. См. SetFileSecurity

DeadMeat (2004-02-16 17:06:00) [7]
В это время, открыть их с "монопольным" доступом

Наверх

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