* Fix bug ID #24109

git-svn-id: trunk@26724 -

packages/fcl-db/src/base/bufdataset.pas

@@ -1581,9 +1581,8 @@ begin
   if (AValue<>IsUniDirectional) then
     begin
     SetUniDirectional(AValue);
-    SetLength(FIndexes,0);
+    ClearIndexes;
     FPacketRecords := 1; // temporary
-    FIndexesCount:=0;
     end;
 end;