Скачать: CL | DM;

Общие вопросы   Найти похожие ветки 

← →
Sub ©   (2002-07-25 17:26) [0]

Имеется форма Form1. На форме расположен компонент MainMenu1.
Как заставить свойство формы OnKeyDown работать так, чтобы по нажатию клавиши F10 можно было закрыть форму.

---

← →
Skier ©   (2002-07-25 19:11) [1]

>Sub

Form1.KeyPreview := True;


procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if Key = VK_F10 then Close;
end;


---

← →
TTCustomDelphiMaster ©   (2002-07-25 20:08) [2]

> Sub © (25.07.02 17:26)
> Имеется форма Form1. На форме расположен компонент MainMenu1.


Если в MainMenu1 есть пункт "Выход" по которому закрывается форма, то можно у него настроить ShortCut=F10

---

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

Скачать: CL | DM;



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