mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-12-05 08:09:52 +01:00
* Did not reset FCurrentItem in GetRecord when called with gmPrior. Fixes calling Resync with rmExact
git-svn-id: trunk@30771 -
This commit is contained in:
parent
bbcc66ad15
commit
9e0b281bf1
@ -757,10 +757,7 @@ begin
|
||||
case GetMode of
|
||||
gmPrior:
|
||||
if (FCurrentItem^.Previous = FBeginItem) or (FCurrentItem = FBeginItem) then
|
||||
begin
|
||||
Result := grBOF;
|
||||
FCurrentItem := FBeginItem;
|
||||
end
|
||||
Result := grBOF
|
||||
else
|
||||
FCurrentItem:=FCurrentItem^.Previous;
|
||||
gmCurrent:
|
||||
|
||||
Loading…
Reference in New Issue
Block a user