Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.01.21;
Скачать: CL | DM;

Вниз

Как получить список процессов в win2k и убить желаемый   Найти похожие ветки 

 
Giga-Byte ©   (2001-08-29 22:59) [0]

Как получить список процессов в win2k и убить желаемый?


 
Voldemar ©   (2001-08-30 02:56) [1]

Есть компонента RunningProcs, я ее на torry.net брал, если мне склероз не изменяет:)) Она как раз этим делом и заведует. Я на ее основе писал процессменеджер под 9х, но под 2000 тоже работает. Могу намылить.


 
Станислав ©   (2001-08-30 13:53) [2]

Приведенная ниже функция отбирает все процессы в памяти и находит процесс созданный IDAPI32.DLL, а ты можешь переделать под себя и возьми на КОРОЛЕВСТВЕ архив из книги там в 14 теме все и описано для этих целей.
Только учти если войдешь в систему не как админ не даст свои процессы поэкпериментируй.

Function WinNTPath:string;
var
Count:DWORD;
BigArray: array[0..$3FFF - 1] of DWORD;
FProcList: array of DWORD;
I,J: Integer;
ProcHand: THandle;
ModHandles: array[0..$3FFF - 1] of DWORD;
ModName, MapFileName: array[0..MAX_PATH] of char;
PathDLL:string;

begin
Result:="asdaSDA"; ProcHand:=0;
EnumProcesses(@bigarray,SIZEof(bigarray),count);

SetLength(FProcList, Count div SizeOf(DWORD));
Move(BigArray, FProcList[0], Count);

for I := Low(FProcList) to High(FProcList) do
try
ProcHand := OpenProcess(PROCESS_QUERY_INFORMATION or PROCESS_VM_READ,false,FProcList[I]);
EnumProcessModules(ProcHand, @ModHandles, SizeOf(ModHandles), Count);
for J := 0 to (count div SizeOf(dword)) - 1 do
try
GetModuleBaseNameA(Prochand, ModHandles[J], ModName, count);

if ModName="IDAPI32.DLL" then
begin
GetModuleFileNameEx(ProcHand, ModHandles[J],MapFileName,count);
PathDLL:=ExtractFilePath(MapFileName);
Setlength(PathDLL,length(PathDLL)-1);
Result:=PathDLL;
end;

except

end;

finally
CloseHandle(ProcHand);
end;

end;


 
BigFoot   (2001-10-05 13:27) [3]

Как получить список процессов в win2k и убить желаемый?

Скорее, уж, нежелаемый :)



Страницы: 1 вся ветка

Текущий архив: 2002.01.21;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.012 c
3-66220
vangog
2001-12-17 16:03
2002.01.21
Поиск в TTable глючит !


4-66393
romanK
2001-11-20 17:47
2002.01.21
хранитель екрана


6-66316
ant_prg
2001-10-26 15:50
2002.01.21
Передача звука по сети


1-66257
ЗАА
2002-01-03 17:24
2002.01.21
курсор в StringGrid


4-66408
YUS
2001-11-21 20:52
2002.01.21
CreateDialog -????