Новые сообщения [новые:0]
Дайджест
Горячие темы
Избранное [новые:0]
Форумы
Пользователи
Статистика
Статистика нагрузки
Мод. лог
Поиск
|
|
04.06.2002, 13:17
|
|||
|---|---|---|---|
|
|||
Key:=xxx не работает! |
|||
|
#18+
Hello, All! имеем форму с разными контролами, хочу чтоб Enter работал как Tab. Пишу в OnKeyDown - if Key=VK_RETURN then Key:=VK_TAB; а оно мне - хххххх. Т.е. срабатывает все равно Enter. Да и вообще переприсвоение нажатой клавиши не работает, хотя в ранних версиях Дельфи все работало. А шо же не так я делаю? С уважением Коговюк Игорь ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
04.06.2002, 22:06
|
|||
|---|---|---|---|
Key:=xxx не работает! |
|||
|
#18+
Дело в том, что на нажатие ENTER реагирует только onKeyuP. Переход к следующему контролу по ENTER (KeyPreview в свойствах формы установлено в true)- procedure TForm1.FormKeyUp(Sender: TObject; var Key: Word; Shift: TShiftState); begin if Key=VK_RETURN then begin SelectNext(ActiveControl, true, true); end; end; ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
start [/forum/topic.php?fid=58&mobile=1&tid=2119996]: |
0ms |
get settings: |
10ms |
get forum list: |
13ms |
check forum access: |
4ms |
check topic access: |
4ms |
track hit: |
35ms |
get topic data: |
10ms |
get forum data: |
2ms |
get page messages: |
39ms |
get tp. blocked users: |
1ms |
| others: | 282ms |
| total: | 400ms |
| 0 / 0 |
