Преглед на файлове

Fix sqliteds compilation

git-svn-id: trunk@31840 -
blikblum преди 10 години
родител
ревизия
e4ec432012
променени са 1 файла, в които са добавени 2 реда и са изтрити 2 реда
  1. 2 2
      packages/fcl-db/src/sqlite/sqliteds.pas

+ 2 - 2
packages/fcl-db/src/sqlite/sqliteds.pas

@@ -267,9 +267,9 @@ begin
   FEndItem^.Previous := TempItem;
 
   // Alloc item used in append/insert
-  GetMem(FCacheItem^.Row, FRowBufferSize);
+  GetMem(FSavedEditItem^.Row, FRowBufferSize);
   for Counter := 0 to FRowCount - 1 do
-    FCacheItem^.Row[Counter] := nil;
+    FSavedEditItem^.Row[Counter] := nil;
   // Fill FBeginItem.Row with nil -> necessary for avoid exceptions in empty datasets
   GetMem(FBeginItem^.Row, FRowBufferSize);
   for Counter := 0 to FRowCount - 1 do