深藍色論壇

轉貼自:
http://delphi.ktop.com.tw/topic.asp?TOPIC_ID=19543


作者:空中雲雀
e-mail :[email protected]

HWND hWnd; // hWnd : 該視窗的 handle
DWORD dwx; // dwx : 為存放內 ProcessID 的變數位址
HANDLE hProc; // hProc : 為該程式的行程代碼

if((hWnd=FindWindow(NULL,"未命名 - 記事本"))==NULL)
{
ShowMessage("Can not find");
return 0;
} // 這邊的 "未命名 - 記事本" 只是舉例,要寫你的程式的 windows name

GetWindowThreadProcessId(hWnd,&dwx);

// 呼叫 GetWindowThreadProcessID 這個 Win32 API 來取得 ProcessID
// 正常執行無誤後,會將 Process ID 存入 dwx 這個位址中

hProc = OpenProcess(PROCESS_ALL_ACCESS,FALSE,dwx);
TerminateProcess(hProc, 0);

這樣就能將 process 幹掉了