Текущий архив: 2003.03.20;
Скачать: CL | DM;

Вниз

ДРУГАЯ переделка 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]

> Eugene1501 ©

можа че не так пользую но не катит

пробую решение от

> Song ©

---

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

Текущий архив: 2003.03.20;
Скачать: CL | DM;

Наверх

Память: 0.47 MB
Время: 0.016 c