Текущий архив: 2002.08.08;
Скачать: 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 вся ветка

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

Наверх

Память: 0.46 MB
Время: 0.019 c