![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Общие вопросы [D5, Win95/98]
Sub © (2002-07-25 17:26:00)Имеется форма Form1. На форме расположен компонент MainMenu1.
Как заставить свойство формы OnKeyDown работать так, чтобы по нажатию клавиши F10 можно было закрыть форму.
TTCustomDelphiMaster (2002-07-25 20:08:00) [1]
> Sub © (25.07.02 17:26)
> Имеется форма Form1. На форме расположен компонент MainMenu1.
Если в MainMenu1 есть пункт "Выход" по которому закрывается форма, то можно у него настроить ShortCut=F10
Skier (2002-07-25 19:11:00) [2]>Sub
Form1.KeyPreview := True;
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if Key = VK_F10 then Close;
end;