hola amigos del foro, estoy aquí o través con la misma cantaleta y es por que todavía no logro entender este teme de encasados http
pero tanto buscar encontré este ejemplo en algún foro pero no se si estoy en lo correcto
Código Delphi
[-]const
IS_TEXT = $0020;
apikey = class(TSOAPHeader)
private
FValue: string;
published
property Value: string Index (IS_TEXT) read FValue write FValue;
end;
esto hice debido a que en SoapUI funciona así como en la imagen que deje adjuntado.
con esto mi código en un botón me que da así
Saludos
Código Delphi
[-]procedure TForm1.Button1Click(Sender: TObject);
var Respuesta: respuestaComunicacion;
Token: apikey;
begin
Token:= apikey.Create;
Token.Value:= 'TokenApi eyJ0eXA.eyJzdWIiOiJDLkkuQy5NLkjoiU0ZFIn0.a7fDfvP2CmB';
HTTPRIO1.SOAPHeaders.SetOwnsSentHeaders(True);
HTTPRIO1.SOAPHeaders.Send(Token);
Try
Respuesta:=GetServicioFacturacionCodigos(false, '', HTTPRIO1).verificarComunicacion;
Edit1.Text:= Respuesta.mensajesList[0].descripcion;
Except
on E : Exception do
ShowMessage('Error generado : '+E.Message);
end;
end;
pero aun así no funciona, o no es así como se hace
por favor quisiera que me ayuden