|
|
|
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&tid=2119996]: |
0ms |
get settings: |
11ms |
get forum list: |
13ms |
check forum access: |
4ms |
check topic access: |
4ms |
track hit: |
58ms |
get topic data: |
11ms |
get forum data: |
2ms |
get page messages: |
41ms |
get tp. blocked users: |
2ms |
| others: | 12ms |
| total: | 158ms |
| 0 / 0 |
