请问关于TWebBrowser的问题

Question

我想用一个TWebBrowser控件打开一个网站，比如说是www.163.com如何做才能实现打开新链接的时候也是以这种窗体的形式打开！
谢谢！

Answer 1

 procedure TForm1.WebBrowser1NewWindow2(Sender: TObject;
    var
      ppDisp: IDispatch; var Cancel: WordBool);
    var
      NewWindow: TForm2;
    begin
       //exit;
       NewWindow:= TForm2.Create(nil);
       NewWindow.Show;
       ppDisp:= NewWindow.Webbrowser1.DefaultDispatch;
    end;    本文来自“十万个为什么”电脑学习网 http://www.why100000.com