Отловить нажатие Esc в проекте

← →
p-s (2004-02-12 15:37) [0]

Доброго времени суток. Как отловить нажатие клавиши Esc для _всех_ форм в проекте. Т.е не писАть везде обработчик этого события, а только чтобы одна процедура для всех сразу. Спасибо.

← →
Cosinus © (2004-02-12 15:38) [1]

Назначить всем_формам_в_проекте один и тот же обработчик

← →
Семен Сорокин © (2004-02-12 15:45) [2]

сделай общего предка для всех форм - там и делай свой обработчик.

← →
Карелин Артем © (2004-02-12 15:46) [3]

....
Screen.OnActiveFormChange:=ProcessDataFields;
....
procedure TMainData.ProcessDataFields(Sender: TObject);
var s:TComponent;
begin
try
s:=Screen.ActiveCustomForm;
s.OnKeyDown:=обработчик;//про KeyPreview у формы не забываем.
except
end;
end;

Отловить нажатие Esc в проекте Найти похожие ветки