emulacja myszy

0

poszukuje artykulu, ktory pokazuje jak emulować ruch myszy i klikaniie..

0

coś mi sie zdaje ze nie szukałeś w opcji szukaj

programowo trzeba naleźć uchwyt przycisku który sie chce przycisnąć

uchwyt_okna_glowne:=findwindow(nil,'nazwa_okna');
sleep(10);
h_przycisku := FindWindowEx(uchwyt_okna_veryfikacji,0,nil,'napis_na_przycisku');
sendmessage(hExit,BM_CLICK,0,0);//nacisniecie przycisku programowo

mozna jeszcze przez jeszcze przez ustawianie wspolrzednych myszki
setcurpos(x,y) lub coś podobnego na ekranie
jakaś była f-cja mouse_event poszukaj na forum
Seba

0

to mam w zdarzeniu onmousemove:

GetCursorPos(P);
edit1.text:=inttostr(P.x)

jak zrobić, zeby to działało także, gdy kusor zjedzie z formy mojego programu? czy ma to cos wspolnego z hookami?

0

Te funkcje dzialaja niezaleznie od tego, gdzie jest kursor. Wartosc w edicie Ci sie nie zmienia jak myszka 'wyjedzie' poza forme, bo nie ma wtedy zdarzenia MouseMove. Proponuje wrzucić tą funkcje do Timera i dobrac jakis logiczny interval (zaleznie od zastosowania programu)

0

Do emulacji mozna użyć przestarzałej funkcji mouse_event lub nowszej - SendInput() - opis tej ostatniej znajdziesz w MSDN (działa również dla klawiatury)

Zarejestruj się i dołącz do największej społeczności programistów w Polsce.

Otrzymaj wsparcie, dziel się wiedzą i rozwijaj swoje umiejętności z najlepszymi.