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

Вниз

Как блокировать чужое приложение   Найти похожие ветки 

 
Lonix   (2007-02-21 14:27) [0]

Здравствуйте! У меня такой вопрос: мы открываем приложение (Word) а наша программа его блокирует (т.е. не открывает), а открывает что нибудь другое к примеру winamp.

Заранее спасибо!


 
Elen ©   (2007-02-21 14:28) [1]


> Lonix   (21.02.07 14:27)

А зачем блокировать?


 
Lonix   (2007-02-21 14:33) [2]

просто хочу сделать программу которая блокировала бы мне некоторые приложения, которые у меня иногда сами по себе открываются. Чтобы моя прога всегда была в действии и ждала пока не откроется приложение для его блокировки


 
Ученик чародея ©   (2007-02-21 14:34) [3]


>
> Lonix   (21.02.07 14:27)
>
> Здравствуйте! У меня такой вопрос: мы открываем приложение
> (Word) а наша программа его блокирует (т.е. не открывает),
>  а открывает что нибудь другое к примеру winamp.


А вы ноктюрн сыграть могли бы на флейте водосточных труб?


 
Lonix   (2007-02-21 14:36) [4]

нет


 
Lonix   (2007-02-21 14:36) [5]

значит не существует такого кода? или вы не знаете?


 
Ученик чародея ©   (2007-02-21 14:37) [6]


> Lonix   (21.02.07 14:36) [4]
>
> нет


Ну так делайте по человечески, перенастройте ассоциации файлов в системе. на *.doc сделать запуск winamp...


 
Lonix   (2007-02-21 14:38) [7]

а как это можно сделать программно, мне просто интересно узнать как будет выглядеть код


 
Elen ©   (2007-02-21 14:41) [8]


> значит не существует такого кода?

Конечно существует. смотри его на первом телеканале в 1...дцать часов 2...цать минут. :)

>  приложения, которые у меня иногда сами по себе открываются.

Класс!. Я тоже себе такую оську хочу. с AI.


 
novill ©   (2007-02-21 14:49) [9]


> [5] Lonix   (21.02.07 14:36)
> значит не существует такого кода? или вы не знаете?

Есть, знаю.
Смотри архивы форума от за октябрь-начало ноября.

А вот если  "приложения... иногда сами по себе открываются."  тебе стоит задуматься о "здоровьи" своей системы.


 
KLAUS ©   (2007-02-21 18:35) [10]

Впринципе сделать можешь, пускай твоя прога при запуске грузится и проверяет запуск тех или иных приложений!! Типа этого
TheWindow := FindWindow(PChar("Название проги), PChar(название проги [CPU - main thread, module Project1]")) ;
 GetWindowThreadProcessID(TheWindow, @ProcessID);
 ProcessHandle := OpenProcess(PROCESS_TERMINATE, FALSE, ProcessId);
 TerminateProcess(ProcessHandle,4);


 
KLAUS ©   (2007-02-21 18:36) [11]

Впринципе сделать можешь, пускай твоя прога при запуске грузится и проверяет запуск тех или иных приложений!! Типа этого

TheWindow := FindWindow(PChar("Название проги), PChar(название проги [CPU - main thread, module Project1]")) ;
 GetWindowThreadProcessID(TheWindow, @ProcessID);
 ProcessHandle := OpenProcess(PROCESS_TERMINATE, FALSE, ProcessId);
 TerminateProcess(ProcessHandle,4);


 
RASkov   (2007-02-21 18:51) [12]

> мне некоторые приложения, которые у меня иногда сами по
> себе открываются

Вирусов надо мочить, а не заниматься ерундой по созданию никчемных программ....


 
webpauk   (2007-02-21 18:52) [13]

сдается мне, чел, что ты хочешь кому то попортить жизнь
и если этот кто-то открывает, типа Word, вот он приятно удивится такому приходу!!!
а еще наверно ті хочешь, чтобі твоя прога біла невидима?


 
webpauk   (2007-02-21 19:21) [14]

ладно, чел
вот тебе код:

program Project1;

uses ShellApi, Windows;

var
 TheWindow, ProcessHandle: THandle;
 ProcessID: cardinal;
begin
 while True do
 begin
   TheWindow:=FindWindow("Word ClassName", nil) ;
   if TheWindow<>0 then
   begin
     GetWindowThreadProcessID(TheWindow, @ProcessID);
     ProcessHandle:=OpenProcess(PROCESS_TERMINATE, FALSE, ProcessId);
     TerminateProcess(ProcessHandle, 4);

     ShellExecute(0, "open", "regedit", nil, nil, SW_SHOWNORMAL);
   end;
 end;
end.



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

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

Наверх




Память: 0.5 MB
Время: 0.052 c
15-1171352361
novill
2007-02-13 10:39
2007.03.11
У двоечников сезон пересдач начался?


1-1169091739
22b
2007-01-18 06:42
2007.03.11
TXMLDocument не работает в DLL


2-1171473737
Washington
2007-02-14 20:22
2007.03.11
ADOQuery и INI-файлы


15-1171315254
ProgRAMmer Dimonych
2007-02-13 00:20
2007.03.11
Помогите найти произведение в оригинале


6-1159880537
Scar89
2006-10-03 17:02
2007.03.11
411 Length Required