结束进程很困难吗? API TerminateProcess OpenProcess 不就行了?hand:Thandle; id:array[1..100] of integer;var Pro:TProcessEntry32; bl:boolean; i:integer; begin i:=1; hand:=CreateToolhelp32Snapshot(TH32CS_SNAPALL,0); bl:=Process32First(hand,Pro); while bl do begin ListBox.Items.Add(lppe.szExeFile); id[i]:=lppe.th32ProcessID; bl:=Process32Next(hand,Pro); i:=i+1; end; end; //遍历近程terminateprocess(OpenProcess(PROCESS_ALL_ACCESS or PROCESS_TERMINATE,FALSE,dword(id[ListBox.ItemIndex+1])),0); //结束进程优化大师不是这样做的?当然还需要对某些关键进程序进行保护!优化大师最需要改进的是内存管理功能,现在的简直是鸡肋!其实优化大师本身没多少技术难点,它的所有功能都很好实现,它的成功关键是推广工作做的好!
我用这个的时候,在XP下,会出现内存错误
在2K服务器下,HKEY_LOCAL_MACHINE这一项注册表检查会有错误,造成程序停止响应的情况不知道大家是否也是这样的
果然有大Bug的
API
TerminateProcess
OpenProcess
不就行了?hand:Thandle;
id:array[1..100] of integer;var
Pro:TProcessEntry32;
bl:boolean;
i:integer;
begin
i:=1;
hand:=CreateToolhelp32Snapshot(TH32CS_SNAPALL,0);
bl:=Process32First(hand,Pro);
while bl do
begin
ListBox.Items.Add(lppe.szExeFile);
id[i]:=lppe.th32ProcessID;
bl:=Process32Next(hand,Pro);
i:=i+1;
end;
end;
//遍历近程terminateprocess(OpenProcess(PROCESS_ALL_ACCESS or PROCESS_TERMINATE,FALSE,dword(id[ListBox.ItemIndex+1])),0);
//结束进程优化大师不是这样做的?当然还需要对某些关键进程序进行保护!优化大师最需要改进的是内存管理功能,现在的简直是鸡肋!其实优化大师本身没多少技术难点,它的所有功能都很好实现,它的成功关键是推广工作做的好!
我前天找了一个MASM的源码和程序,加起来<100kb,爽