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

Вниз

Вопрос   Найти похожие ветки 

 
zalviko ©   (2002-10-27 14:44) [0]

Как заблокировать сочетание клавиш ALT+F4?


 
Cobalt ©   (2002-10-28 00:19) [1]

Кстати, интересный вопрос. Подозреваю, что необходимо находить таблицу ускорителей, и удалять её. Причем, не всю, а только часть. Или создавать новую, в неё копировать из старой часть, старую удалять.

Но вот как НАЙТИ необходимую таблицу?


 
vidiv ©   (2002-10-28 02:38) [2]

Form1.KeyPreview:=True;
...
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if (Key = vk_f4)and(ssalt in shift) then
begin
key:=0;
//beep;
end;
end;


 
F1 ©   (2002-10-28 11:05) [3]

>if (Key = vk_f4)and(ssalt in shift) then
> begin
> key:=0;
> end;
Не работает эта вещь!!!(по крайней мере у меня :(

А что если обрабатывать OnCloseQuery и CanClose:=Flag;
А Flag=True только если выход был через вашу кнопку.

P.S. Только тогда и крестик [X] у окна не сработает :(



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

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

Наверх




Память: 0.47 MB
Время: 0.015 c
3-14966
Sedov Vitalik
2002-12-15 14:01
2003.01.06
Помогите разобраться с суммированием


14-15311
BF7ru
2002-12-17 17:05
2003.01.06
Siemens sl45i - самый популярный телефон


14-15249
race1
2002-12-10 07:59
2003.01.06
деньги


1-15026
_sanek_
2002-12-21 12:19
2003.01.06
Swif


8-15177
timetrax
2002-09-16 22:25
2003.01.06
Надо книгу по использованию ОпенГеля в Делфе