Форум: "Основная";
Текущий архив: 2006.10.15;
Скачать: [xml.tar.bz2];

Вниз

Значаение строк MouseWheel   Найти похожие ветки 

← →
markers ©   (2006-09-09 00:25) [0]

Как получить системное значение количества прокручивания строк Mouse Wheel?

---

← →
Zeqfreed ©   (2006-09-09 00:38) [1]

http://msdn.microsoft.com/library/default.asp?url=/library/en-us/sysinfo/base/systemparametersinfo.asp

---

← →
markers ©   (2006-09-09 01:05) [2]

Zeqfreed ©   (09.09.06 0:38) [1]
Спасибо :) Всё сделал. Воть код (Кому интересно)
procedure TMainForm.ProductListMouseWheelUp(Sender: TObject;
 Shift: TShiftState; MousePos: TPoint; var Handled: Boolean);
var ScrollLines:Integer;
begin
SystemParametersInfo(SPI_GETWHEELSCROLLLINES,0,@ScrollLines,0);
TScrollBox(Sender).VertScrollBar.Position:=TScrollBox(Sender).VertScrollBar.Posi tion-ScrollLines;
end;

---

Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2006.10.15;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.039 c