Ver Mensaje Individual
  #1370  
Antiguo 31-05-2017
Galahad Galahad is offline
Miembro
 
Registrado: abr 2007
Posts: 218
Reputación: 18
Galahad Va por buen camino
Cita:
Empezado por newtron Ver Mensaje
Aunque esto está engordando demasiado y se hace complicado, revisa el hilo (de principio en adelante) y verás que esa pregunta ya está contestada aunque ahora mismo no recuerdo exactamente cómo era.

Saludos
Hola, tienes que utilizar el/los eventos del componente httprio beforeexecute o afterexecute, te mando un ejemplo de código..



Cita:
procedure TFModelo_SII.HTTPRIO1BeforeExecute(const MethodName: string;
SOAPRequest: TStream);
var
ss:TFileStream;
cfichero: string;
begin
cfichero := montar_fichero_sii( date,time,'nombredefichero.xml');
if FileExists( cfichero ) then
DeleteFile( cfichero);

ss:=TFileStream.Create( cfichero, fmCreate);
SOAPRequest.Position := 0;
ss.CopyFrom(SOAPRequest, SOAPRequest.size);
ss.Free;
SOAPRequest.Position := 0;
end;

Responder Con Cita