Как, закрыть форму, нажав на Esc?

← →
fast2 (2006-04-14 20:25) [0]

Независимо от того, кокой компонент в фокусе.

← →
elfebet © (2006-04-14 20:27) [1]

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
begin

if (Key=27) then Close;

end;

← →
elfebet © (2006-04-14 20:29) [2]

и еще в свойствах форму надо поставить KeyPreview = true

← →
Virgo_Style © (2006-04-14 20:30) [3]

elfebet © (14.04.06 20:27) [1]

еще, скорее всего, пригодится Form.KeyPreview = true

← →
Anatoly Podgoretsky © (2006-04-14 20:42) [4]

А еще лучше поставить на форму кнопку Cancek и установить одноименное свойство в True

> Anatoly Podgoretsky © (14.04.06 20:42) [4]
>
> А еще лучше поставить на форму кнопку Cancek и установить
> одноименное свойство в True
>

А саму кнопку спрятать, чтоб глаза не мозолила.

> А саму кнопку спрятать, чтоб глаза не мозолила.

Как раз весь цимус в том, что кнопку прятать не надо.

Как, закрыть форму, нажав на Esc? Найти похожие ветки