>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