TIdHTTP - Como me autentifico

[URBANO]

He seguido revisando el componente indy y he visto la opción "BasicAuthentication". Dicha opción en el ejemplo anterior, por defecto es False y por lo que la he cambiado, quedando el codigo ahora:

procedure TForm1.Button1Click(Sender: TObject);
var
  http: TIdHttp;
  respuesta: string;
  datosPost: TIdMultiPartFormDataStream;
begin
  http:= TIdHTTP.Create(Self);
  http.Request.BasicAuthentication:=True;
  http.Request.Username:= 'urbano';
  http.Request.Password:= 'atm';
  datosPost := TIdMultiPartFormDataStream.Create;
  try
   datosPost.AddFormField('description', 'Atm1');
   datosPost.AddFormField('comments', 'firmar documento de prueba');
   datosPost.AddFormField('reference', '1');
   datosPost.AddFormField('file', 'C:\firmar1.pdf');

   respuesta := http.Post('http://api.portasigma.com/v1/docs/', datospost);
  finally
    http.Free;
    datospost.free;
  end;

  showmessage(respuesta);

end;

Ahora ya no me da el error de antes, tras ejecutar el codigo, ahora obtengo el error: "HTTP/1.1 401 Bad Request".
Alguna idea de este error?

Saludos.

[URBANO]

Viendo que en seccion del foro no tengo muchos comentarios y según observo la mayoría de las consultas sobre Indy se han realizado en la sección de varios he trasladado este hilo a esa seccion.

Gracias a todos y si alguien quiere seguir el hilo, este se encuentra en la seccion de varios.

Saludos.

[roman]

Si esto es así es precisamente porque la gente no ubica bien los temas. Este foro es más adecuado que Varios por lo que cierro el otro hilo.

// Saludos

[Casimiro Notevi]

Amigo, URBANO, ¡¡¡tienes más de 120 mensajes y haces estas cosas!!!, por favor, recuerda nuestra guía de estilo, gracias.

Edito: Román, he acabado de unir ambos y me he encontrado con tu mensaje, voy a abrirlo de nuevo y a borrar los mensajes repetidos.

[URBANO]

siente el lio. Ya lo habeis arreglado. Gracias.

Ya puesto, alguno de ustedes podría ayudarme. Conoceis algo de Indy.

Saludos.

[roman]

Como un web service utiliza el protocolo HTTP, ciertamente puedes usar Indy para acceder al servico y mandar y recibir datos, pero es algo rudimentario. Delphi cuenta con herramientas especializadas para el manejo de los servicios web.

// Saludos

[URBANO]

La verdad, nunca habia utilizado servicios web desde delphi. Como lo que tenia que hacer son post y get, leyendo por los foros, vi que muchos utilizaban TidHTTP de indy para ello, pero estoy abierto a cualquier sugerencia.
Podrías indicarme roman, que herramientas son esas que me comentas.

Saludos.

[URBANO]

Nadie puede ayudarme?
Me urge, poder realizar este tipo de peticiones a una web desde delphi.

A nadie se le ha planteado el problema que comento?

[roman]

Primero asegúrate de tener instalado el paquete "Borland SOAP Components". Después, en File|New|Others te vas a la pestaña "Web Services" y das doble clic sobre WSDL Importer. Te va a pedir la URL del servicio Web y sigues los pasos del asistente.

Esto te crea una unidad que declara las clases definidas en el web service y te da funciones para obtener instancias de estas clases.

En principio con esto debes poder acceder al servicio WEB.

De todas formas, el tema ha sido tratado anteriormente en los fros, así que haciendo una búsqueda puedes encontrar temas al respecto.

// Saludos