如何判断一个程序是否运行了?
我想判断c:\1.exe是否运行了,代码该怎么写啊?
[解决办法]
比较理想的方法
枚举进程,并检查进程的exe路径
[解决办法]
http://blog.csdn.net/nhczp/archive/2007/01/20/1488518.aspx
[解决办法]
Program project1 //在DELPHI IDE环境下,因为已有Form1存在,所以会提示程序已运行
Uses
Forms,Windows
Var Hwnd:Thandle;
Begin
Hwnd:=FindWindow(‘TForm1’,‘Form1’);
If Hwnd=0 then
Begin
Application.Initialize;
Application.CreateForm(TForm1, Form1);
Application.Run;
End
else showmessage( 'App is running! ') ;
End;
[解决办法]
你可以利用一个线称,先枚举窗口,找到的这个窗口进程的PID是不是你的应用程序的PID,如果是你的线程可以提示找到了,如果不是那么你就可以继续找,一般情况下,这样的双重定位会比较保险。