Muchas gracias por los comentarios y sugerencias, efectivamente lo resolví así dejando el alias como lo comentó eficsa y dejando esa parte del servidor como un parámetro ya que esta conexión puede variar. La idea es que se pueda instalar en cualquier cliente y si por alguna razón cambian de servidor o se instala en otra parte la base se pueda configurar desde archivos .ini y/o .conf los accesos a la base sin tocar el código.
Código Delphi
[-]Function TDMPrincipal.ConectaBD(BD: TSQLConnection; CnxBD: String; PwdBD: String): boolean;
Var
aliasbd : String;
begin
aliasbd := '';
with BD do
begin
Connected:= False;
ConnectionName := CnxBD;
LoadParamsOnConnect:= True;
aliasbd := gSERVIDOR+'/'+gPUERTOSERVER+':'+BD.Params.Values['DataBase'];
try
Connected := True;
except on E:Exception do begin
Connected := False;
end;
end;
LoadParamsOnConnect := False;
Params.Values['Database']:= aliasbd;
Params.Values['Password']:= PwdBD;
try
Connected := True;
Result:= True;
except on E:Exception do begin
Connected := False;
Result:= False;
end;
end;
end;
end;