none
Cambiar las coodenadas del puntero del mouse RRS feed

Respuestas

  • hola

    que seria exactamente "cambiar posicion de las coordenas" ?

    o te refieres a cambiar el icono del puntero ?

    por ahi este video ayude:
    VB.NET - MOUSE - Set Position, Read Position, Clicking - Tutorial

    aunque por ahi estas lineas logren el objetivo

    Public Declare Function SetCursorPos Lib "user32" (ByVal X As Integer, ByVal Y As Integer) As Integer

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    SetCursorPos(200, 200)
    End Sub

    saludos
    Leandro Tuttini

    Blog
    Buenos Aires
    Argentina
    jueves, 3 de septiembre de 2009 17:07

Todas las respuestas

  • hola

    que seria exactamente "cambiar posicion de las coordenas" ?

    o te refieres a cambiar el icono del puntero ?

    por ahi este video ayude:
    VB.NET - MOUSE - Set Position, Read Position, Clicking - Tutorial

    aunque por ahi estas lineas logren el objetivo

    Public Declare Function SetCursorPos Lib "user32" (ByVal X As Integer, ByVal Y As Integer) As Integer

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    SetCursorPos(200, 200)
    End Sub

    saludos
    Leandro Tuttini

    Blog
    Buenos Aires
    Argentina
    jueves, 3 de septiembre de 2009 17:07
  • Hola Leandro, gracias por responder.
    Esa funcion del api es una solucion y es muy buena, se ajusta a lo que necesitaba, pero tambien encontre la forma en el mismo .net de hacerlo usando la clase System.Windows.Form.Cursor la cual tiene una propiedad llamada Position que me permirte Obtener o cambiar la posicion del cursor del mouse. A esta propiedad le entra un Point como parametro para poder efectuar el cambio de coordenadas.

    Ejemplo:

    Public Class Form1
    
        Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
            System.Windows.Forms.Cursor.Position = New Point(500, 500)
        End Sub
    
    End Class
    viernes, 4 de septiembre de 2009 1:21