浏览代码

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