| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
OnNewWindow2 в динамически созданном браузере
ТехникПТО © (2005-01-28 13:21:00)Как отлосвить событие OnNewWindow2 в динамически созданном браузере?
ТехникПТО (2005-01-28 14:03:00) [1]Пасиб... у меня все так и было :) только я забывал повторить данное действие :)
SergP. (2005-01-28 13:33:00) [2]
...
var
WbNew:TWebbrowser;
begin
WbNew:=TWebbrowser.Create(self); // Создаем объект
TOleControl(WbNew).Parent:=Form1; // Устанавливаем родителя
WbNew.OnNewWindow2:=WbNewNewWindow2; // Устанавливаем процедуру обработки события
...
// Сама процедура обработки события
procedure TForm1.WbNewNewWindow2(Sender: TObject;
var ppDisp: IDispatch; var Cancel: WordBool);
begin
...
end;
| |
