paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-18 02:19:32 +02:00
Code Issues Packages Projects Releases Wiki Activity

Qt: unify TScrollBar Max value and position with winapi. issue #20127

Browse Source 
git-svn-id: trunk@52150 -
This commit is contained in:
zeljko 2016-04-09 08:02:04 +00:00
parent 34f3fbbdfc
commit 7ffbcd7764
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lcl/interfaces/qt/qtwsstdctrls.pp
View File

@ -366,8 +366,8 @@ begin
QtScrollBar.BeginUpdate;
try
if (QtScrollBar.getMin <> AScrollBar.Min) or
(QtScrollBar.getMax <> AScrollbar.Max) then
QtScrollBar.setRange(AScrollBar.Min, AScrollBar.Max);
(QtScrollBar.getMax <> (AScrollbar.Max - AScrollBar.PageSize)) then
QtScrollBar.setRange(AScrollBar.Min, AScrollBar.Max - AScrollBar.PageSize);
if QtScrollBar.getPageStep <> AScrollBar.PageSize then
begin
QtScrollBar.setPageStep(AScrollBar.PageSize);