230问答网 > delphi 用sendmessage向窗体发送关闭信息!但是窗体有关闭提示信息的对话框! 怎么才能把他关闭呢!

delphi 用sendmessage向窗体发送关闭信息!但是窗体有关闭提示信息的对话框! 怎么才能把他关闭呢!

2024-12-16 08:24:55

推荐回答（2个）

回答1：

那个关闭提示一样有窗口的可以通过findwindow找到并关闭
比如说我的程序以下代码运行在timer里在监视浏览器弹出这个窗口就自动关闭它

var
h:HWND;

h := FindWindow(nil, 'Internet Explorer 脚本错误');
if h>0 then
begin
PostMessage(h,WM_SYSCOMMAND, SC_CLOSE,0);
end;

如果这个弹出对话框时带yes or no 的选择的，那你可以看看他们的快捷按键
然后发送按键消息到这个对话框。关闭。

回答2：

什么提示呢