Ejemplo conexión .Net y C#
Y en el cliente .net será necesario establecer la siguiente configuración:
Código:
<system.serviceModel>
<bindings>
<wsHttpBinding>
<binding name="BasicEndpoint">
<security mode="TransportWithMessageCredential">
<transport clientCredentialType="None" />
<message clientCredentialType="UserName" establishSecurityContext="false" />
</security>
</binding>
</wsHttpBinding>
</bindings>
<client>
<endpoint address="https://servicio.mapa.gob.es/wspresvetcomunicacion/wspresvetcomunicacion.svc"
binding="wsHttpBinding" bindingConfiguration="BasicEndpoint"
contract="PresVetComunicacionPrescripcion.IPresVetComunicacionPrescripcion"
name="BasicEndpoint" />
</client>
</system.serviceModel>
static void Main(string[] args)
{
using (PresVetComunicacionPrescripcionClient comunicacionPrescripcion = new PresVetComunicacionPrescripcionClient())
{
comunicacionPrescripcion.ClientCredentials.UserName.UserName = "usuario";
comunicacionPrescripcion.ClientCredentials.UserName.Password = "clave";
System.Net.ServicePointManager.Expect100Continue = false;
string resultado = comunicacionPrescripcion.EstaActivo();
Console.Write(resultado);
Console.ReadLine();
}
}
¿Alquien podría "traducirlo" a Delphi?. Gracias.