Текущий архив: 2006.11.19;
Скачать: CL | DM;
Вниз
Как сделать, чтоб форма закывалась при нажатии на Esc? Найти похожие ветки
← →
daser (2006-10-31 21:51) [0]
← →
@!!ex © (2006-10-31 21:54) [1]
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if Key=27 then Close;
end;
← →
daser (2006-10-31 21:58) [2]>@!!ex © (31.10.06 21:54) [1]
почему-то такое не работает...
← →
Ketmar © (2006-10-31 22:01) [3]>[2] daser 31-Oct-2006, 21:58
>почему-то такое не работает...
ошибка в DNA?
← →
Gero © (2006-10-31 22:07) [4]> [2] daser (31.10.06 21:58)
Form1.KeyPreview := True;
← →
daser (2006-10-31 22:15) [5]>@!!ex © (31.10.06 21:54) [1]
+
>Gero © (31.10.06 22:07) [4]
=
отличный результат. Спасибо!
Страницы: 1 вся ветка
Текущий архив: 2006.11.19;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.033 c