Llamada HTTP a una URL

[URBANO]

Gracias dec, por tu comentario. Lo he seguido y he realizado el siguiente codigo para hacer la llamada a la URL.

Código Delphi [-]
procedure TForm1.Button2Click(Sender: TObject);
var
  http: TIdHttp;
  xml: TStrings;
  respuesta: string;
begin
  http := TIdHTTP.Create(Self);
  xml := TStringList.Create;
  try
    xml.text:='codigo xml';
    XML.text:=xml.text + 'mas codigo xml';
   respuesta := http.Post('www.mipagina.com', xml);
   ShowMessage('Respuesta: ' + respuesta);
  finally
    http.Free;
    XML.Free;
  end;

end;

Este codigo me funciona y hace el post a la URL, pero la URL me da un error indicando que las sintaxis del codigo xml que yo le envio no es la correcta.
Creo que el problema viene de que el parametro "xml" que yo envio es del tipo TStrings y la URL solo esta leyendo la primera linea, ya que espera un parametro de tipo string.
No puedo poner todo el codigo xml en la primera linea del Tstrings ya que tiene mas de 255 caracteres y a la hora de compilar delphi me da un error, indicando que el literal del Strings no puede superar 255 caracteres.



Sabría alguien de que manera puedo enviar dicho codigo xml, por medio del post, en un solo string.

Gracias y saludos.

[chalao]

Yo tenía un problema parecido para mandar Html como un ansistring.

Échale un vistazo a este post donde lo preguntaba, a ver si te sirve:
http://www.clubdelphi.com/foros/showthread.php?t=60858

Un saludo.

[URBANO]

Gracias, con tu comentario ya lo he solucionado.

Código Delphi [-]
procedure TForm1.Button2Click(Sender: TObject);
var
  http: TIdHttp;
  xml: TStrings;
  respuesta: string;
  datosPost: TIdMultiPartFormDataStream;
begin
  http := TIdHTTP.Create(Self);
  xml := TStringList.Create;
  datosPost := TIdMultiPartFormDataStream.Create;
  try
    xml.text:='codigo xml menos de 255 caracteres';
    XML.text:=xml.text + 'codigo xml menos de 255 caracteres';
    datosPost.AddFormField('xml', xml.text );
   respuesta := http.Post('http://www.miweb.es', datospost);
   ShowMessage('Respuesta: ' + respuesta);
  finally
    http.Free;
    XML.Free;
    datospost.free;
  end;

end;

Con este codigo me ha funcionado a la perfeccion. Pero ahora se plantea otro problema. En la variable "respuesta" el post almacena la respuesta de la URL. El contenido de respuesta es codigo xml y necesito poder moverme por sus etiquetas para capturar la información que me devuelve la URL y almacenarla en una tabla. Como puedo conseguir esto?

Os comento que estoy trabajando con Delphi 5.

Saludos y gracias.