Форум: "WinAPI";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.28;
Скачать: [xml.tar.bz2];




Вниз

Как запретить запускать ехе шник ??? 


Art   (2001-11-27 15:53) [0]

Мне надо чтоб если ексе файл добавлен в список,то он не запускается!!!



Fellomena   (2001-11-27 16:11) [1]

Сто раз спрашивали сто раз отвечали...
Мне только что в голову пришёл ещё один извращённейший рецепт, хех :
1). положим добавляешь ты какой-то файл в список неоткрываемых файлов
в своей программе (хех...)
2). берёшь: var f: TextFile; затем Assign(f);
3). открываешь файл как rw и вырезаешь первые (ну сколько) 13 байт ;)
4). сохраняешь эти 13 байт где-то (реестр, ini-файл, конец того файла, который ты режешь)
5). результат - файл просто не запускается.
6). Если удаляешь файл из списка запрещённых к открытию файлов - делаешь
обратные действия, востанавливая старую структуру файла.

Этот способ некоторые поборники высокого стиля программирования назвали бы трюком и
были бы правы, потому как это он и есть 8)
...извратсссс

А вообще-то лучше конечно hook написать 8)



Виктор Щербаков   (2001-11-27 16:26) [2]

Можно поставить ловушку на создание окон и анализировать имя
exe"шника каждого вновь создаваемого окна.
Если оказалось в списке - убивать процесс. Но запуск экзешника не всегда предполагает создание окон, так что такое решение не полное.
Лучше пользоваться готовыми программами типа FolderGuard или перейти на другую OS.



Art   (2001-11-27 18:32) [3]

Виктор, Мы на форуме программистов,а не узверей.Мне интересно то ,кек я могу сделать то,что мне надо!!!!То есть СОЗДАТЬ!!А не использовать!



Иван Шихалев   (2001-11-27 19:07) [4]

SetWindowsHookEx, WH_SHELL



paul_shmakov   (2001-11-28 02:44) [5]

можно перехватывать функцию CreateProcess. ищи на тему "перехват вызовов api".




Форум: "WinAPI";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.28;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.023 c
1-90313           NLO                   2002-01-11 07:10  2002.01.28  
AutoCAD


1-90271           RomaRomaRoma          2002-01-09 19:29  2002.01.28  
Язык текста в RichEdit


4-90416           Роман55               2001-11-26 09:11  2002.01.28  
Рабочий стол


1-90299           Даггер                2002-01-08 11:49  2002.01.28  
Хочется извратиться, а знаний не хватает...


3-90199           RealyGrey             2001-12-22 14:15  2002.01.28  
Как в IB с помощью SQL запроса получить метаданные определенной таблицы?