Sección de códigos , trucos y ejemplos para visual basic


73 - Obtener las coordenadas del Mouse mediante el Api GetCursorPos

<Volver> - Anterior - Siguiente



 

Contenido

 

 

 

 

 

 


Ejemplo básico de GetCursorPos

El siguiente es un simple código fuente que utiliza la Api GetCursorPos para obtener las coordenadas del mouse

Vista del formulario imprimiendo las coordenadas

GetCursorPos para saber las coordenadas del mouse

Este ejemplo no se usa sobre el evento MouseMove del formulario, sino que utiliza la función GetCursorPos. Esta función devuelve la posición del cursor en la pantalla ( los valores devueltos están expresados en pixeles )

La función es muy simple de usar, solo requiere como parámetro, una estructura o UDT, que contiene dos variables para almacenar el valor x y el valor y con las coordenadas.

La estructura se llama POINTAPI y es la siguiente:

Private Type POINTAPI
    X As Long
    Y As Long
End Type 

Para ejecutar la función, se pasa a GetCursorPos, una variable de tipo POINTAPI , y luego se consultan los valores devueltos en la estructura

    Dim Mouse As POINTAPI
    ret = GetCursorPos(Mouse)

    MsgBox Mouse.X
    MsgBox Mouse.Y  

 

Colocar un Timer en el form

Código fuente

 


Enlaces relacionados



Buscar en Recursos vb