Parcourir la source

+ avoided mem-leak

git-svn-id: trunk@1777 -
joost il y a 20 ans
Parent
commit
dcbf526530
1 fichiers modifiés avec 2 ajouts et 1 suppressions
  1. 2 1
      fcl/db/sqldb/mysql/mysql4conn.pas

+ 2 - 1
fcl/db/sqldb/mysql/mysql4conn.pas

@@ -215,7 +215,8 @@ end;
 
 function TMySQLConnection.AllocateTransactionHandle: TSQLHandle;
 begin
-  Result:=TMySQLTransaction.Create;
+//  Result:=TMySQLTransaction.Create;
+  Result := nil;
 end;
 
 procedure TMySQLConnection.PrepareStatement(cursor: TSQLCursor;