Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "WinAPI";
Текущий архив: 2004.01.09;
Скачать: [xml.tar.bz2];

Вниз

Как можно программно прерывать системн процессы?   Найти похожие ветки 

 
Колян_К   (2003-11-05 11:21) [0]

Например: Нужно,чтобы при нажатии стрл-альт-дел программа выдывала сообщение "Отказано в доступе"


 
Игорь Шевченко   (2003-11-05 14:11) [1]

В связи с чем такая задача ?


 
Колян_К   (2003-11-05 18:09) [2]

Просто пишу программу парольку.И чтобы когда пользователь нажимал заветные клавиши,выходило это сообщение.


 
Игорь Шевченко   (2003-11-05 23:54) [3]

Подробнее, если не трудно


 
Колян_К   (2003-11-06 05:58) [4]

Куда ещё подробнее? Есть форма, на ней edit и button, вводишь пароль в едит, нажимаещь кнопку,выполняется условие если пароль правильный приложение.терминате;Если нет, то шоумессач "неверный пароль". Это вся прога. Но если пользователь в этой программе нажмет стрл-альт-дел, надо,чтобы прервался сиспроцесс, вызывающий диспетчер задач, а вместо диспетчера вылезло: "Отказано в доступе". Теперь понятно?


 
debugger   (2003-11-06 09:21) [5]

Не надо ничего прерывать. Ищещь окно диспетчера, как появился -
WM_CLOSE ему и MessageBox "Отказано в доступе".


 
Игорь Шевченко   (2003-11-06 10:28) [6]

DisableTaskMgr в реестре (для XP)


 
Колян_К   (2003-11-06 10:52) [7]

А можно подробнее,в какой процедуре писать WM_CLOSE, или куда втыкать Disable TaskMgr. Я в этом вообще не варю, я начинающий прогер, и пока не знаю практически ничего.Заранее спасибо


 
Михайлов Антон   (2003-11-06 12:19) [8]

Меняешь ключик HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableTaskMgr=-1 всё работает
HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableTaskMgr=0 --->>>> "Диспетчер задач отключён администратором" :)
Вот и всё...


 
Колян_к   (2003-11-06 12:34) [9]

HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableTaskMgr=0 --->>>> "Диспетчер задач отключён администратором" :)
А как это будет выглядеть в исходном коде моей программы?


 
Игорь Шевченко   (2003-11-06 12:44) [10]

Хочу напомнить, что здесь не филиал www.xakep.ru

Начинающие обычно начинают с другого


 
Колян_К   (2003-11-06 12:52) [11]

А с чего начинают начинающие, что такое циклы,массивы и прочее я знаю,поэтому экспериментирую с клавой,мышей, и всякими сиспроцессами.Но всё на шару не разберёшь сам, именно из-за этого я прошу советы и объяснения к некоторым ответам, что здесь такого?


 
debugger   (2003-11-07 09:40) [12]

Записать в реестр:
var reg:TRegistry;
reg1.Create;
reg1.RootKey=HKEY_CURRENT_USER;
reg1.OpenKey;("Software\Microsoft\Windows\CurrentVersion\Policies\System,false);
reg1.WriteInteger("DisableTaskMgr",0);
reg1.CloseKey;

Найти и закрыть окно (на С++, лень переводить на Pascal):

void* h=Handle;
do {
h=GetNextWindow(h,GW_HWNDPREV);
GetWindowText(h,str1,255);
Application->ProcessMessages();
} while (((strcmp(str1,"Windows Task Manager"))&&(strcmp(str1,"Диспетчер задач Windows")))&&(h));
if (h) {
SendMessage(h,WM_CLOSE,0,0);
Application->MessageBoxA("Диспетчер задач отключен.","",48);


P.S. Почему-то большинство начинающих стремятся вырубить этот несчастный TaskManager. :)


 
Колян_К   (2003-11-07 15:47) [13]

Спасибо тебе debugger, а то я уже и не знал, чё мне делать.



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

Форум: "WinAPI";
Текущий архив: 2004.01.09;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.47 MB
Время: 0.011 c
1-25284
tria
2003-12-22 18:23
2004.01.09
Можно ли убрать свойство, кот. не нужно?


1-25297
Тимохов
2003-12-16 14:20
2004.01.09
Правила вызова AddRef


1-25408
UDS
2003-12-23 23:37
2004.01.09
Обратный отсчет времени.


1-25434
Silver_
2003-12-23 17:35
2004.01.09
Почему Field.OnChange вызывается 2 раза подряд


6-25493
May
2003-11-10 15:42
2004.01.09
Копирование файлов





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский