| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
OnKeyDown [D7]
zdm © (2006-08-23 17:31:00)Подскажите, как организовать по нажатию, например, кнопки "ESC", в любом месте формы, выход из приложения.
procedure TForm_Osn.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if key=27 then close ;
end;
НЕ КАТИТ.
Loginov Dmitry (2006-08-23 22:15:00) [1]TActionList -> TFileExit (ShortCut = Esc)
DevilDevil (2006-08-23 17:56:00) [2]if key=27 then Application.Terminate;
zdm (2006-08-23 17:43:00) [3]а на "дочерних"-- пожалуйста, все работает
zdm (2006-08-23 17:41:00) [4]Спасибо :( , но вот беда приложение MDI и на главной форме это почему-то не катит.
novill (2006-08-23 17:38:00) [5]form1.Keypreview?
DevilDevil (2006-08-23 17:37:00) [6]свойство KeyPreview установи в true. Что означает "любом месте формы"?
| |
