delphi webbrowser 点击后webb1中打开网页(不是弹出来新的IE)

Question

如何在 delphi webbrowser1 鼠标点击后webb1中的打开新的网页(不是弹出来新的IE)
也不是用webbrowser2 
只用一个webb去实现 点击webb网页后 webb中去打开新的页面 求解

Answer 1

procedure TForm1.WebBrowser1NewWindow2(Sender: TObject;
  var ppDisp: IDispatch; var Cancel: WordBool);
begin
  ppDisp := WebBrowser1.Application;
end;

Answer 2

上面的代码不能实现，如果只在一个WebBrowser1中打开所有页面只能在点击的时候获取链接的地址，但不好实现。你可以试下，我之前试过碰到了多个Frame时还是有问题。
不知道你需求是怎样的，像浏览器浏览网页不是全在本页面打开的啊。如果是自己要做个模拟浏览器的功能的话你可以在NewWindow2中把ppDisp := 另一个webbrowser.Application.这样就会就另一个webbrowser中打开链接。
http://download.csdn.net/source/2085067这里有个浏览器例子。希望对你有帮助。