关于webbrowser的问题，急，解决马上给分谢谢

Question

如何在WEBBROWSER控件中显示的网页中点击而弹出的页面不是以IE形式显示，而是以另一个WEBBROWSER或同一个WEBBROWSER中显示，知道的能告诉我吗？谢谢

Answer 1

最简单的办法：在超连接里加target属性为self；
最复杂的办法：编写浏览器插件控制浏览器的行为。

Answer 2

转贴
===============================在本窗口打开的功能：
procedure TForm1.FormCreate(Sender: TObject);
begin
  WebBrowser1.Navigate('http://www.codelphi.com/forum');
end;procedure TForm1.WebBrowser1NewWindow2(Sender: TObject;
  var ppDisp: IDispatch; var Cancel: WordBool);
var
  NewApp: TForm1;
begin
  NewApp := TForm1.Create(nil);
  NewApp.Visible := true;
  ppDisp := NewApp.webbrowser1.Application;
end;

Answer 3

procedure TForm1.WebBrowser1NewWindow2(Sender: TObject;
  var ppDisp: IDispatch; var Cancel: WordBool);
var
  NewApp: TForm1;
begin
  NewApp := TForm1.Create(nil);
  NewApp.Visible := true;
  ppDisp := NewApp.webbrowser1.DefaultDispatch;
end;