Pregunta: | 26040 - PULSAR UN BOTON DEL RATON POR CODIGO |
Autor: | Diego Suarez |
Necesito pulsar el raton izquierdo del raton por codigo y no encuentro por ningun lado la forma de hacerlo, se como moverlo, pero no como simular una pulsacion en el, tanto pulsarlo como soltarlo
muchas gracias por vuestra ayuda |
Respuesta: | Israel |
La solucion para eso es la siguiente.
procedure MouseLeft; var Pos:TPoint; begin GetCursorPos(Pos); Mouse_Event(MOUSEEVENTF_ABSOLUTE or MOUSEEVENTF_LEFTDOWN,pos.x,pos.y,0,0); Mouse_Event(MOUSEEVENTF_ABSOLUTE or MOUSEEVENTF_LEFTUP,pos.x,pos.y,0,0); end; Debes llamar al procedure MouseLeft para generar un click con el boton izquierdo en la posicion actual del raton. Para hacerlo con otro boton hay que modificar el parametro MOUSEEVENTF_LEFTDOWN y el MOUSEEVENTF_LEFTUP Espero te vaya bien |