Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.04.18;
Скачать: CL | DM;

Вниз

Как сделать файл НЕ УДАЛЯЕМЫМ в определенный момент   Найти похожие ветки 

 
Petrovitch   (2004-02-16 11:38) [0]

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


 
DeadMeat ©   (2004-02-16 17:06) [1]

В это время, открыть их с "монопольным" доступом


 
clickmaker ©   (2004-02-16 18:10) [2]

Если на NTFS, сбросить право на удаление. См. SetFileSecurity


 
Александр1   (2004-02-16 19:13) [3]

А как это сделать на delphi? Открыть их с "монопольным" доступом????????


 
Zew ©   (2004-02-16 19:32) [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


 
Petrovitch   (2004-02-17 17:12) [5]

Нет, братцы. Не то.
Отдельные файлы Windows держит под себя. И их никак не удалишь из под Windows. Как бы указать (и где) Windows"у что определенные файлы "типа его" ?
Мне нужно что бы определенные файлы с какого-то момента всегда были защищены от удаления....


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


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

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


 
juicenman   (2004-02-18 21:59) [7]

какая система?



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

Текущий архив: 2004.04.18;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.069 c
6-1076800567
dr Tr0jan
2004-02-15 02:16
2004.04.18
Attachment в TIdSMTP


1-1080356184
новичок_из_сыктывкара
2004-03-27 05:56
2004.04.18
ascii код backspace


3-1079809775
DIS
2004-03-20 22:09
2004.04.18
таблица (Paradox)


7-1077289878
Cerber
2004-02-20 18:11
2004.04.18
Работа с клавишами


1-1080536318
race1
2004-03-29 08:58
2004.04.18
findnextprinterchangenotification