如何在程序里使用代码关闭由MessageBox()弹出的对话框？

最新推荐文章于 2024-07-24 13:25:03 发布

转载最新推荐文章于 2024-07-24 13:25:03 发布 · 477 阅读

1 ·

CC 4.0 BY-SA版权

原文链接：http://www.cnblogs.com/xieyunc/archive/2009/04/27/9126719.html

文章标签：

#c# #c/c++ #lua

本文介绍了一种通过Windows API函数FindWindow和PostMessage实现查找指定窗口并发送关闭消息的方法。利用这种方法可以在程序启动时检查是否有相同的窗口实例已打开，并对其进行操作。

方法：
用FindWindow找到窗口的hWnd，（可以通过窗口类名或标题），然后PostMessage(hWnd, WM_CLOSE, 0, 0);

Windows API 提供了函数FindWindow，可以让应用程序在启动时检查自己或其他应用程序是否已经存在。该函数在Delphi中的语法为：
　　function FindWindow(lpClassName: PChar, lpWindowName: PChar): HWND;
　　其中，参数lpCalssName 是要查找的窗口的类的名称，参数lpWindowName是要查找的窗口的标题(Caption)。如果找到了相应的窗口实例，将返回一个非0 的该窗口句柄的整型值，否则返回0 。

　　例如：

var 　　 vhwnd :HWND; 　　vhwnd := FindWindow(nil,'对话框的标题'); 　　if vhwnd<> 0 then begin 　　 PostMessage(hWnd, WM_CLOSE, 0, 0); 　　end;

转载于:https://www.cnblogs.com/xieyunc/archive/2009/04/27/9126719.html