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

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

блокирование набора


Страницы:   1 2

Novichek ©   (2002-11-05 19:15:00) 

кто знает как блокировать набор "C:\", "D:\" в командной строке Explorer"a, Oper"ы, Netscape и др...


Reindeer Moss Eater   (2002-11-11 20:05:00) [21]

Например.
Ну загрузился я в безопастном режиме и где будет после этого твоя защита? Кто заставит меня её запустить?


Novichek   (2002-11-11 20:03:00) [22]

в смысле ерунда? обьясни!или тут есть способ обхода от этой защиты?


Reindeer Moss Eater   (2002-11-11 20:02:00) [23]

Я же не утверждал, что браузер не закроется.


Reindeer Moss Eater   (2002-11-11 19:59:00) [24]

Так я и говорю, что
Это от происков младшей сестренки поможет. А вообще ерунда полная.
А ты несогласен.


Novichek   (2002-11-11 19:40:00) [25]

Reindeer Moss Eater (11.11.02 18:53)
а я тебе ее насильно и не впариваю!!!! Это просто один из способов защиты от такого несанкционированного проникновения, как говорится: "Дешево и Сердито!"


Reindeer Moss Eater   (2002-11-11 18:53:00) [26]

>Novichek ©
Это обходить и не надо.
После того как мой браузер первый раз закроется таким образом, твоя программа с этой защитой больше не будет запускаться на моей машине.


Novichek   (2002-11-11 18:34:00) [27]

Reindeer Moss Eater (11.11.02 09:34)
а ты пробовал обойти это? при любой попытке выхода браузера на диски C, D, E.... он закрывается.


Reindeer Moss Eater   (2002-11-11 09:34:00) [28]

Это от происков младшей сестренки поможет. А вообще ерунда полная.


Novichek   (2002-11-11 02:23:00) [29]

>Cobalt © (08.11.02 22:06)
Исходник здесь:
http://www.sources.ru/delphi/delphi_get_active_url.shtml

я только добавил эти строки и все заработало как надо:

procedure TForm1.Timer1Timer(Sender: TObject);
var
adr_str1, adr_str2, adr_str3:string;
aa:string;
begin
adr_str1:=Get_URL("Netscape");
adr_str2:=Get_URL("IExplore");
adr_str3:=Get_URL("Opera");
label1.Caption:=adr_str1;
label2.Caption:=adr_str2;
label3.Caption:=adr_str3;
if pos("file",adr_str1)<>0 then
begin
aa:= copy(adr_str1,pos(",",adr_str1)+2,length(adr_str1)-pos(",",adr_str1)-5)
+" - Netscape";
postmessage(FindWindow(Nil, pchar(aa)), WM_close, 0, 0);
MessageDlg("Доступ к накопителям информации закрыт Администратором! Приложение будет закрыто!", mtError,[mbOk], 0, mbOk);
end;

if pos("file",adr_str2)<>0 then
begin
aa:= copy(adr_str2,pos(",",adr_str2)+2,length(adr_str2)-pos(",",adr_str2)-2)
+" - Microsoft Internet Explorer";
postmessage(FindWindow(Nil, pchar(aa)), WM_close, 0, 0);
MessageDlg("Доступ к накопителям информации закрыт Администратором! Приложение будет закрыто!", mtError,[mbOk], 0, mbOk);
end;

if pos("file",adr_str3)<>0 then
begin
aa:= copy(adr_str3,pos(",",adr_str3)+2+9,length(adr_str3)-pos(",",adr_str3)-12);
aa:="Opera - [ "+aa+" ]";
postmessage(FindWindow(Nil, pchar(aa)), WM_close, 0, 0);
MessageDlg("Доступ к накопителям информации закрыт Администратором! Приложение будет закрыто!", mtError,[mbOk], 0, mbOk);
end;

end;


Cobalt   (2002-11-08 22:06:00) [30]

>Novichek © (08.11.02 20:00)
я уже нашел как это сделать. можете не спорить.


ну так, сказал бы...


Novichek   (2002-11-08 20:00:00) [31]

я уже нашел как это сделать. можете не спорить.


Opuhshii   (2002-11-08 15:39:00) [32]

;) это только для IE, для NN видел что-то,. а вот для Oper"ы,. даже незнаю... ;))


Opuhshii   (2002-11-08 15:37:00) [33]

да писал уже сюда подобное,...
IShellWindows, IWebBrowser, DWebBrowserEvents, DWebBrowserEvents2, DShellWindowsEvents тебе нужны,..


Ketmar   (2002-11-08 15:10:00) [34]

хук на клаву? %-))

Satanas Nobiscum! 08-Nov-XXXVII A.S.


Xemax   (2002-11-08 13:33:00) [35]

>>DeviceIoControl
>>Novichek © (05.11.02 19:58)
>>в смысле?
MSDN


Cobalt   (2002-11-08 10:47:00) [36]

IMHO, никак.


Novichek   (2002-11-07 19:20:00) [37]

кто знает как блокировать набор "C:\", "D:\" в командной строке Explorer"a, Oper"ы, Netscape и др...


Novichek   (2002-11-05 19:58:00) [38]

в смысле?


Xemax   (2002-11-05 19:18:00) [39]

можно заблокировать целый том c помощью DeviceIoControl


Страницы:   1 2

Наверх

Титульная страница Поиск, карта сайта Написать письмо