如何在Webbrowser浏览网页时，让所有的连接都在Webbrowser内打开！(100分)

F

foxczf

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-11

• #1

我在用 Webbrowser 浏览网页时，点击里面的连接，他会弹出新的IE窗口！

请问我怎么才能让他都在Webbrowser内打开！

 

N

naughtboy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-11

• #2

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;

 

F

foxczf

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-15

• #3

我怎么才能让他都在同一个 Webbrowser内打开！
“不弹出新的窗口”

 

5

5291

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-15

• #4

假设你的WebBrowser叫MyWB;

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

就这么简单。保证觉得不会在新页面打开。

 

F

foxczf

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-07-16

• #5

现在是页面也打不开了！哎~~~~~~~~~~~~

 

F

foxczf

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-03-31

• #6

多人接受答案了。