а вопрос такый...
есть Edit1, Edit2 я хочу писать в Edit1 что-то, потом нажать ентер и чтобы урсор сразу перескочил в Edit2
как это зделать?
вот есть два едита...
Модератор: Модераторы
-
Джентельмен
- постоялец
- Сообщения: 162
- Зарегистрирован: 16.10.2005 10:47:26
- Откуда: Украина Донбасс Краматорск
- Контактная информация:
- shade
- энтузиаст
- Сообщения: 879
- Зарегистрирован: 21.02.2006 19:15:48
- Откуда: http://shamangrad.net/
- Контактная информация:
А фокус передаться методом SetFocus, того контрола, которому нужно передать фокус.
Только вот в lazarus нет константы VK_RETURN (есть ли аналоги?)
А вообще я бы использовал OnKeyPress (а не OnKeyUp) таким образом:
Только вот в lazarus нет константы VK_RETURN (есть ли аналоги?)
А вообще я бы использовал OnKeyPress (а не OnKeyUp) таким образом:
Код: Выделить всё
if Key = #13 then
begin
Edit2.SetFocus;
Key := #0;
end;Только вот в lazarus нет константы VK_RETURN (есть ли аналоги?)
Как так нет?!!
Код: Выделить всё
$ find ./lazarus/ -type f -print0 | xargs -0 fgrep VK_RETURN | wc -l
106
Ну а если смотреть в суть, то...
Код: Выделить всё
./lazarus/lcl/lcltype.pp: VK_RETURN = 13;
-
Джентельмен
- постоялец
- Сообщения: 162
- Зарегистрирован: 16.10.2005 10:47:26
- Откуда: Украина Донбасс Краматорск
- Контактная информация:
- shade
- энтузиаст
- Сообщения: 879
- Зарегистрирован: 21.02.2006 19:15:48
- Откуда: http://shamangrad.net/
- Контактная информация:
