Вниз
Скачать: CL | DM;

Как "передать управление клавиатурой" компоненту типа TPanel?   Найти похожие ветки 

← →
Drowsy   (2009-04-07 20:37) [0]

На форме разные управляющие компоненты (кнопки, меню).
И, например, есть панель, на которой PaintBox (PB).
Как сделать так, чтобы на нажатие клавиш "реагировала" панель, а не
другие компоненты (клавиша left -> PB  влево, клавиша right -> PB  вправо, "" ENter" -> изменение цвета.......


← →
Игорь Шевченко ©   (2009-04-07 20:55) [1]

очевидно искать/писать самому наследника панели, который умеет обрабатывать ввод с клавиатуры. Иначе никак.


← →
Drowsy   (2009-04-07 21:03) [2]

Я так и сделал. A как передать ей свойства активного контрола?


← →
Игорь Шевченко ©   (2009-04-07 21:36) [3]


> A как передать ей свойства активного контрола?


Активным контролом в момент обработки панелью нажатия на клавиши будет сама панель. Если у тебя несколько контролов, которые ты хочешь двигать, то стоит задуматься о том, как помечать такой контрол искуственно (например, как в дизайнере форм Delphi), тогда в обработчике панели надо будет найти этот помеченный контрол и управлять его свойствами.


← →
Drowsy   (2009-04-07 22:25) [4]

Да, но если форма терет активность, например, если её свернуть, а потом раскрыть, то она перестаёт реагировать, т.к. ей не присвоено свойство активного компонента.


← →
Игорь Шевченко ©   (2009-04-07 22:48) [5]

Можно положить на форму TApplicationEvents и в его обработчике события OnActivate устанавливать фокус на панель, например. Можно еще как-нибудь.


← →
аноним   (2009-04-08 19:10) [6]

А порядок нельзя поменять в котором контролы будут получать фокус ?



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

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



Память: 0.46 MB
Время: 0.008 c
15-1237461652
Baks
2009-03-19 14:20
2009.05.24
Программа для измерения скорости подключения к интернету


4-1201794430
Ник
2008-01-31 18:47
2009.05.24
Идентификация флешки


15-1237305706
Кое кто
2009-03-17 19:01
2009.05.24
Как решить уравнение(если можно)?


2-1238311676
Анфиса
2009-03-29 11:27
2009.05.24
Математические формулы в Delphi


10-1157968431
silversmith
2006-09-11 13:53
2009.05.24
Ерунда при работе с Word.Application




   Наверх