Explorar el Código

* Free Parameters

Michaël Van Canneyt hace 2 meses
padre
commit
ec8887baf2
Se han modificado 1 ficheros con 1 adiciones y 0 borrados
  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;