使用TWebBrowser时,如何屏蔽掉“自动下载文件”? (100分)

1.使用TWebBrowser时如何屏蔽掉“Internet Explorer 脚本错误”、javascript生成的小窗口、安装某插件、安装某语言包、自动下载文件等提示信息?让TWebBrowser安安静静的访问Web而不受这些对话框的打扰？silent:=true;设了不能屏蔽自动下载文件的提示...

2.判断一个接口为空接口的程序如何写？
《WebBrowser编程简述》 http://www.delphibbs.com/keylife/iblog_show.asp?xid=247 一文中的“第１０、提取网页中所有链接”部分提到用语句
　　var
　　　all:IHTMLElementCollection;
　　　item:OleVariant;
　　...
　　　　item:=all.item(i,varempty);　　　　　　　　//EmpryParam亦可
来获取链接对象，实际编程时调试发现item有时会=$000000，即为空接口，此时再存取item.href就会报EAccessviolation错，此时应该加一个判断一个接口为空接口的语句，我尝试用
if item<>$00000000 then
if item<>nil then
if not Assigned(item) then
if VarIsNull(item) then
if varisempty(item) then
等语句来判断，要不就是编译通不过，要不就是程序报错，这个语句究竟该如何写法？我现在用 if IDispatch(item)=nil then 不知这种写法对不对？

(附： function item(name: OleVariant; index: OleVariant): IDispatch; safecall

if not item is Interface then ....

用Try except

if varisnull(item) and (varisempty(item)) then exit

讨厌的download对话框，如何屏蔽，哪位高人有以教我？

帮助你ding!

获得网页所有连接,在beforenagivate判断文件类型如.zip,if pos('.zip',url)>0 then cancel:=true;