Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > [ "Начинающим" ]
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 17.12.2008, 19:24
ApplicatiOn ApplicatiOn вне форума
Активный
 
Регистрация: 28.02.2008
Сообщения: 388
Репутация: -10
По умолчанию клавиши..

помогите пожалуйста сэмулировать нажатие клавиш вообще.. тоесть, нажимать на кнопку (любую, включая мышь) независимо от того какое окно активно...
Ответить с цитированием
  #2  
Старый 17.12.2008, 20:20
lmikle lmikle вне форума
Модератор
 
Регистрация: 17.04.2008
Сообщения: 8,096
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию

можно попробовать получить активное окно и послать ему WM_CHAR и/или WM_MOUSE.
Ответить с цитированием
  #3  
Старый 17.12.2008, 21:07
ApplicatiOn ApplicatiOn вне форума
Активный
 
Регистрация: 28.02.2008
Сообщения: 388
Репутация: -10
По умолчанию

и как же это осуществить?
Ответить с цитированием
  #4  
Старый 17.12.2008, 21:17
lmikle lmikle вне форума
Модератор
 
Регистрация: 17.04.2008
Сообщения: 8,096
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию

Послать - через SendMessage.
получить активное окно - там есть функции навигации по Z-стеку окон в API. навскидку не помню - посмотри по справке (MSDN).
Ответить с цитированием
  #5  
Старый 17.12.2008, 22:27
ApplicatiOn ApplicatiOn вне форума
Активный
 
Регистрация: 28.02.2008
Сообщения: 388
Репутация: -10
По умолчанию

Код:
procedure TForm1.Timer1Timer(Sender: TObject);
var
i : Integer;
H : Hwnd;
begin
H := FindWindow('окно', 0);
 begin
  For i:=1 to length(Edit1.text) do
  sendmessage(H, wm_char, ord(Edit1.text[i]), 0);
  SendMessage(H, WM_KEYDOWN, vk_return, 0);
  SendMessage(H, WM_KEYUP, vk_return, 0);
end;
end;
Admin: Не забываем пользоваться тегами, иначе последуют санкции!

здесь нужно знать точное окно... а как сделать чтобы он отправлял на любое активное?

Последний раз редактировалось Admin, 19.12.2008 в 19:19.
Ответить с цитированием
  #6  
Старый 17.12.2008, 22:29
ApplicatiOn ApplicatiOn вне форума
Активный
 
Регистрация: 28.02.2008
Сообщения: 388
Репутация: -10
По умолчанию

да, и, нажатие мыши здесь не получится сэмулировать
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра
Комбинированный вид Комбинированный вид

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 04:01.


 

Сайт

Форум

FAQ

Соглашения

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2025