LCL, dbgrid, workaround for datasets(?).filtered wrong behaviour, from Luiz Americo, issue #22304

git-svn-id: trunk@39124 -
This commit is contained in:
jesus 2012-10-18 03:07:05 +00:00
parent 83859e5919
commit 5df13d5cab

View File

@ -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);