Переход между компонентами?

← →
Автор333 (2004-12-22 14:13) [0]

В программе есть некоторое количество TEdit"ov и ComboBox"ov.
Как можно сделать переход между ними не Tab"om, а клавишами вверх, вниз, вправо, влево?

← →
Александр Иванов © (2004-12-22 14:29) [1]

Сложность будет в определении компонента, который должен получить фокус. Но можно сформировать двумерный массив из компонентов и с ним уже все будет попроще. А там SetFocus...

← →
Автор333 (2004-12-22 14:31) [2]

А можно увидеть маленький примерчик?

← →
Александр Иванов © (2004-12-22 14:33) [3]

Если по всей идее, то он будет не маленький, а что именно вызывает интерес?

← →
Автор333 (2004-12-22 14:40) [4]

Массив из компонентов и маленький примерчик с переходом между компонентами!

Можно проще.
ActionList->Action1.ShortCut=EnterСобытие:
Action1.OnexecuteОбработчик:windows.keybd_event(9,0,0,0);

Массив:

var Comps:array of array of TCustomForm;

Переход:

Comps[row,col].SetFocus;

Переход между компонентами? Найти похожие ветки