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

* Create transaction

git-svn-id: trunk@28405 -
michael преди 11 години
родител
ревизия
1d3aa63620
променени са 1 файла, в които са добавени 1 реда и са изтрити 0 реда
  1. 1 0
      tests/utils/dbtests.pp

+ 1 - 0
tests/utils/dbtests.pp

@@ -75,6 +75,7 @@ begin
     Connection.Username:=User;
     Connection.Password:=Password;
     Connection.Connected:=true;
+    Connection.Transaction:=TSQLTransaction.Create(Connection);
     if (Port<>'') then
       Connection.Params.Values['Port']:=Port;
   except