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