mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-09-02 23:00:35 +02:00
LCL: Try to show scrollbars when Row/Col is changed by code. Improves issue #19257 but doesn't solve it.
git-svn-id: trunk@30537 -
This commit is contained in:
parent
112fd87d96
commit
82e477a0ca
@ -3185,11 +3185,10 @@ begin
|
||||
FGCache.TLColOff:=0;
|
||||
if OldTopLeft.y<>FTopLeft.y then
|
||||
FGCache.TLRowOff:=0;
|
||||
|
||||
doTopleftChange(False)
|
||||
end else
|
||||
if not (goSmoothScroll in Options) or wResetOffs then
|
||||
ResetOffset(True, True);
|
||||
doTopleftChange(False);
|
||||
end;
|
||||
|
||||
{Returns a valid TopLeft from a proposed TopLeft[DCol,DRow] which are
|
||||
|
Loading…
Reference in New Issue
Block a user