|
@@ -1987,6 +1987,8 @@ Var
|
|
begin
|
|
begin
|
|
inherited DoInternalConnect;
|
|
inherited DoInternalConnect;
|
|
CreateProxy;
|
|
CreateProxy;
|
|
|
|
+ FProxy.CharSet:=Self.CharSet;
|
|
|
|
+ FProxy.Role:=self.Role;
|
|
FProxy.DatabaseName:=Self.DatabaseName;
|
|
FProxy.DatabaseName:=Self.DatabaseName;
|
|
FProxy.HostName:=Self.HostName;
|
|
FProxy.HostName:=Self.HostName;
|
|
FProxy.UserName:=Self.UserName;
|
|
FProxy.UserName:=Self.UserName;
|