| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

SendInput и Delphi ??? [D6, Win2k]

Manix ©   (2003-04-03 20:07:00) 

Подскажите как юзать SendInput(...) в Delphi ? Есть примеры на С, но в них нифига не понятно. Дайте кто-нить пример

---

Diamond Cat   (2003-04-04 02:52:00) [1]

нажатие правой кнопки мыши по координатам курсора
var
d:tINPUT;
g:tagmouseinput;
pt:Tpoint;
begin
getcursorpos(pt);
g.dx:=pt.x;
g.dy:=pt.y;
g.mouseData:=0;
g.dwFlags:=MOUSEEVENTF_LEFTDOWN ;
g.time:=0;
d.mi:=g;
d.Itype:=INPUT_MOUSE;
SendInput(1,d,sizeof(d));
таким же манером можно отправлять и нажатие клавиатуры
подробней читай в msdn

---

Morfein   (2003-04-03 21:10:00) [2]

А чего такое SendInput(...)?
Да и вообще, привёл бы пример... уж перевели бы как-нибудь общими силами... :)

---

Наверх