求教关于TWebBrowser的几个问题(300分)

  • 主题发起人 主题发起人 xself
  • 开始时间 开始时间
X

xself

Unregistered / Unconfirmed
GUEST, unregistred user!
1、如何访问在TWebBrowser中打开的网页所包含的对象及调用其中的函数?
2、如何在TWebBrowser中禁用Scripts?
3、如何在TWebBrowser中拦截window.close而不关闭窗口,并弹出关闭窗口的对话框?
4、如何在TWebBrowser中拦截Scripts所弹出的对对话框,或者是在对话框弹出后如何将其关闭(最好不要用SendKey一类的方法)?

如果有第三方控件可以解决以上问题也可
 
看看这本书
http://www.delphibbs.com/delphibbs/dispq.asp?lid=2482736
 
你的通过webbrowser访问网页,且不让广告窗口弹出好象这样做的。

webbrowser中有一个onNewWindow2 方法,只需要把 cancel := True 就可以了。
procedure TForm1.WebBrowser1NewWindow2(Sender: TObject;var ppDisp: IDispatch; var Cancel: WordBool);
begin
cancel := True;
end;
 
我说的是不让弹出对话框,而不是新浏览器窗口
 
在浏览新窗口之前对URL进行判断吧。第三点问题我也想到到解决的方法。
 
找到一个TAWebBrowser,可以截获window.close(),在2003下可以使用,但在2000下还是会弹出关闭窗口的对话框
 
先分析tawebbrowser的html碼,對其進行過濾,之後再顯示就行了...
 
怎么过滤啊?能不能详细一点?
 
对呀?怎么过滤啊,好像没有办法修改获得的html代码啊?
我想用TWebBrowser访问一个网页的时候,过滤掉其中的一些元素
比如过滤掉一些图片,flash之类的
不知道怎么搞
 
建议你使用TEmbeddedWB,对各种操作都给了你非常好的事件
禁用Scripts这些事就设一下属性即搞定
http://www.euromind.com/iedelphi/
 
http://www.euromind.com/iedelphi/
 
TEmbeddedWB的确好用,但还是不知道怎么访问网页中的对象啊
 
后退
顶部