Скачать: CL | DM;

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

← →
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, это не помешает функциям таба?

---

← →
{RASkov} ©   (2008-07-07 20:10) [4]

> [3] Franzy   (07.07.08 20:02)

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

---

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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.016 c