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

Вниз

Помогите plz   Найти похожие ветки 

← →
PEC ©   (2002-03-20 10:33) [0]

Проблема как отключить Hot key ( ALT+F4 );

Помогите пожалуйста !
Спасибо!

---

← →
Song ©   (2002-03-20 10:35) [1]

1. Захучить эту комбигацию
2. Обрабатывать onCloseQuery c CanClose:=False;
3. Обрабатывать onClose c Action:=caNone;

2Модератор - пора этот вопрос в FAQ

---

← →
PEC ©   (2002-03-20 10:40) [2]

ни чего не понял

---

← →
Song ©   (2002-03-20 10:42) [3]


procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
CanClose:=False;
end;


---

← →
Виктор Щербаков ©   (2002-03-20 10:45) [4]

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

---

← →
Song ©   (2002-03-20 10:47) [5]

2Виктор Щербаков © (20.03.02 10:45)
забыли Form1.KeyPreview:=True;

---

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

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

Наверх

Память: 0.47 MB
Время: 0.01 c