노트북에서 주로 유선USB 마우스를 사용하는데, 간혹 자리 이동하는 경우 (데브피아 경품으로 받은)무선 마우스를 사용합니다.
 
그런데 2개 마우스 속도가 달라서 바꿀 때마다 제어판-마우스에서 속도를 변경해줘야하더군요.
 
    유선 마우스 : 12
    무선 마우스 : 6

사용자 삽입 이미지

마우스 속도를 쉽게 바꾸기 위해 날림으로 프로그램 만들었습니다.


아래는 마우스 속도 변경 관련 자료입니다.

Control the mouse speed under Windows 98 / 2000
Under Windows 98 and 2000 you can control the speed of the mouse. The mouse speed determines how far the pointer will move based on the distance the mouse moves. The pvParam parameter must point to an integer that receives a value which ranges between 1 (slowest) and 20 (fastest). A value of 10 is the default. The value can be set by an end user using the mouse control panel application or by an application using the SystemParameterInfo API function:

Private Declare Function SystemParametersInfo Lib "user32" Alias _
    "SystemParametersInfoA" (ByVal uAction As Long, ByVal uParam As Long, _
    ByRef lpvParam As Any, ByVal fuWinIni As Long) As Long
Const SPI_SETMOUSESPEED = 113
Const SPI_GETMOUSESPEED = 112

' modify the mouse speed to make it as fast as possible
Dim Speed As Long
Speed = 20
SystemParametersInfo SPI_SETMOUSESPEED, 0, ByVal Speed, 0
You can retrieve the current mouse speed (so that you can later restore it) using the SPI_GETMOUSESPEED value for the first argument to SystemParameterInfo:

Dim Speed As Long
' note that Speed is passed ByRef
SystemParametersInfo SPI_SETMOUSESPEED, 0, Speed, 0
Print "Mouse speed = " & Speed

참고자료 : http://www.devx.com/vb2themax/Tip/18576(새 창으로 열기)


☞ 본문 출처 : http://www.enjoydev.com/blog/99(새 창으로 열기)

2007/03/03 23:31 2007/03/03 23:31

트랙백 주소 :: http://www.enjoydev.com/blog/trackback/99

댓글을 달아 주세요