Ver código fonte

* Free Parameters

Michaël Van Canneyt 2 meses atrás
pai
commit
ec8887baf2
1 arquivos alterados com 1 adições e 0 exclusões
  1. 1 0
      packages/fcl-web/src/restbridge/sqldbrestschema.pp

+ 1 - 0
packages/fcl-web/src/restbridge/sqldbrestschema.pp

@@ -1258,6 +1258,7 @@ begin
   FreeAndNil(FFields);
   for K in TSQLKind do
     FreeAndNil(FSQL[K]);
+  FreeAndNil(FParameters);
   inherited Destroy;
 end;