Delphi - Delphi
|
Новый участник Сообщения: 17 |
Требуется решить такую задачу:
Нужно, чтобы при нажатии на клавишу Enter вырабатывалось сообщение OnKeyDown формы, если фокус ввода находится, допустим, на TButton. Событие не вырабатывается только при нажатии Enter. P.S. Естественно методы решения есть, но может предложите более элегантный? |
|
Отправлено: 00:48, 29-04-2003 |
Пользователь Сообщения: 61
|
Профиль | Отправить PM | Цитировать В окне Object Tree выделить посредством Shift все элементы формы и вот банальный пример(полностью не в тему, но принцип тот-же):
1.Напрямую всем элементам присвоить событие OnKeyPress. 2.При вызове события выполнять, например – Close; И тогда на каком бы элементе не находился фокус, в любом случае при нажатии любой клавиши(именно в этом примере) выполнялось бы событие OnKeyPress. Также попробуй реализовать это у себя - при нажатии Enter вызываешь OnKeyPress, которое уже присвоено всем элементам формы. Если не прав, то укажи на ошибку. |
------- Отправлено: 03:13, 29-04-2003 | #2 |
Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети. Если же вы забыли свой пароль на форуме, то воспользуйтесь данной ссылкой для восстановления пароля. |
Модер Сообщения: 1716
|
Профиль | Сайт | Отправить PM | Цитировать Zema
В обработчике Enter-а на кнопке: if assigned(OnKeyDown) then OnKeyDown(...) Параметры только лень смотреть. |
------- Отправлено: 06:52, 29-04-2003 | #3 |
Новый участник Сообщения: 17
|
Профиль | Отправить PM | Цитировать Дело еще запутано тем, что событие типа OnKeyDown для TButoon не возникает при нажатии Enter (вырабатывается OnClick). Мне же надо, чтобы выполнялись разные действия при нажатии мышкой и Enter.
Electras OnKeyDown не возникает при нажатии Enter |
Отправлено: 01:25, 01-05-2003 | #4 |
Пользователь Сообщения: 61
|
Профиль | Отправить PM | Цитировать Zema Дай время, поюзаю...
|
|
------- Отправлено: 01:52, 01-05-2003 | #5 |
![]() |
Участник сейчас на форуме |
![]() |
Участник вне форума |
![]() |
Автор темы |
![]() |
Сообщение прикреплено |
| |||||
Название темы | Автор | Информация о форуме | Ответов | Последнее сообщение | |
Delphi - Delphi | UpperCase на Delphi 7 | Cognolio | Программирование и базы данных | 3 | 26-01-2006 15:42 | |
Delphi - Delphi | Surround | Программирование и базы данных | 11 | 10-01-2004 22:13 | |
Delphi - Delphi | Zx | Программирование и базы данных | 3 | 27-08-2003 10:19 | |
Delphi - Delphi | Roman Go | Программирование и базы данных | 9 | 25-12-2002 15:48 | |
Delphi - Delphi | Roman Go | Программирование и базы данных | 11 | 11-12-2002 14:43 |
|