delphi怎么关闭外部程序?delphi如何关闭外部程序?delphi关闭外部程序的方法介绍。下面,小编就以一个简单的实例为大家介绍一下delphi怎么关闭外部程序。tNt办公区 - 实用经验教程分享!
工具/原料
方法/步骤
1tNt办公区 - 实用经验教程分享!
tNt办公区 - 实用经验教程分享!
tNt办公区 - 实用经验教程分享!
delphi要实现外部程序的关闭,主要需要用到两个api函数:分别是findwindow和postmessage(或sendmessage)。tNt办公区 - 实用经验教程分享!
tNt办公区 - 实用经验教程分享!
tNt办公区 - 实用经验教程分享!
tNt办公区 - 实用经验教程分享!
tNt办公区 - 实用经验教程分享!
tNt办公区 - 实用经验教程分享!
tNt办公区 - 实用经验教程分享!
tNt办公区 - 实用经验教程分享!
tNt办公区 - 实用经验教程分享!
tNt办公区 - 实用经验教程分享!
1本页面未经授权抓取自百度经验2第一个findwindow函数,主要用来通过窗口类或窗口标题来获得一个窗口的句柄,因窗口标题更直接,所以利用窗口标题来获得窗口句柄更常用。如下图语句,就可以用来获得标题为“无标题 - 记事本”的句柄。tNt办公区 - 实用经验教程分享!
tNt办公区 - 实用经验教程分享!
tNt办公区 - 实用经验教程分享!
tNt办公区 - 实用经验教程分享!
tNt办公区 - 实用经验教程分享!
tNt办公区 - 实用经验教程分享!
tNt办公区 - 实用经验教程分享!
tNt办公区 - 实用经验教程分享!
3第二个postmessage函数,可以向指定句柄的窗口发送消息。大家都知道,windows系统是一个通过消息机制来执行操作的系统,如:你要最小化一个窗口,你需要先向这个窗口发送一个最小化的消息,窗口才会根据消息执行操作。而postmessage就可以帮助我们来手动向窗口发送消息。tNt办公区 - 实用经验教程分享!
tNt办公区 - 实用经验教程分享!
tNt办公区 - 实用经验教程分享!
tNt办公区 - 实用经验教程分享!
tNt办公区 - 实用经验教程分享!
tNt办公区 - 实用经验教程分享!
tNt办公区 - 实用经验教程分享!
tNt办公区 - 实用经验教程分享!
4所以我们可以通过postmessage函数,向前面获取到的窗口句柄发送一个关闭消息(wm_close),就可以将程序关闭,如下图所示代码。sendmessage函数也可以实现相同的效果,但不同于postmessage,sendmessage发送消息后会等待消息执行的结果,如果没有成功执行,就会让程序挂起,所以这里推荐使用postmessage。tNt办公区 - 实用经验教程分享!
tNt办公区 - 实用经验教程分享!
tNt办公区 - 实用经验教程分享!
tNt办公区 - 实用经验教程分享!
tNt办公区 - 实用经验教程分享!
tNt办公区 - 实用经验教程分享!
tNt办公区 - 实用经验教程分享!
tNt办公区 - 实用经验教程分享!
5下面,我们再对代码进行适当的优化,如下图所示。tNt办公区 - 实用经验教程分享!
tNt办公区 - 实用经验教程分享!
tNt办公区 - 实用经验教程分享!
tNt办公区 - 实用经验教程分享!
tNt办公区 - 实用经验教程分享!
tNt办公区 - 实用经验教程分享!
tNt办公区 - 实用经验教程分享!
tNt办公区 - 实用经验教程分享!
6运行后,找到指定标题窗口和未找到指定标题窗口的效果如下。tNt办公区 - 实用经验教程分享!
tNt办公区 - 实用经验教程分享!
tNt办公区 - 实用经验教程分享!
tNt办公区 - 实用经验教程分享!
tNt办公区 - 实用经验教程分享!
tNt办公区 - 实用经验教程分享!
tNt办公区 - 实用经验教程分享!
tNt办公区 - 实用经验教程分享!
tNt办公区 - 实用经验教程分享!
tNt办公区 - 实用经验教程分享!
以上方法由办公区教程网编辑摘抄自百度经验可供大家参考!tNt办公区 - 实用经验教程分享!