![]() |
Прежде чем задать вопрос, смотрите FAQ.
Рекомендуем загрузить DRKB.
![]() ![]() |
![]() |
Vardes |
![]()
Сообщение
#1
|
Пионер ![]() ![]() Группа: Пользователи Сообщений: 131 Пол: Мужской Репутация: ![]() ![]() ![]() |
Какие существуют способы для того, чтоб после нажатия кнопки с неё убирался фокус, т.к. если на ней будет фокус,то перестают работать такие события как OnKeyPress и Down (имеется ввиду события по нажатию на любые клавишы) ???
Сообщение отредактировано: Vardes - 5.04.2007 17:02 |
klem4 |
![]()
Сообщение
#2
|
![]() Perl. Just code it! ![]() ![]() ![]() ![]() ![]() ![]() Группа: Модераторы Сообщений: 4 100 Пол: Мужской Реальное имя: Андрей Репутация: ![]() ![]() ![]() |
Перевести фокус на другую компоненту формы не пойдет ? или на саму форму ? напиши по подробней в чем проблема, не очень понятно ...
-------------------- perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
|
Vardes |
![]()
Сообщение
#3
|
Пионер ![]() ![]() Группа: Пользователи Сообщений: 131 Пол: Мужской Репутация: ![]() ![]() ![]() |
Так даже если на др. компоненту формы фокус перевести, то обычное событие OnKeyPress просто не работает, на любую клавишу нажимаешь, а программа в процедуру TForm1.FormKeyPress не входит...Если сделать свойство всех компонент *.Enabled:=False, тогда процедура заработает...Из всего этого можно судить о том, что во всём виноват фокус, его и надо убрать со всех компонент...
Как кстати перевести фокус на Форму ? |
volvo |
![]()
Сообщение
#4
|
Гость ![]() |
А у тебя, кстати, KeyPreview формы в True переброшен?
|
Vardes |
![]()
Сообщение
#5
|
Пионер ![]() ![]() Группа: Пользователи Сообщений: 131 Пол: Мужской Репутация: ![]() ![]() ![]() |
Всё спасибо, всё получилось...раньше просто не знал о таком....
|
![]() ![]() |
![]() |
Текстовая версия | 8.07.2025 3:09 |