Подписаться на RSS рассылку
Главная » Статьи по Delphi » Клавиатура » Закрытие окна по Escape

Закрытие окна по Escape

Автор: Борисов Сергей

Если необходимо закрыть окно по нажатию на кнопку клавиатуры Escape, то скорее всего это какое-либо "вторичное" окно программы, тоесть не главное. Например для ввода значений. Как правило на таких окнах есть кнопки "Отмена" или подобные, по которым это окно и закрывается. У компонента TButtonCancel, которое нужно установить в True. Теперь при нажатии на кнопку Escape выполнится onClick этой кнопки. Если по событию onClick выполнить закрытие формы (Close), то, соответственно, и при нажатии на Escape форма будет закрываться закроится.

Но если нет никаких кнопок и нужно просто закрыть окно по нажатию на Escape? Создаем обработчик события OnKeyPress:

procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);
begin
  if key=#27 then close;
end;

key - это код нажатой клавиши. А код клавиши Escape равен 27.

Просмотров: 6302

Обсудить на форуме


Имя *:
Email:


Код *:

Copyright © 2008-2016 Программирование на Delphi для начинающих и не только

Полнота авторских прав на все материалы, опубликованные на сервере DelphiDevelop.ru принадлежит их авторам

Перепечатка материалов разрешается с указанием авторства и гиперссылки на первоисточник информации

Хостинг от uCoz

Автор проекта: Борисов Сергей

e-mail: save-x@yandex.ru

Связь с администрацией сайта