-
здравствуйте!
подскажите, кто знает, как открыть из WebBrowser1 всплывающее окно в компонент WebBrowser2, находящийся в этом же приложении?
заранее благодарен -
zhenia © (27.08.11 21:39) [1]тоже интересно как это сделать
-
procedure TForm1.Button1Click(Sender: TObject);
begin
WebBrowser1.Navigate('google.ru');
end;
procedure TForm1.WebBrowser1NewWindow2(Sender: TObject;
var ppDisp: IDispatch; var Cancel: WordBool);
begin
ppDisp:=WebBrowser2.ControlInterface;
end;
PS: Метод TForm1.WebBrowser1NewWindow2 нужно назначить обработчиком события OnNewWindow2 для webBrowser1.