mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-22 15:19:35 +02:00
LCL, dbgrid, workaround for datasets(?).filtered wrong behaviour, from Luiz Americo, issue #22304
git-svn-id: trunk@39124 -
This commit is contained in:
parent
83859e5919
commit
5df13d5cab
@ -1208,7 +1208,7 @@ begin
|
||||
' Position=', dbgs(Message.Pos),' OldPos=',Dbgs(FOldPosition));
|
||||
{$endif}
|
||||
|
||||
IsSeq := FDatalink.DataSet.IsSequenced;
|
||||
IsSeq := FDatalink.DataSet.IsSequenced and not FDataLink.DataSet.Filtered;
|
||||
case Message.ScrollCode of
|
||||
SB_TOP:
|
||||
DsGoto(True);
|
||||
|
Loading…
Reference in New Issue
Block a user