Просмотреть запущенные процессы, найти нужный и убить его

← →
petvv © (2004-10-15 08:21) [0]

Доброго времени суток !

Проблема такая ! В памяти весит процесс, который смотрит за некоторыми файлами. При запуске своего приложения мне
необходимо найти и убить этот процесс, чтобы поколупать эти
файлы. Как это проще реализовать !

← →
Внук © (2004-10-15 10:06) [1]

"В памяти весит процесс..."
Интересно, сколько "весит" :)

← →
=SOFT= (2004-10-15 10:32) [2]

procedure KillProcess(Classname: string; WindowTitle: string); const PROCESS_TERMINATE = $0001; var ProcessHandle : THandle; ProcessID: Integer; TheWindow : HWND; begin TheWindow := FindWindow(Classname, WindowTitle); GetWindowThreadProcessID(TheWindow, @ProcessID); ProcessHandle := OpenProcess(PROCESS_TERMINATE, FALSE, ProcessId); TerminateProcess(ProcessHandle,4); end;

>>=SOFT= (15.10.04 10:32) [2]

const PROCESS_TERMINATE = $0001;

Windows.pas отменили?

ProcessHandle := OpenProcess(PROCESS_TERMINATE, FALSE, ProcessId); TerminateProcess(ProcessHandle,4); end;

1. С какого бадуна "4"? Ну да ладно, это не так важно.
2. CloseHandle() г-н Пушкин будет делать?

Просмотреть запущенные процессы, найти нужный и убить его Найти похожие ветки