有关webbrower的几个问题(200分)

  • 主题发起人 主题发起人 whj2003
  • 开始时间 开始时间
W

whj2003

Unregistered / Unconfirmed
GUEST, unregistred user!
1。用webbrower控件打开一个页面后,点击其中的一个链接,有时会在一个弹出的ie窗口
中打开这个页面,请问如何使之在webbrower控件中直接打开,而不弹出ie窗口。
2。navigate时有时应链接失败可能会弹出一个对话框“Interner explore 无法打开
站点http://www.sohu.com/ad/er,与服务器的连接被重置。”请问如何使这个消息框
不弹出来。
3。navigate时有时应链接失败可能会弹出一个对话框询问是否下载插件,请问如何使
这个对话框不弹出来。
4。navigate时有时应链接失败可能会弹出一个对话框说明网页有脚本错误,请问如何使
这个对话框不弹出来。

 
贴上来如何?!
 
1、
procedure TmainForm.WB_mainNewWindow2(Sender: TObject;
var ppDisp: IDispatch; var Cancel: WordBool);
begin
ppdisp:=wb_child.DefaultDispatch;
end;

2、3、4
把Silent设为True
 
谢谢honestman!
ppdisp:=wb_child.DefaultDispatch;中的wb_child是另一个webbrowser吗?
我想要在原来的webbrowser中打开这个页面,该这么写?
 
wb_child改成原来的webbrowser的名字就可以了。
 
>wb_child改成原来的webbrowser的名字就可以了
我试了,好像不行,点击连接没有反应(用新浪的新闻试的)
 
webbrowser有很多Bug的,看看以前的帖子就知道了。
 
我试过了
是可以的,就是honestman说的方法
不过如果你有多个form,要指明才行
比如
procedure TmainForm.WB_mainNewWindow2(Sender: TObject;
var ppDisp: IDispatch; var Cancel: WordBool);
begin
ppdisp:= FORM1 .wb_child.DefaultDispatch;
~~~~~~
//其中wb_child可以指定一个新的,也可以使用原来的
end;
 
1,2,3,4都可以用发消息的方法实现
 
多人接受答案了。
 
后退
顶部