Ver Mensaje Individual
  #674  
Antiguo 18-04-2017
Avatar de keys
keys keys is offline
Miembro
 
Registrado: sep 2003
Ubicación: Bilbao
Posts: 1.027
Reputación: 22
keys Va por buen camino
Cita:
Empezado por newtron Ver Mensaje



Yo lo haría pero todavía no sé cómo generar el XML que se envía a partir de los objetos del webservice, ¿tú sabes cómo?
En el evento afterExecute del objeto HttpTrio pones lo siguiente:

Código Delphi [-]
var
  ss:TFileStream;
begin

    if FileExists('c:\tmp\salida.xml') then
     begin
       DeleteFile('c:\tmp\salida.xml');
     end;

    ss:=TFileStream.Create('c:\tmp\salida.xml', fmCreate);
    SOAPResponse.Position := 0;
    ss.CopyFrom(SOAPResponse, SOAPResponse.size);
    ss.Free;
    SOAPResponse.Position := 0;
Responder Con Cita