Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Программная инженерия > Безопасность, Шифрование
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 05.12.2006, 09:33   #1
Andrey
Новичок
Джуниор
 
Регистрация: 05.12.2006
Сообщений: 2
По умолчанию Запрет изменения содержимого каталог

Здравствуйте, подскажите пожалуйста как с помощью Delphi запретить удаление и изменение содержимого каталога (папки) в Windows XP. Или как поставить пароль на папку?
Andrey вне форума Ответить с цитированием
Старый 05.12.2006, 14:32   #2
mihali4
*
Старожил
 
Регистрация: 22.11.2006
Сообщений: 9,201
По умолчанию

Можно написать прогу, которая будет постоянно сидеть в памяти и не выпускать файлы из-под своего контроля, не давая никакого доступа к ним другим программам, в том числе и копирующей. Делается это так:



// Естественно, вместо D:\gigi.txt — твой файл.
// Из конференции Expert_FAQ

var
Form1: TForm1;
// через этот поток мы будем работать с файлом.
// Для нескольких файлов — несколько потоков.
fs: TFileStream;

implementation
{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
begin
// вешаем ограничение. Теперь никто не будет трогать файл
fs:=TFileStream.Create('D:\gigi.txt ', fmOpenRead, fmShareDenyNone);
end;

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

Взято из ДельфиВорлд...
mihali4 вне форума Ответить с цитированием
Старый 28.09.2009, 10:57   #3
L_M
Форумчанин Подтвердите свой е-майл
 
Регистрация: 25.02.2008
Сообщений: 289
По умолчанию

Вот столкнулся с такой же проблемой, только необходимо ограничить доступ к папке. Есть ли аналогичный способ? И как будет на это реагировать антивирус?
Упс...
L_M вне форума Ответить с цитированием
Старый 28.09.2009, 10:58   #4
Alex Cones
Trust no one.
Старожил
 
Аватар для Alex Cones
 
Регистрация: 07.04.2009
Сообщений: 6,526
По умолчанию

http://www.programmersforum.ru/showt...E5%ED%ED%E0%FF
Идея здесь, додумаешь сам.
SQUARY PROJECT - НАБОР БЕСПЛАТНЫХ ПРОГРАММ ДЛЯ РАБОЧЕГО СТОЛА.
МОЙ БЛОГ
GRAY FUR FRAMEWORK - УДОБНАЯ И БЫСТРАЯ РАЗРАБОТКА WINAPI ПРИЛОЖЕНИЙ

Последний раз редактировалось Alex Cones; 28.09.2009 в 11:01.
Alex Cones вне форума Ответить с цитированием
Старый 28.09.2009, 21:55   #5
L_M
Форумчанин Подтвердите свой е-майл
 
Регистрация: 25.02.2008
Сообщений: 289
По умолчанию

Цитата:
Сообщение от Alex Cones Посмотреть сообщение
Идея здесь
Какая там идея, я не понял? Что ничего все равно не получиться?
Упс...
L_M вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Копирование в каталог windows Черничный Общие вопросы Delphi 2 23.07.2008 03:52
корневой каталог windows vicvtor Win Api 4 22.07.2008 23:58
Электронный каталог техники. mihali4 Софт 4 24.04.2008 09:27
каталог фотографий mager PHP 8 27.03.2008 22:43
Запрет изменения даты Viteef Общие вопросы Delphi 0 20.02.2008 05:09