Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Quake & CS [D5, D6, D7, Win95/98, WinME, Win2k, WinXP]


Angel_Forever ©   (2004-01-10 16:59:00) 

Как сделать, чтобы прога получала список запущенных процессов и при обнаружении определённых (напр. Quake или Counter-Strike) их грохала...


Angel_Forever   (2004-02-04 16:01:00) [1]

serg128 Высылай programer2k2003@yahoo.com.au буду благодарен..., User_Name, а где там указывается КАКОЙ ИМЕННО процесс убивать Кваку или КС


DeadMeat   (2004-01-13 18:12:00) [2]

>Angel_Forever   (12.01.04 08:57) [3]
Между прочем, в Piter ©   (10.01.04 18:26) [1]всё сказано...!! От себя добавлю, что надо иногда заглядывать в справку...!


serg128   (2004-01-13 10:16:00) [3]

Есть такая прога, но на С++ Builder, Если надо - исходник вышлю.


User_Name   (2004-01-12 10:50:00) [4]

Ну я делал когда-то так, может поможет

Wnd := GetWindow(Handle, gw_HWndFirst);
       WHILE Wnd <> 0 DO BEGIN {Hе показываем:}
//                IF (Wnd <> Application.Handle) AND {-Собственное окно}
               IF IsWindowVisible(Wnd) AND {-Hевидимые окна}
               (GetWindow(Wnd, gw_Owner) = 0) AND {-Дочернии окна}
               (GetWindowText(Wnd, buff, sizeof(buff)) <> 0)
               THEN BEGIN
               GetWindowText(Wnd, buff, sizeof(buff));
               //
               ZName:=AnsiUpperCase(String(buff)); // преобразуем к верхнему регистру

// Если подключен клиент пробуем посылать сообщения
if IsServer then
ServerSocket.Socket.Connections[0].SendText(ZName);

       For i:=1 to n do
       If Pos(GameName[i],zName)<>0 Then Begin
GetWindowThreadProcessID(Wnd, @ProcessID);
ProcessHandle := OpenProcess(PROCESS_TERMINATE, FALSE, ProcessId);
TerminateProcess(ProcessHandle,4);
       end;
END;
Wnd := GetWindow(Wnd, gw_hWndNext);
END;


Angel_Forever   (2004-01-12 08:57:00) [5]

Piter Ндауж помог... :(


  (2004-01-11 00:08:00) [6]

Удалено модератором


Piter   (2004-01-10 18:26:00) [7]

>Как сделать, чтобы прога получала список запущенных процессов

смотри CreateToolhelp32Snapshot

>и при обнаружении определённых (напр. Quake или Counter-Strike) их грохала..

смотри TerminateProcess


Наверх

Титульная страница Поиск, карта сайта Написать письмо