Форум: "Основная";
Текущий архив: 2002.04.18;
Скачать: [xml.tar.bz2];

Вниз

Нажата ли клавиша-стрелка   Найти похожие ветки 

← →
Ник   (2002-04-04 22:39) [2]

KeyPreview у формы стоит в true.

procedure TfmMain.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if key=37 then ShowMessage("gg");
end;

Не срабатывает. Если поставить код Enter, Esc и т.д. то работает.

---

Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2002.04.18;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.43 MB
Время: 0.007 c