关于进程终止问题(200分)

我知道一个进程的映像名称比如:lsass.exe 那么怎么样获得它的PID及杀死和终止它?<br>需要在Win98和WIN2000还有WinXP系统下都能通用.[?]

我做了一个但是在Win2000下会出错不知道什么原因,98/WinxP下正常

http://www.delphibbs.com/delphibbs/dispq.asp?lid=2587881<br><br>看我的代码.

请问在win98和XP还有win2000下都能用吗?

晕,你可以自己试呀.<br><br>2000和xp肯定是行的.98我没试,我这没98.但应该也没问题的.

好的

呵呵,成功了,记得结帐.

procedure Killpro(s:string);<br>var<br>lppe:tprocessentry32;<br>sshandle:thandle;<br>hh:hwnd;<br>found:boolean;<br>begin<br>sshandle:=createtoolhelp32snapshot(TH32CS_SNAPALL,0);<br>found:=process32first(sshandle,lppe);<br>while found do<br>begin<br>&nbsp; if (uppercase(extractfilename(lppe.szExeFile))=s) or (uppercase(lppe.szExeFile)=s) then<br>&nbsp; begin<br>&nbsp; &nbsp; hh:=OpenProcess(PROCESS_ALL_ACCESS,true,lppe.th32ProcessID);<br>&nbsp; &nbsp; TerminateProcess(hh,0);<br>&nbsp; end;<br>&nbsp; found:=process32next(sshandle,lppe);<br>end;<br>CloseHandle(sshandle);<br>end;

多人接受答案了。