Глюк или я чего-то не понимаю?

← →
Franzy (2008-07-07 19:42) [0]

Почему, если на форме есть TabControl, перестают работать события KeyPress и KeyDown?!

задаем для пустой формы событие
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
ShowMessage("hello");
end;

- то при запуске все работает. Нажимаем любую клавишу - выскакиевает сообщение. А если на эту же самую форму добавить компонент TabControl, событие работать перестает. В чем дело? Так и должно быть? Если да, то как в таком случае ловить нажатия клавиш? Ведь у TabControl"a нет таких событий.

← →
Johnmen © (2008-07-07 19:48) [1]

KeyPreview в True

← →
palva © (2008-07-07 19:50) [2]

TabControl сам ловит нажатия клавиш, поскольку они ему нужны для перемещения по табам.

← →
Franzy (2008-07-07 20:02) [3]

О, спасибо! А если KeyPreview=true, это не помешает функциям таба?

> [3] Franzy (07.07.08 20:02)

Нет. Хотя... дай дураку стеклянный...
:)

Глюк или я чего-то не понимаю? Найти похожие ветки