¿Cómo obtener la posición de los clics izquierdo y derecho del mouse y el intervalo de tiempo entre clics?

'¡Vaya, es difícil! ! ? ¿Nadie sabe cómo hacer esto? ¿Quién puede hacerlo?

'¿Quiénes son esos extraterrestres que usan "ganchos de ratón globales"? ¡Monstruos!

'Quien escriba el siguiente código (usando la API) es un dios:

'¿Usaste el siguiente código? ¿El legendario "control del reloj"? (Alta tecnología, no habitualmente utilizada)? El estado se muestra en el "Título de la ventana" (no se lo diré a nadie)

"Tenga en cuenta que la variable t?Program Set Variable?

.Version? 2

. Ensamblaje de Windows 1

. ¿Variable de ensamblaje? ___Ventana de inicio_Creada

¿Reloj 1. ¿Ciclo de reloj? . ¿Subrutina?_clock1_cycle event

Si (probar clave virtual_? (1)?≠?0)

_¿Título de inicio =?"Botón izquierdo presionado? ? Texto (¿tomar posición horizontal del mouse? ())? ?", "? (¿posición vertical del mouse? ())

. Determine la primera ?(clave virtual de prueba _? (1)?≠?0) del bucle

. ¿Determinar el final del ciclo? ()

_Inicia la ventana. Título = ?"¿Clic izquierdo para que aparezca? ¿Coordenadas?"? (¿Obtener la posición horizontal del mouse?())??","? (¿Tomar la posición vertical del mouse?())? ??espaciado? ?al texto? (¿Basado en la hora de inicio? ()?-t)? "Milisegundos"

t?=?¿Obtener la hora de inicio? ()

En caso contrario

. si es cierto? (Probar claves virtuales_? (2)?≠?0)

_Iniciar ventana. Título = ?"Clic derecho Presione ??Texto? (¿Tomar la posición horizontal del mouse? ())? ?", "? (¿La posición vertical del mouse? ())

. Determine la primera ?(test virtual key_? (2)?≠?0) del bucle

. ¿Determinar el final del ciclo? ()

_Inicia la ventana. Título = "¿Hacer clic derecho para que aparezca? ¿Coordenadas?"? (¿Obtener la posición horizontal del mouse? ())? (¿Tomar la posición vertical del mouse?())? ??espaciado? ?al texto? (¿Basado en la hora de inicio? ()?-t)? "Milisegundos"

t?=?¿Obtener la hora de inicio? ()

.Si es verdadero final

.Si es final

. Versión?2

.Comando DLL test_virtual_key,?Entero,?"usuario32",?"GetAsyncKeyState"

.¿Parámetros? código de clave, ? Entero, ?, ?vKey? Largo, el código de clave de la clave virtual que se va a probar. .