ДРУГАЯ переделка Enter = Tab

← →
Silver_ (2003-03-10 12:43) [0]

тока сразу опережу следующий код не катит

if (Key = #13) then begin Key:=#0; Perform(WM_NEXTDLGCTL,0,0); end;

он тока передает фокус следующему обьекту мне же нужно иммитация нажатия Tab
следующии вариант тожа не катит

if (Key = #13) then Key:=#9;// #9=Tab

как быть?

← →
Eugene1501 © (2003-03-10 12:57) [1]

SendMessage(Form1.Handle,WM_CHAR,Ord(#9),0);

← →
Silver_ (2003-03-10 13:14) [2]

> Eugene1501 © (10.03.03 12:57)
> SendMessage(Form1.Handle,WM_CHAR,Ord(#9),0);

типа этим мзаменить это:?

> Key:=#9;// #9=Tab

Спасиба, пробую.

← →
Song © (2003-03-10 13:17) [3]

keybd_event(...)
key:=0;

← →
Silver_ (2003-03-10 14:54) [4]

ДРУГАЯ переделка Enter = Tab Найти похожие ветки