Переход от одного поля на другое нажатием на Enter

← →
ss300 © (2004-04-20 17:10) [0]

добрый вечер, мастера!

как можно сделать сабж?
1) полей очень много.
2) заменить кнопку TAB на ENTER

благодарю за внимание и заранее кланяюсь )

← →
Тимохов © (2004-04-20 17:14) [1]

воспользуйтесь событием TEdit OnKeyDown

← →
Reindeer Moss Eater © (2004-04-20 17:15) [2]

воспользуйтесь событием TForm OnKeyDown

← →
clickmaker © (2004-04-20 17:16) [3]

OnKeyDown
if (Key = VK_ENTER) then Key := VK_TAB;

← →
WebErr © (2004-04-20 17:17) [4]

В OnKeyPress формы нужно сделать
case Key of #13: KeyDown(VK_TAB, []); end;
разумеется KeyPreview формы установить в true.

← →
WebErr © (2004-04-20 17:19) [5]

> clickmaker © (20.04.04 17:16) [3]
> OnKeyDown
> if (Key = VK_ENTER) then Key := VK_TAB;

VK_RETURN наверное?

спасибо братья

Вернее вместо KeyDown нужно, наверное:
SendMessage(Handle, WM_KEYDOWN, WPARAM(VK_TAB), 0);