Delphi - asm Нажатие клавиши

[ClMlD]

Всем привет , помогите с кодм разобраться что то не как не могу

procedure EmulateKey(Wnd: HWND; VKey: Integer);
asm
   push 0
   push edx
   push 0101H //WM_KEYUP
   push eax
   push 0
   push edx
   push 0100H //WM_KEYDOWN
   push eax
   call PostMessage
   call PostMessage
end;

// Пример использования:
EmulateKey(Edit1.Handle, VK_RETURN);

Что то тестил тестил не как не робит как я понял в едит нужно вписать заголовок окна и вызвать функцию ? , кто шарит в асм подскажите пж

[Пепел Феникса]

первый параметр это хендл окна которому посылаем, второй скан код клавиши.
по сути асм код равен

postmessage(Wnd,WM_KEYDOWN,key,0);
postmessage(wnd,wm_keyup,key,0);

[ClMlD]

Посылаю окну SendMessage или PostMessage не то не другое несрабатывает хендл точно верный проверяю перед отправвкой есть другие функции для отправки клавиши в неактивное окно?

Ассемблерный код тоже что то не каких действий не делает чеш за беда

Ну хоть ты лопни ничего не работает hwnd уже отдельно находил программой вставлял прямо в код пробовал вставлять на таймер и делать окно активным всеровно ничего не работает помогите пожалуйста какие ещё функции есть для отправки нажатия

Заметил что экранная клавиатура успешно отправляет нажатие кнопки когда работает одна и когда работает с моей программой а моя программа не как не работает похоже что то не так с HWND хоть и находит его

[Пепел Феникса]

посмотрите через Spy++ или аналоги, что получает ваше окно в параметрах сообщений от системы и от вас.
да и в эдите обычно энтер не отображается.

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

экранная клава использует другие функции, и только для активных окон.

да и честно говоря тема обсосанная уже тысячи раз...

[ClMlD]

А как отправить нажатие активному я использую SetActiveWindow(h); а нотепад не реагирует

[Пепел Феникса]

значит не тот хендл видимо.

для строго активного есть SendInput.

[ClMlD]

кричит видит

 h := FindWindow(nil, 'Безымянный - Notepad2'); //узнаем хендл
 if h <> 0 then showmessage('ok');

[Пепел Феникса]

ввод идет не в это окно, а в Edit внутри.
в комплекте с Делфи обычно идет WinSight, изучите структуру формы интересующего приложения.

[ClMlD]

нет вы не поняли я не вводил ничего а просто пробовал сделать его активным чтобы убедится что SetActiveWindow работает.
Может я вообще что то не то горожу, мне нужно:
Так как не могу отправить в неактивное окно сделать окно активным нажать кнопку и вернуть фокус работающему до этого окну

[Пепел Феникса]

вы описание функции не читали как вижу.

вам нужна SetForegroundWindow.