Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > [ "Начинающим" ]
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 30.12.2009, 22:11
Аватар для Electronic_Arts
Electronic_Arts Electronic_Arts вне форума
Местный
 
Регистрация: 13.07.2006
Адрес: на земле
Сообщения: 562
Версия Delphi: Delphi 11
Репутация: 18
Восклицание Как вырубить EXPLORER.EXE чтоб уростить се работу

Как выключить explorer.exe ?? а то не получаеться отключить клавишу Win
Ответить с цитированием
  #2  
Старый 30.12.2009, 23:57
Аватар для AND_REY
AND_REY AND_REY вне форума
Активный
 
Регистрация: 31.03.2009
Адрес: Украина, г.Днепропетровск
Сообщения: 324
Версия Delphi: Delphi7
Репутация: 3877
По умолчанию

Выкл explorer:
Код:
uses
 ShellAPI;
Procedure ExpClose;
begin
 ShellExecute(0,'open','taskkill.exe','/f /im explorer.exe',nil,SW_HIDE);
end;
Ответить с цитированием
  #3  
Старый 31.12.2009, 01:27
Аватар для Ferra
Ferra Ferra вне форума
Местный
 
Регистрация: 12.03.2006
Адрес: Минск
Сообщения: 527
Репутация: 1336
По умолчанию

Ох, зря вы это затеяли. Вы хоть в курсе что большАя часть всех процессов - дочерние у эксплорер.ехе? И к чему приводит завершение этого процесса вы тоже надеюсь знаете?

лучше ловить нажатие этой клавиши через хуки (hooks) и просто напросто не передавать дальше.
__________________
Нет повести печальнее на свете, чем повесть о заклиневшем Resete.
Ответить с цитированием
  #4  
Старый 31.12.2009, 01:50
Аватар для Electronic_Arts
Electronic_Arts Electronic_Arts вне форума
Местный
 
Регистрация: 13.07.2006
Адрес: на земле
Сообщения: 562
Версия Delphi: Delphi 11
Репутация: 18
Восклицание

Cпасибо огромное...

Последний раз редактировалось Electronic_Arts, 31.12.2009 в 01:52.
Ответить с цитированием
  #5  
Старый 31.12.2009, 02:16
Аватар для Electronic_Arts
Electronic_Arts Electronic_Arts вне форума
Местный
 
Регистрация: 13.07.2006
Адрес: на земле
Сообщения: 562
Версия Delphi: Delphi 11
Репутация: 18
Восклицание

а как сделать чтоб результатом нажатие клавишы WIN окозалась пустатой
ну чтоб не отображался меню пуск
Ответить с цитированием
  #6  
Старый 31.12.2009, 10:38
MrBadge MrBadge вне форума
Прохожий
 
Регистрация: 30.12.2009
Сообщения: 28
Репутация: 10
По умолчанию

кстати, такой же вопрос ... решилось так :

Код:
SetWindowLong(FindWindowEx(FindWindow('Shell_TrayWnd', nil), 0, 'Button', nil), GWL_ID, -1);

Но отключается только на Xp ... семерка и виста не реагируют ... Кто-нибудь знает, в чем дело?
Ответить с цитированием
  #7  
Старый 01.01.2010, 11:12
Аватар для 0nni
0nni 0nni вне форума
Начинающий
 
Регистрация: 13.12.2008
Адрес: Туапсе
Сообщения: 161
Репутация: 20
По умолчанию

Цитата:
Сообщение от Ferra
Ох, зря вы это затеяли. Вы хоть в курсе что большАя часть всех процессов - дочерние у эксплорер.ехе? И к чему приводит завершение этого процесса вы тоже надеюсь знаете?
Ровным счетом ни к чему не приведет. У многих стоят альтернативные оболочки для window (у меня BlackBox, например стоит у меня) и все прекрасно работает без explorer'a.

А если по теме, то запросы в гугл выдают кучу ссылок на тему отключения клавиши window
__________________
...сказал, и загрустил от бесспорной своей правоты
Ответить с цитированием
  #8  
Старый 01.01.2010, 14:58
Аватар для Ferra
Ferra Ferra вне форума
Местный
 
Регистрация: 12.03.2006
Адрес: Минск
Сообщения: 527
Репутация: 1336
По умолчанию

Ты не понял они ответ. Одно дело заменить родную оболочку, а совсем другое дело завершить процесс на который много чего подвешено.
__________________
Нет повести печальнее на свете, чем повесть о заклиневшем Resete.
Ответить с цитированием
  #9  
Старый 01.01.2010, 18:41
Аватар для 0nni
0nni 0nni вне форума
Начинающий
 
Регистрация: 13.12.2008
Адрес: Туапсе
Сообщения: 161
Репутация: 20
По умолчанию

Ну вот как бы пример завершения блокнота, на котором у меня "много чего подвешено".


Ничего не произошло - все живы.
__________________
...сказал, и загрустил от бесспорной своей правоты
Ответить с цитированием
  #10  
Старый 01.01.2010, 19:07
Аватар для Electronic_Arts
Electronic_Arts Electronic_Arts вне форума
Местный
 
Регистрация: 13.07.2006
Адрес: на земле
Сообщения: 562
Версия Delphi: Delphi 11
Репутация: 18
Восклицание

Цитата:
Сообщение от Ferra
лучше ловить нажатие этой клавиши через хуки (hooks) и просто напросто не передавать дальше.
Ferra - отловили клавишу - что дальше????
Код:
begin
if (key=vk_lwin) or (key=vk_rwin) then
begin
 // как остановить действие???? чтоб не отображалась меню пуск
end;
end;
Ответить с цитированием
  #11  
Старый 01.01.2010, 22:25
Аватар для mak-karpov
mak-karpov mak-karpov вне форума
Активный
 
Регистрация: 18.09.2008
Сообщения: 235
Версия Delphi: 2010 и 7
Репутация: 1242
По умолчанию

Это не хук
__________________
Кнопка "+" - весы в правом верхнем углу сообщения...
Ответить с цитированием
  #12  
Старый 01.01.2010, 22:41
Аватар для Electronic_Arts
Electronic_Arts Electronic_Arts вне форума
Местный
 
Регистрация: 13.07.2006
Адрес: на земле
Сообщения: 562
Версия Delphi: Delphi 11
Репутация: 18
Восклицание

Цитата:
Сообщение от mak-karpov
Это не хук
Да ты что??
Для ловля нажатий клавиш у мя есть компонент SysKeyboardHook
ловить то ловим но толку да какое если не можем куданить направить действие

-
и еще те кто будут просто так что то писать....то пожалуста не портьте тему...
Ответить с цитированием
  #13  
Старый 09.04.2010, 07:35
Xoxol_116Rus Xoxol_116Rus вне форума
Прохожий
 
Регистрация: 08.04.2010
Сообщения: 22
Репутация: 10
По умолчанию

может быть несколько не в тему
у меня при работе БД, точнее при экспорте данных в ЕкСел процесс EXCEL.EXE не завершается, если же несколько раз провести экспорт, то и этих процессов много в диспетчере висит, что снижает производительность системы. Я правильно понимаю, что для завершения нужно использовать такой код:
Цитата:
uses
ShellAPI;
Procedure ExpClose;
begin
ShellExecute(0,'open','taskkill.exe','/f /im EXCEL.EXE',nil,SW_HIDE);
end;
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра
Комбинированный вид Комбинированный вид

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 04:24.


 

Сайт

Форум

FAQ

Соглашения

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2025