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

Вниз

Как програмно заблокировать pop-up окна?   Найти похожие ветки 

 
leonidus   (2004-10-01 14:03) [0]

Пишу программку для блокировки pop-up окон в Internet Explorer`e, но столкнулся с проблемой как перехватить клик по ссылке в окне IE, т.е.  вытинуть URL ссылки по которой делаеться клик?
Может кто-то сталикивался - пожалуйста подскажите, очень надо!!!


 
gid ©   (2004-10-01 14:58) [1]

Ищи окна в системе и сравнивай их заголовоки со списком запрещенных или с размерами, а затем просто закрывай если совпадет.


 
leonidus   (2004-10-01 21:08) [2]

это очень узко получится, хотелось бы более изящно на уровне системы а не юзера


 
Dimaxx   (2004-10-02 12:57) [3]

Ставь СП2 на ХРюшу - там уже мелкософт все сделал для закрытия.


 
Ihor Osov'yak ©   (2004-10-02 14:06) [4]

2 Как програмно заблокировать pop-up окна?

Зачем? Снова велоситед изобретаем?

По существу.
Смотрите в сторону BHO (browser helper object). Там легко получаем в руки IWebBrowser2 от любой интстанции IE. Далее подписка на  соотв. нотификационный интерфейс, с его BeforeNavigate, NewWindow, etс..

Правда, при таком подходе  на уровне NewWindow трудно отличить результатом чего появляется новое окно - результат клика юзера, или результат срабатывания  какого-то скрипта.. Более радикальным есть перехват IHtmlWindow2.Open - собственно по линии  этого метода почти всегда идут попапы и почти никогда - результат клика по ссылке. Во всяком случае на нормальных сайтах. Ну и преимузество здесь то, что при перехвате IHtmlWindow2.Open сразу имеем в руках урл, а при работе на уровне NewWindow будет немного проблема с получением урл..



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

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

Наверх




Память: 0.47 MB
Время: 0.054 c
6-1092020633
Максим
2004-08-09 07:03
2004.10.17
Имя компа


1-1097039937
qwe
2004-10-06 09:18
2004.10.17
Проблема с установкой EhLib 3.5 Components


11-1081438953
Delphi5.01
2004-04-08 19:42
2004.10.17
Mojet oshibka? Result:=PCheckMesh(NewPanel(AParent, EdgeStyle));


14-1096354059
Григорьев Антон
2004-09-28 10:47
2004.10.17
У кого Windows 98 и ME - помогите


4-1095149940
akim2
2004-09-14 12:19
2004.10.17
Параметры запуска сервиса