瀏覽代碼

* Applied patch by Michael Van Ham (bug ID 27220)

git-svn-id: trunk@29361 -
michael 10 年之前
父節點
當前提交
868ba1560f
共有 1 個文件被更改,包括 1 次插入0 次删除
  1. 1 0
      packages/fcl-db/src/sqldb/sqldb.pp

+ 1 - 0
packages/fcl-db/src/sqldb/sqldb.pp

@@ -2118,6 +2118,7 @@ begin
   FreeAndNil(FInsertSQL);
   FreeAndNil(FInsertSQL);
   FreeAndNil(FDeleteSQL);
   FreeAndNil(FDeleteSQL);
   FreeAndNil(FUpdateSQL);
   FreeAndNil(FUpdateSQL);
+  FreeAndNil(FRefreshSQL);
   FServerIndexDefs.Free;
   FServerIndexDefs.Free;
   inherited Destroy;
   inherited Destroy;
 end;
 end;