瀏覽代碼

* 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