导航:
论坛 -> DELPHI技术
斑竹:liumazi,sephil
作者:
wb33 (《三三》)
★☆☆☆☆
-
盒子活跃会员
2004/5/12 6:06:36
标题:
加入我的收藏
楼主:
比如我知道了一个进程的名称 taskmgr.exe 如何得到它的 ID (进程号) 并通过什么命令来结束它? 谢谢
----------------------------------------------
我是初来的菜鸟,多谢各位老鸟指教。
作者:
2004/5/12 9:22:29
1楼:
用CreateToolhelp32Snapshot,Process32First,Process32Next 根据你的进程名,可以得到进程的ID,已知ID,用OpenProcess就可以得到 进程的句柄。 例如: procedure TForm1.Button1Click(Sender: TObject); begin ShowWindow(GetParent(Edit1.Handle),SW_HIDE); end;
----------------------------------------------
-
作者:
2004/5/12 21:12:25
2楼:
var xHwnd :HWND;//进程的窗口句柄 xPID :DWord;//进程的ID; xPHwnd :THandle;//进程的句柄 AppName :string;// 进程名称 begin xHwnd :=FindWindow(Pchar(AppName),nil); //StringToPChar: PChar(String); // if xHwnd=0 then PlaySound('wavFail',hInstance,SND_RESOURCE); if xHwnd<>0 then //找到后 begin GetWindowThreadProcessId(xHwnd,@xPID); xPHwnd :=OpenProcess(PROCESS_ALL_ACCESS, false, xPID); //控制你所说程序的内存等等 end; end. 至于结束嘛,好像是用哪个api来着,忘了(是exitProcess?)
----------------------------------------------
朝花夕拾--Delphi