使用webbrowser作为浏览器,网页中使用window.alert("")弹出一个提示框,如果通过程序将该提示框关掉,或者使它不出现。
解决方案 »
- 问一个关于XPMenu的问题
- 谁能告诉我用ADO做个3层的数据库系统,c/s模式的连SQL数据库的步骤啊?
- fasereport设计器问题
- Indy 9自带demo "DNSResolver Client" 编译出错,但其他的demo都可以,真是怪事。请大家帮忙看一下
- 谁能给个进销存的方案,学习用?
- QQ大秘密
- 寻 delphi7的关于ado的补丁链接以及delphi7 2003-3-12发布的updates
- 用wininet 登录网站 如何知道登录已经成功了。
- 一个不知道怎么做,但很简单的统计问题?
- 关于TStringGrid控件的显示问题
- 请帮忙解决一下.
- 本人经过半年多的努力开发的中式报表系统(AnyCell Report),欢迎下载!并请大家多多关注!
你研究一下newwindow2这个过程
它可以禁止弹出式窗口。
遍历当前进程的全部窗体,如果类名是弹出的对话框则发送关闭消息~~
//参考如下函数~~
EnumWindows(); //搜索全部窗体~~
GetWindowThreadProcessId(); //到得当前窗体所在进程ID~~
GetClassName(); //取得窗体的类型名~~
SendMessage(.., WM_CLOSE, .., ..);
Hwnd: THandle;
Hwnd := FindWindow(PChar('#32770'), PChar('Microsoft Internet Explorer'));
if Hwnd <> 0 then SendMessage(Hwnd, WM_CLOSE, 0, 0);
Hwnd: THandle;
Hwnd := FindWindow(PChar('#32770'), PChar('Microsoft Internet Explorer'));
if Hwnd <> 0 then SendMessage(Hwnd, WM_CLOSE, 0, 0);