📄 tszs5.htm
字号:
<html><head><meta http-equiv="Content-Type" content="text/html; charset=gb2312"><title>如何在 Delphi 应用程序中, 去关闭外部已开启的应用程序？</title></head><body><blockquote> <p>下面给出一段在 Delphi 中关闭“计算器”程序为例：<br> ...<br> var<br> HWndCalculator : HWnd;<br> begin<br> // find the exist calculator window<br> HWndCalculator := Winprocs.FindWindow(nil, '计算器');</p> <pre> // close the exist Calculator } if HWndCalculator <> 0 then SendMessage(HWndCalculator, WM_CLOSE, 0, 0);end;</pre> <pre>在此特意再摘录一段 Win32 SDK 中的说明文字：</pre> <pre>Typically, an application sends the WM_CLOSE message beforedestroying awindow, giving the window the opportunity to prompt the user for confirmation before the window is destroyed.A window that includes a System menu automatically receives the WM_CLOSE message when the user chooses the Close command from the menu. If the user confirms that the window should be destroyed,the application calls DestroyWindow. [END] </pre></blockquote><p> </p></body></html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -