Получить диапазон, прокручиваемый колесиком мышки

Советы » Мышка и Курсор » Получить диапазон, прокручиваемый колесиком мышки

//Not supported on Windows 95 //result = -1: scroll whole page function GetNumScrollLines: Integer; begin SystemParametersInfo(SPI_GETWHEELSCROLLLINES, 0, @Result, 0); end; procedure TForm1.Button1Click(Sender: TObject); begin ShowMessage(IntToStr(GetNumScrollLines)); end;

Другое по теме:

Категории

Статьи

Советы

Copyright © 2023 - All Rights Reserved - www.delphirus.com