對不起~~我是一個delphi新手~~ 想請問各位，delphi有函數可以判斷執行程式的狀態嗎？？ 例如：無回應、等待....如果無回應的話，可以做到強迫關閉嗎？ 謝謝各位~~~^^~~

引言: 對不起~~我是一個delphi新手~~ 想請問各位，delphi有函數可以判斷執行程式的狀態嗎？？ 例如：無回應、等待....如果無回應的話，可以做到強迫關閉嗎？ 謝謝各位~~~^^~~

nonokoko 你好: 請參考以下的連結文章

procedure TForm1.Button1Click(Sender: TObject); begin ShellExecute(handle,'open','notepad.exe',nil,nil,SW_ShowNormal); end;    procedure TForm1.Button2Click(Sender: TObject); var ExeHandle:Thandle; Begin ExeHandle:=FindWindow('notepad',nil); if ExeHandle<>0 then SendMessage(ExeHandle,WM_Close,0,0) Else Application.MessageBox('無打開','提示',MB_IconInformation+MB_OK); end;    end. 我參考別人寫的程式，用記事本是可以做偵測，但是我改用像MSN程式，卻毫無反應，這是為什麼呢？？是不是只要執行外部程式，就不能用了呢？？ 對不起~~第一次接觸API，很多都不懂！！謝謝各位高手