Resumen Conocer la posición del ratón

>Necesito saber como puedo, de forma génerica, obtener la posición del
>ratón, si puede ser con una funcion API de Windows.
>
La función GetCursorPos devuelve las coordenadas del ratón en coordenadas
de pantalla (pixels).

Private Declare Function GetCursorPos Lib "user32" (lpPoint As POINTAPI) As
Long
Private Type POINTAPI
        x As Long
        y As Long
End Type


Private Sub Command1_Click()
Dim punto As POINTAPI, l As Long

l = GetCursorPos(punto)
MsgBox ("Posición X:" & punto.x & vbCr & "Posición Y:" & punto.y)

End Sub


Un saludo.

_________________________________________________
José Rubí de la Vega
E-mail : jrubi@arrakis.es
WWW : http://www.arrakis.es/~jrubi
Podrás encontrar información sobre VB, la lista
VB-ESP y un resumen de los mensajes de la misma



Resumen Resumen

Visual Basic Página de Visual Basic

Página principal Página principal

www.jrubi.com