Make your own free website on Tripod.com

SwapMouseButton

Declaración:
Declare Function SwapMouseButton Lib "user32" Alias "SwapMouseButton" (ByVal bSwap As Long) As Long
Descripción:
La función SwapMouseButton se usa para cambiar la configuración de los botones del mouse, diestro o zurdo.
Parámetros:
ByVal bSwap As Long
Si se coloca 1 los botones del mouse quedan configurados como para usar un zurdo, si coloca 0 para un diestro.
Valor de retorno:
La función retorna un valor que es el estado anterior del mouse, 0 = Diestro y 1 = Zurdo.
Uso:
Dim ValorRetorno As Long 'Variable para el valor de retorno
'Ejemplo 1 (Diestro):

ValorRetorno = SwapMouseButton(0)
'En este caso queda config. para diestros.
'Ejemplo 1 (Zurdo):
ValorRetorno = SwapMouseButton(1) 'En este caso queda config. para zurdos.