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

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

Browse Source 
git-svn-id: trunk@39124 -
This commit is contained in:
jesus 2012-10-18 03:07:05 +00:00
parent 83859e5919
commit 5df13d5cab
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lcl/dbgrids.pas
View File

@ -1208,7 +1208,7 @@ begin
' Position=', dbgs(Message.Pos),' OldPos=',Dbgs(FOldPosition)); ' Position=', dbgs(Message.Pos),' OldPos=',Dbgs(FOldPosition));
{$endif} {$endif}
IsSeq := FDatalink.DataSet.IsSequenced; IsSeq := FDatalink.DataSet.IsSequenced and not FDataLink.DataSet.Filtered;
case Message.ScrollCode of case Message.ScrollCode of
SB_TOP: SB_TOP:
DsGoto(True); DsGoto(True);