Скачать: CL | DM;

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

← →
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]

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

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

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.017 c