Explorar o código

+ avoided mem-leak

git-svn-id: trunk@1777 -
joost %!s(int64=20) %!d(string=hai) anos
pai
achega
dcbf526530
Modificáronse 1 ficheiros con 2 adicións e 1 borrados
  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;