![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как мне эмулировать табуляцию?
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 ? Хотя, конечно, тоже не совсем изящно...