Pārlūkot izejas kodu

* Do not change the active record when updating the buffersize

git-svn-id: trunk@6135 -
joost 18 gadi atpakaļ
vecāks
revīzija
13b6444b07
1 mainītis faili ar 4 papildinājumiem un 1 dzēšanām
  1. 4 1
      fcl/db/dataset.inc

+ 4 - 1
fcl/db/dataset.inc

@@ -878,7 +878,10 @@ begin
 {$endif}
   GetNextRecords;
   if FRecordCount < FBufferCount then
-    GetPriorRecords;
+    begin
+    FActiveRecord := FActiveRecord + GetPriorRecords;
+    CursorPosChanged;
+    end;
 {$Ifdef dsDebug}
   WriteLn(
     'SetBufferCount: FActiveRecord=',FActiveRecord,