Вниз
Скачать: CL | DM;

Как програмно нажать кнопку Enter через SendMessage   Найти похожие ветки 

 
TeNY ©   (2004-10-11 17:12) [0]

Делаю вот так
for X:=0 to 100 do
SendMessage(hkWnd,WM_KEYDOWN,13,x);
в поле едит где по нажатию должно появится мессага но она не появляется
на
SendMessage(hkWnd,WM_KEYDOWN,13,0); тоже не реагирует


 
KSergey ©   (2004-10-11 17:29) [1]

WM_CHAR попробуй


 
TeNY ©   (2004-10-11 18:14) [2]

А конкрено это не проходит в блокноте в диалоге поиска,текст вставляется а на ентер не жмется...


 
Gero ©   (2004-10-11 18:22) [3]

Ты [1] сделал?

P.S. Не надо <СODE> и <В> без надобности использовать.


 
OSokin ©   (2004-10-11 19:03) [4]

VK_RETURN - виртуальный код ентера.


 
TeNY ©   (2004-10-12 06:45) [5]


> Gero ©   (11.10.04 18:22) [3]
> P.S. Не надо <СODE> и <В> без надобности использовать.

Не надо не по теме нговорить а то в треп перенесут


 
KSergey ©   (2004-10-12 07:26) [6]

> [2] TeNY ©   (11.10.04 18:14)
> А конкрено это не проходит в блокноте в диалоге поиска,текст
> вставляется а на ентер не жмется...

Погоди, а энтер-то кому шлешь? Его вообще-то кнопке надо слать, а не полю ввода.
Ну и [4] OSokin © безусловно прав. А потому в [1] я скорее всего не то сморозил.


 
Ascan   (2004-10-12 11:30) [7]

TeNY, по Кнопке не обязательно клавиатурой "кликать", можно еще и мышкой. Если с клавиатурой не разберешься, попробуй следующий код:

procedure MouseClick(Wnd:HWnd);  // Wnd – Handle кнопки
begin
 SendMessage(Wnd, wm_LButtonDown, 0, 0);
 SendMessage(Wnd, wm_LButtonUp, 0, 0);
end;


Такой код работает. Если не лень, можешь еще добавить, например, sleep(…) или if IsWindow(Wnd), and IsWindowEnabled(Wnd) и and IsWindowVisible (Wnd).
А строку procedure … переписать как function …

Удачи.



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.022 c
14-1099342994
Мирон
2004-11-02 00:03
2004.11.21
Есть вакансия жены...


1-1099671777
nick123
2004-11-05 19:22
2004.11.21
Передача указатель


3-1098842650
piople
2004-10-27 06:04
2004.11.21
Blop поля


9-1090517851
2_XBOCTA
2004-07-22 21:37
2004.11.21
Сценарий к квесту...


14-1099672063
Agent13
2004-11-05 19:27
2004.11.21
Delphi 8, 9 и WinXP Home




   Наверх