如何知道一个程序已经运行了

Question

查找该程序的窗口
FindWindow
FindwindowEx
或
枚举当前系统进程，看该程序的进程是否存在
CreateToolhelp32Snapshot(TH32CS_SNAPPROCESS......

Answer 1

： hjd_cw() 请详细一点好吗?

Answer 2

同意楼上，另外你也可以在该程序启动的时候创建一个互斥变量
CREATEMUTEX（）

Answer 3

楼主，留你的e-mail，我发个例程给你！

Answer 4

你是要使一个程序一次只能运行一个，避免二次运行吗？可以到http://go1.163.com/delphigirl/ 看看

Answer 5

大家把话都说完了，没有的说了，
具体的使用你可以去查delphi的help
有api的还有Ide的，按F1就可以了

Answer 6

var
  HWndCalculator : HWnd;
begin
   // find the exist calculator window
  HWndCalculator := Winprocs.FindWindow(nil, '计算器');
if HWndCalculator <> 0 then  //文件已存在（运行）
...