关闭窗口 var H:THandle;begin FindWindow(nil,'记事本'); SendMessage(H,WM_SYSCOMMAND,SC_Close,0);end; 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 调入一个API函数查到那个窗口进程,然后把那个进程给杀就行了 var H:THandle;begin H:=FindWindow(nil,'记事本'); SendMessage(H,WM_SYSCOMMAND,SC_Close,0);end; 调用API找那个窗口的进程句柄,KILL吧!或者用APPILICATION.TERMINATE(); 我想知道那个API函数的名称是什么呢, 你必须得到这个窗口的句柄,然后向这个窗口发送WM_CLOSE消息,原理是这样的。 祝贺自己又升了一级, 散分! 难道Frames跨站拒绝访问的问题天下无人能解了? 安装的ACTIVEX怎么看不到阿? 已知文件路径,如何获取程序句柄? 回家过年的最后一道难题了,数据分页。 Fastreport用getvalue取得值第一页不行,其它页才行为什么? 如何在image中粘贴剪贴板中的矢量图,请高手帮忙 请问各位一般怎么处理数据库里查询得到的数据,再将处理后的结果呈现给用户? 关于adoquery的问题 请问: 下篇文中的VC代码如何改写为Delphi6的代码? 如何将TEdit统一一次赋值 请问D6的EhLib控件下载地址
然后把那个进程给杀就行了
H:THandle;
begin
H:=FindWindow(nil,'记事本');
SendMessage(H,WM_SYSCOMMAND,SC_Close,0);
end;
KILL吧!
或者用APPILICATION.TERMINATE();
原理是这样的。