如何检测excel是否运行?如果已经运行,如何知道excel在任务栏是否可见? 如何检测excel是否运行?如果已经运行,如何知道excel在任务栏是否可见? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 给分吧!var h:hwnd;beginh:=findwindow('XLMAIN',nil);if h<>0 thenbegin if IsWindowVisible(h) then//如果在任务栏可见 showmessage('EXCEL正在运行!');end;end; var h:hwnd;beginh:=findwindow('excel.exe',nil);if h<>0 thenbegin if IsWindowVisible(h) then//如果在任务栏可见 showmessage('EXCEL正在运行!');end;end; 感谢 l0f(凌风)和 WWWWA(aaaa),给分了. delphi word 帮忙翻译下列oracle查询语句为一般的sql语句并顺便解释下 做了一个软件怎么测试它对网络和系统资源监控呀 如何让我做的服务在2K的进程列表里不显示? 如何使0值,grid就不显示出来? 哪里的Delphi最便宜?正版的. 打印预览没有反应 怎样清空一个ini文件中的所有内容啊 function TObject.GetInterface(const IID: TGUID; out Obj): Boolean;//out Obj是不是输入参数 当…… 如何重新执行formCreate? ★★★有QQ号码赠送!!你想要吗?(限量赠送!)
var h:hwnd;
begin
h:=findwindow('XLMAIN',nil);
if h<>0 then
begin
if IsWindowVisible(h) then//如果在任务栏可见
showmessage('EXCEL正在运行!');
end;
end;
begin
h:=findwindow('excel.exe',nil);
if h<>0 then
begin
if IsWindowVisible(h) then//如果在任务栏可见
showmessage('EXCEL正在运行!');
end;
end;