delphi webbrowser1 网页弹出 确认 阻止或拦截的问题

[happy_gqb2]

delphi开发的程序，使用webbrowser1对某个网页 自动填表和自动提交后，网页弹出 确认 ，怎样阻止或拦截呢？

网页弹出的确认是一个对话框窗口，标题为，Microsoft Internet Explorer，

对话框窗口提示内容为报名成功，

对话框窗口有个确认按钮


现在的问题是，我能干掉这个窗口，只是效率低，我需要的是，不弹出这个窗口，或者在他不显示前，就快速的干掉他，

[bdmh]

搞个timer，频率高点，找这个窗体然后发送关闭消息

[kye_jufei]

webbrowser去攔截網頁彈出的廣告。。。

[kye_jufei]

eg:


WebBrowser中有這樣一個事件NewWindow2，其中有兩個參數：
var ppDisp: IDispatch; var Cancel: WordBool
第一個參數是變參，用於指定新視窗
第二個參數也是變參，用於控制是否可以觸發NewWindow2事件,當我們流覽一個頁面的時候，如果有快顯視窗的話，我們就可以用第一個參數，把彈出的視窗，截取到另一個WebBrowser裡面了。
ppDisp:=WebBrowser_NewWin(截取快顯視窗).Application;
也可以不截取，不讓觸發，Cancel:=True就可以了

[ysai]

找个 Embedded Web Browser 组件,用它替代TWebBrowser
它有个事件能处理网页弹出的对话框

[likeyrain]

[Quote=引用 3 楼 kye_jufei 的回复:]

eg:


WebBrowser中有這樣一個事件NewWindow2，其中有兩個參數：
var ppDisp: IDispatch; var Cancel: WordBool
第一個參數是變參，用於指定新視窗
第二個參數也是變參，用於控制是否可以觸發NewWindow2事件,當我們流覽一個頁面的時候，如果有快顯視窗的話，我們就可以用第一個參數，把彈出的視窗，截取到另一個WebBrow……
[/Quote]

这个支持一下，另外有个Slient的属性，设为true可以去掉网页上错误提示

[幻影]

既然已经载入了这个页面,那么你可以取消这个按钮的单击事件,或者是重新定义它.然后再点击它.这样就可以屏蔽那个弹出窗口了.