Преглед изворни кода

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