Zamykanie "danego" procesu...:D

qazqaz

Użytkownik
Dołączył
Marzec 21, 2005
Posty
7
Moze mi ktos wytłumaczyć, co i jak??
<
 

damian0170

Użytkownik
Dołączył
Styczeń 16, 2005
Posty
31
To jest funkcja , która zwraca true gdy proces zostal zamkniety a false w przeciwnym wypadku :

function ZabijProces(ProcessId:Integer):Boolean;
var
Uchwyt:tHandle;
begin
Uchwyt:=OpenProcess(PROCESS_TERMINATE,bool(0),ProcessId);
if TerminateProcess(Uchwyt,0) then result:=true else result:=false;
CloseHandle(Uchwyt);
end;

Użycie :

procedure TForm1.Button1Click(Sender: TObject);
begin
ZabijProces(numer id procesu);
end;
 

qazqaz

Użytkownik
Dołączył
Marzec 21, 2005
Posty
7
takie lekkie i dość głupie pytanie - skad mam wziasc ID procesu??:>
i czy nie ma takiego patentu do zamknięcia np. po "paint.exe" - sorry za moje takie lamerstwo, ale jesli chodzi o zabawe w procesy, to dziś dostałem natchnienia - i nic o tym nie wiem:p
 

rafal

Były Moderator
Dołączył
Marzec 30, 2005
Posty
392
PID - przeciez mozna odczytac np: stosujac tasklist z cmd'ka
a co do tego czy da sie zamknac poprostu po nazwie to jest metoda, skorzystaj ze zrodel jakis FW badz AV killerow ;-)
 

fdavid

Użytkownik
Dołączył
Luty 10, 2006
Posty
34
ja mam w swoim programie komendę która zamyka proces po nazwie lecz nie radzi sobie z tymi procesami których Manager Zadań nie jest w stanie zamknąć...
<
 
Do góry Bottom