::KANSoftWare :: ОС и Железо :: Мышка и Курсор :: Функции для изменения и получения чуствительности мышки

Функции для изменения и получения чуствительности мышки

Code:

Function SetMouseSpeed ( NewSpeed : Integer )  : Boolean;

        begin

        Result  := SystemParametersInfo(SPI_SETMOUSESPEED, 1, Pointer(NewSpeed), SPIF_SENDCHANGE );

        End;

         

        Function GetMouseSpeed : Integer;

        Var

        Int :  Integer;

        begin

        SystemParametersInfo(SPI_GETMOUSESPEED, 0, @Int, SPIF_SENDCHANGE );

        Result  := Int;

        End;

Автор: Radmin

Комментарии и вопросы

Добавить сайт в закладки

Материалы статей взяты из открытых источников, владелец сайта не претендует на авторство. Там где авторство установить не удалось, материал подаётся без имени автора. В случае если Вы считаете, что Ваши права нарушены, пожалуйста, свяжитесь с владельцем сайта.

:: Главная :: Мышка и Курсор ::

::ОС и Железо ::Мышка и Курсор

Функции для изменения и получения чуствительности мышки

Комментарии и вопросы