Движение по TAB в обратную сторону

← →
sl (2006-09-13 10:24) [0]

Screen.ActiveForm.Perform( CM_DIALOGKEY, VK_TAB, 0) "выполняет" движение вперед, а как сделать обратно?

← →
Сергей М. © (2006-09-13 10:32) [1]

За реакцию на ТАВ отвечает форма.

← →
sl (2006-09-13 10:35) [2]

>Сергей М.
ну это мы в курсе. Я спрашиваю, какой код всунуть вместо
Screen.ActiveForm.Perform( CM_DIALOGKEY, VK_TAB, 0)
чтобы двигался обратно????

← →
StriderMan © (2006-09-13 10:52) [3]

Shift надо куда-то подсунуть

← →
Сергей М. © (2006-09-13 10:54) [4]

Перед Perform() вызови GetKeyboardState(), в полученном массиве установи признак нажатия клавиши VK_LSHIFT и вызови SetKeyboardState() с модифицированным массивом в кач-ве параметра

Эмуляция нажатия клавиш клавиатуры для изменения фокуса не есть красивый и правильный способ. В Delphi существуют ф-ции FindNextControl и GetTabOrderList.

К следующему PostMessage(Handle, wm_NextDlgCtl, 0, 0);
К предыдущему PostMessage(Handle, wm_NextDlgCtl, 1, 0);

Движение по TAB в обратную сторону Найти похожие ветки