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

Вниз

Убить прогу   Найти похожие ветки 

 
R_D   (2002-08-23 12:46) [0]

Как завершить работу чужой программы, тоже но если она висит.
Вообшем как по Ctrl+Alt+Del


 
Viktor Kushnir   (2002-08-23 16:42) [1]

Можно так, если HWND процесса знаешь.
procedure Kill(hndl: HWND);
begin
Hndl := OpenProcess(PROCESS_TERMINATE, FALSE, Hndl);
if Hndl <> null
then begin
TerminateProcess(Hndl, 0);
CloseHandle(Hndl);
end
end;


 
Almaz   (2002-08-24 00:29) [2]


> Viktor Kushnir © (23.08.02 16:42)
> Можно так, если HWND процесса знаешь.

HWND - это handle окна, а если это так, то ваш код не сработает, т.к. OpenProcess должен получать не ссылку, а идентификатор и не окна, а процесса. Который, впрочем, можно получить, зная handle окна используя функцию GetWindowProcessID.


> R_D (23.08.02 12:46)
> Как завершить работу чужой программы, тоже но если она висит.
> Вообшем как по Ctrl+Alt+Del

Если хотите именно "как по Ctrl+Alt+Del", то лучше использовать функцию EndTask - именно ей пользуется Task Manager.

Удачи.


 
s.kaster   (2002-08-26 20:31) [3]

PostMessage(FindWindow(Nil, PChar(точное имя программы)), WM_CLOSE, 0, 0);


 
Song   (2002-08-26 21:32) [4]

2s.kaster © (26.08.02 20:31)
ЕСЛИ ОНА ВИСИТ!!! Как программа может обрабатывать сообщения, если она висит ;-)))


 
Mike_Z   (2002-08-29 13:41) [5]

Вариант с TerminateProcess виснет 50 на 50.
EndTask есть в Kernel & User.dll, но описание его где взять и под все ли Win он работает?



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

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

Наверх




Память: 0.45 MB
Время: 0.008 c
1-45432
vads
2002-10-03 15:22
2002.10.14
Использую TInplaceEdit для создания своего Grid а


1-45425
CrazyAngel
2002-10-03 13:22
2002.10.14
Недо HotKey :)


1-45337
Nox
2002-10-05 17:13
2002.10.14
Получение имени компьютера по его IP-адресу


8-45476
Makuha
2002-06-06 12:44
2002.10.14
Потоковое видео


3-45199
Young Programmer
2002-09-23 04:01
2002.10.14
Delphi + ADO





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский