如何用WEBBROWSER控件实现在浏览器中点击超链接时不弹出新窗口

来源:百度知道 编辑:UC知道 时间:2024/05/29 02:47:25
如何用WEBBROWSER控件实现在浏览器中点击超链接时不弹出新窗口
我用C#做的哦 我的QQ182199967 想做一个触摸屏的浏览器
希望可以帮我一下 很着急
不弹出新窗口 就是弹出新窗口的话 也在原来的窗口中打开
而不是关闭
着急的很 谁搞定我的问题 我给300分啦

控制打开新的页面在你的程序中,而不是默认用IE等别的浏览器。部分代码如下:
在窗口及WebBrowser创建完以后,写此代码:
WebBrowser.OnNewWindow2:=IE1NewWindow2;
给主窗口创建一个方法:
procedure TBrowForm.IE1NewWindow2(Sender: TObject; var ppDisp: IDispatch;var Cancel: WordBool);
Var NewForm:TBrowForm;
begin
try
NewForm :=TPopBrowerForm.Create(application);
NewForm.WebBrowser.OnNewWindow2 :=IE1NewWindow2;//如果在窗口的Oncreate事件
//有此代码,此处就可以省略
ppDisp := NewForm.WebBrowser.Application;
NewForm.Show;
Cancel:=false;
except
end;
end;