Programación General => Visual Basic 6.0 e inferiores => Mensaje iniciado por: SpeedCAD en Jueves 4 de Noviembre de 2004, 15:11
Título: Posicion Del Mouse
Publicado por: SpeedCAD en Jueves 4 de Noviembre de 2004, 15:11
Hola...
Necesito saber en que posicion (X e Y) se encuentra el mouse en una aplicacion determinada, supongo que pasandole el hwnd a la funcion determinada de la aplicacion que deseo. Yo se como tener la posicion del mouse X e Y pero de la pantalla completa, lo que yo ncesito es saber la posicion del mouse con respecto a una aplicacion o ventana determinada, NO de un formulario...
Espero que se halla entendido la pregunta...
Título: Re: Posicion Del Mouse
Publicado por: RadicalEd en Jueves 4 de Noviembre de 2004, 16:36
UTILIZA ESTA API EN UN MODULO
Código: Text
Option Explicit
Type POINTAPI ' Declare types
x As Long
y As Long
End Type
Declare Function GetCursorPos Lib "user32" _
(lpPoint As POINTAPI) As Long ' Declare API
EN UN FORM, 2 LABEL Y 1 TIMER CON INTERVAL DE 1
Código: Text
Option Explicit
Dim z As POINTAPI ' Declare variable
Private Sub Timer1_Timer()
GetCursorPos z ' Get Co-ordinets
Label1 = "x: " & z.x ' Get x co-ordinets
Label2 = "y: " & z.y ' Get y co-ordinets
End Sub
OJALA TE SIRVA CHAO
Título: Re: Posicion Del Mouse
Publicado por: SpeedCAD en Jueves 4 de Noviembre de 2004, 17:38
Hola...
Bueno, efectivamente tengo que ocupar esa API, pero el codigo que haz puesto muestra las coordenadas del cursor pero en relacion a la pantalla. Lo que yo necesito es que muestre las coordenadas en relacion a una ventana de otra aplicacion.
Me imagino que habra que hacer alguna tabla de comparacion, regla de tres simple. No se... :(
Hasta el momento puedo obtener el rectangulo de una ventana de una aplicacion mediante la API GetWindowRect, y puedo calcular su punto central. Tambien tengo el punto central de la pantalla. Pero ¿Como puedo obtener las coordenas de la aplicacion???
Título: Re: Posicion Del Mouse
Publicado por: RadicalEd en Jueves 4 de Noviembre de 2004, 17:45