有用过TEmbeddedWB的高手吗？(200分)

TEmbeddedWB可以实现显示所有连接的吗？不用在创建另一个。
procedure TForm1.WebBrowser1NewWindow2(Sender: TObject;
var ppDisp: IDispatch;
var Cancel: WordBool);
begin
ppDisp:=WebBrowser1.DefaultDispatch;
end;
这是TWebBrowser用的

自己顶一下