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

← →
Danil (2003-05-13 00:02) [0]

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

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

← →
KilkennyCat (2003-05-13 05:01) [1]

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

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

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

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

← →
Danil (2003-05-13 13:53) [3]

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

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

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