Показать сообщение отдельно
  #1  
Старый 27.05.2010, 10:15
kdy kdy вне форума
Прохожий
 
Регистрация: 23.05.2010
Сообщения: 7
Репутация: 10
По умолчанию Что я делаю не так... WebBrowser

пишу программу, которая должна выполнять в инете некоторую последовательность действий...
есть форма, на ней PageControl, на нем соответсвено два TabSheet, основной и дополнительный....
на основном WebBrowser, в котором выполняются определеные действия... при нажатии на одну из ссылок должно открываться новая закладка, по крайней мере во всех браузерах так делается
по умолчанию открывается ИЕ, но хоца, что бы открывалась закладка с новым WebBrowserом. для этого я надумал перехватить событие NewWindow2, но оно выдает ошибку... текст обработчика события привожу:
Код:
procedure TMainForm.WebBrowser1NewWindow2(Sender: TObject;
  var ppDisp: IDispatch; var Cancel: WordBool);
begin
  PageControl1.ActivePage := TabSheet2;
  WebBrowser2 := TWebBrowser.Create(TabSheet2);
  WebBrowser2.SetFocus;
  WebBrowser2.Align := alClient;
end;
Admin: Не забываем про теги!

что я делаю неправильно и как это поправить?
Ответить с цитированием