|
Key:=xxx не работает!
|
|||
---|---|---|---|
#18+
Hello, All! имеем форму с разными контролами, хочу чтоб Enter работал как Tab. Пишу в OnKeyDown - if Key=VK_RETURN then Key:=VK_TAB; а оно мне - хххххх. Т.е. срабатывает все равно Enter. Да и вообще переприсвоение нажатой клавиши не работает, хотя в ранних версиях Дельфи все работало. А шо же не так я делаю? С уважением Коговюк Игорь ... |
|||
:
Нравится:
Не нравится:
|
|||
04.06.2002, 13:17 |
|
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; ... |
|||
:
Нравится:
Не нравится:
|
|||
04.06.2002, 22:06 |
|
|
start [/forum/topic.php?fid=58&msg=32031720&tid=2119996]: |
0ms |
get settings: |
11ms |
get forum list: |
14ms |
check forum access: |
4ms |
check topic access: |
4ms |
track hit: |
31ms |
get topic data: |
10ms |
get forum data: |
2ms |
get page messages: |
44ms |
get tp. blocked users: |
2ms |
others: | 284ms |
total: | 406ms |
0 / 0 |