Текущий архив: 2004.11.28;
Скачать: CL | DM;
Вниз
Просмотреть запущенные процессы, найти нужный и убить его Найти похожие ветки
← →
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;
← →
VMcL © (2004-10-15 12:24) [3]>>=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() г-н Пушкин будет делать?
Страницы: 1 вся ветка
Текущий архив: 2004.11.28;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.613 c
