Browse Source

* Fetch prior records if buffer is expanded at EOF (mantis 7934)

git-svn-id: trunk@6133 -
joost 18 years ago
parent
commit
216150e2e1
1 changed files with 2 additions and 0 deletions
  1. 2 0
      fcl/db/dataset.inc

+ 2 - 0
fcl/db/dataset.inc

@@ -877,6 +877,8 @@ begin
   Writeln('Getting next buffers');
   Writeln('Getting next buffers');
 {$endif}
 {$endif}
   GetNextRecords;
   GetNextRecords;
+  if FRecordCount < FBufferCount then
+    GetPriorRecords;
 {$Ifdef dsDebug}
 {$Ifdef dsDebug}
   WriteLn(
   WriteLn(
     'SetBufferCount: FActiveRecord=',FActiveRecord,
     'SetBufferCount: FActiveRecord=',FActiveRecord,