mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-27 07:53:50 +02:00
parent
f93744efd7
commit
0152132972
@ -4300,7 +4300,8 @@ var
|
||||
if (ScrollInfo.nPos > ScrollBar.getMax) then
|
||||
ScrollInfo.nPos := ScrollBar.getMax;
|
||||
|
||||
ScrollBar.setValue(ScrollInfo.nPos);
|
||||
if (ScrollInfo.FMask and SIF_UPDATEPOLICY) = 0 then
|
||||
ScrollBar.setValue(ScrollInfo.nPos);
|
||||
end;
|
||||
|
||||
if (ScrollInfo.FMask and SIF_TRACKPOS) <> 0 then
|
||||
|
Loading…
Reference in New Issue
Block a user