Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как мне эмулировать табуляцию?


Danil ©   (2003-05-13 00:02:00) 

У меня есть несколько TKOLEdit"ов на форме. Я бы хотел написать для них одну процедуру обработки нажатий (для цифр), а также чтобы при нажатии на Enter выполнялась табуляция к следующему компоненту. Первое у меня не вызвало затруднений, а вот второе...
Как это сделать? Пробовал посылать форме WM_KEYUP, DOWN, CHAR с wParam=9 (или vk_tab) - не получается.
Можно, конечно, делать поиск компонента, к которому надо перейти, по значению Tag"a, но должен же быть "нормальный" способ...


ЗЫ Табуляция на форме через кнопку ТАБ работает прекрасно.


Danil   (2003-05-13 13:53:00) [1]

Спасибо, Дмитрий!

Всё получилось!!!


mdw   (2003-05-13 11:03:00) [2]

Обработчик OnKeyDown для контролов:

procedure TKOL_Form.EditBoxsKeyDown(Sender: PControl; var Key: Integer; Shift: Cardinal);
begin
if Key = vk_Return then Sender.GotoControl(VK_TAB);
end;


KilkennyCat   (2003-05-13 05:01:00) [3]

ну... может, через SetFocus ? Хотя, конечно, тоже не совсем изящно...


Наверх

Титульная страница Поиск, карта сайта Написать письмо