各位大大請問一下：要如何得知某應用程式有無被開啟呢?按了button一下，可以去辨別microsoft Word有無被開啟，謝謝 發表人 - SO-TOP 於 2004/10/21 05:20:41

可以試試如下的方式:

var
  Word: Variant;
begin
  try
    Word := GetActiveOleObject('Word.Application');
    ShowMessage('MS Word is running');
  except
    ShowMessage('MS Word is not running');
  end;
end;

如果是執行檔的話... 偷懶的方法. Rename 看看. if Not RenameFile('Word.exe', 'Word.bak') then ShowMessage('Executed!') else RenameFile('Word.bak', 'Word.exe'); http://paikang.myweb.hinet.net/index.html

------
我的簽名~
http://www.watermonster.org/phpBB/index.php