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

Вниз

Alt+F4   Найти похожие ветки 

 
Hiks1 ©   (2002-03-13 07:15) [0]

Так как в этом форуме наблюдается максимальная активность индивидумов задам этот вопрос здесь. В системном форуме не сработало.
Два дня бьюсь и не могу отключить комбинацию кнопок Альт+Ф4, (ума что ль нехватает), так, чтобы остальные комбинации работали. Переворошил кучу хелпов и ничего не понял...


 
panov ©   (2002-03-13 07:30) [1]

Поищи на сайте примеры глобальных HOOK на клавиатуру.
Если бы вопрос корректно задал, тебе бы давно ответили.
Например, так:
Как обработать/заблокировать нажатие комбинации кнопок Alt+F4 для всех программ Windows.


 
Hiks1 ©   (2002-03-13 07:42) [2]

to panov
МНЕ НЕ НАДО ГЛОБАЛЬНЫХ!!!
Мне надо, конкретно, задавить в зародыше Alt+F4 в отдельно взятой программе. Глобальный HOOK я научился делать пока этот искал... но он мне не нужен.


 
gek   (2002-03-13 07:57) [3]


procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if (key=VK_F4) and (ssAlt in Shift) then
bool:=true
else
bool:=false
end;

procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
if bool then
Action:=canone
end;

Попробуй закрой


 
Hiks1 ©   (2002-03-13 08:31) [4]

To Gek
VK_F4! VK_F4! Как догадался? :-), я перелопатил штук 6 книжек, на Alt+Tab, Alt+Esc, etc. и даже на три магические клавиши описухи нашел. Этой нигде небыло!
Спасибо!


 
lipskiy ©   (2002-03-13 09:35) [5]


> В системном форуме не сработало.

В пору все форумы объединять в один. Ну или в два:
"Потрепаться" и "Поработать" :)
(Merlin"у на заметку)



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

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

Наверх




Память: 0.47 MB
Время: 0.013 c
14-70006
Merlin
2002-02-26 02:47
2002.04.22
Обсуждение внешнего вида форумов


1-69917
cok
2002-03-30 14:55
2002.04.22
Pascal срочно, плзззз...


1-69840
ymin
2002-04-08 09:01
2002.04.22
Программа стала зависать. Состоит из 3-х форм. Даже после того...


6-69938
PL
2002-02-01 20:51
2002.04.22
traceroute


1-69871
snoup
2002-04-08 20:45
2002.04.22
Как TPopup соединить с TToolBar?