Преглед на файлове

+ avoided mem-leak

git-svn-id: trunk@1777 -
joost преди 20 години
родител
ревизия
dcbf526530
променени са 1 файла, в които са добавени 2 реда и са изтрити 1 реда
  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;