08.05.2024 - WalkOnEnter| Разместил: admin | Категория: VB .NET | | Размер файла: 5.36 KB | Дата: 08.05.2024 | | Версия: 1.0 | Скачали: 12 |
Процедура ToggleWalk позволяет обходить все контролы на форме по нажатию клавиши Enter, - т.е. так же, как по нажатию клавиши TAB.
Вроде бы обычная и несложная задача - ставим форме KeyPreview = True, пишем код события Form_KeyPress, и так далее, НО:
1. Попробуйте обойти все контролы по Enter, когда на форме есть кнопка, у которой свойство Default = True. Вы скажете - "А на кой чёрт мне делать такую кнопку на своей форме, если я собираюсь гулять по ней по Enter?" - Правильно, но всё же?
2. Попробуйте нажать Enter, когда фокус стоит даже на обычной кнопке (т.е. у которой Default = False) - ваш перехват кода vbKeyReturn в событии Form_KeyPress не поможет: кнопка всё равно нажмётся!
При обходе контролов учитывается их способность "принять" фокус - т.е. наличие метода SetFocus, свойства TabIndex, текущие значения свойств Enabled и Visible. |
Опубликовано на сайте: http://www.coders-library.ru
Прямая ссылка: http://www.coders-library.ru/index.php?name=files&op=view&id=922
|