Вниз
Скачать: CL | DM;

Закрытие другой прграммы   Найти похожие ветки 

← →
AlekseyK ©   (2003-02-26 12:00) [0]

Привет! Подскажите как закрыть любую другую прогу даже если она зависла(типа End Task). Спасибо!


← →
han_malign ©   (2003-02-26 12:07) [1]

TerminateProcess
- но, для 98, я могу смоделировать ситуацию когда программа зависнет намертво и ничем не убьется (TerminateThread в процессе I/O), под W2K убьется любая...


← →
AlekseyK ©   (2003-02-26 12:19) [2]

У TerminateProcess(hProcess:Cardinal,uExitCode:Cardinal) в хелпе не нашол что за hProcess и uExitCode Я знаю только нащвание процесса как узнать эти параметры.


← →
AlekseyK ©   (2003-02-26 13:16) [3]

я так понял должно быть как то так
a:=findwindow(nil,"Имя_проги");
TerminateProcess(a,"Здесь_не_знаю_что");

Как именно?


← →
DVM ©   (2003-02-26 14:05) [4]


> я так понял должно быть как то так
> a:=findwindow(nil,"Имя_проги");
> TerminateProcess(a,"Здесь_не_знаю_что");

Неправильно ты понял.
Причем здесь findwindow?
Тебе нужен не Handle окна, а ID процесса.
По хэндлу окна тоже можно получить ID процесса, но это лишнее.




← →
AlekseyK ©   (2003-02-26 14:40) [5]

у меня все работает так:
a:=findwindow(nil,"Имя_проги");
SendMessage(a,WM_CLOSE,0,0);

усли это не лучший способ то подскажи как лучше,
как узнать ID процесса и что писать в параметре TerminateProcess(ID,?);


← →
Nic_B   (2003-02-26 15:34) [6]

У меня работает так

GetWindowThreadProcessID(Wnd, @ProcessID);
ProcessHandle := OpenProcess(PROCESS_TERMINATE, FALSE, ProcessId);
TerminateProcess(ProcessHandle,4);

А насчет
a:=findwindow(nil,"Имя_проги");
SendMessage(a,WM_CLOSE,0,0);
то некоторые программы выдают запрос перед закрытием т.е. автоматом не закроешь




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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.011 c
3-54476
sniknik
2003-03-28 18:16
2003.04.17
Midas + ADO = странное поведение. Кто сталкивался?


3-54513
VadimS
2003-03-31 14:14
2003.04.17
Добаление записей в таблицу MS Access


1-54665
ctapik-net
2003-03-30 13:06
2003.04.17
Изменение ресурсов в DLL


3-54437
DenKop
2003-03-30 00:45
2003.04.17
FIB IBTransaction.Commit


14-54792
vic_vm
2003-04-01 16:19
2003.04.17
Каким компонентом реализована кнопка на панели IDE в Delphi




   Наверх