Delphi 10.3 : SOAP / Problème d'exception

Bonjour,

depuis le passage vers 10.3, j'ai un problème pour récupérer l'exception.

Quelque soit l'exception retournée, j'ai systématiquement :
Exception class ENetException with message 'Internal Server Error (500).

Alors que dans 10.2, le message de mon exception était suivant l'exemple ci-dessous : "Invalid Password"

Je constate que dans 10.2, ESOAPHTTPException descendait de Exception. En 10.3 ESOAPHTTPException = ENetException.

Quand je regarde avec Fiddler, je récupère bien :

Code:

---

1 2 3 4 5 6 7 8 9 10

<?xml version="1.0" encoding="UTF-8"?> -<soap:Envelope xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/"> -<soap:Body> -<soap:Fault> <faultcode>soap:Server</faultcode> <faultstring>Invalid Password</faultstring> <detail/> </soap:Fault> </soap:Body> </soap:Envelope>

---

Est-il possible de récupérer ce message ?

J'utilise un composant THTTPRIO

Merci

si tu as 'Internal Server Error (500)' c'est que le serveur n'a pas répondu "Invalid Password" mais qu'il n'a pas apprécié ta requête...reste à savoir en quoi elle est différente de celle de 10.2

Bonjour,

C'est bien la même requête (c'est juste le programme qui est compilé avec Delphi 10.2 ou 10.3).
Mais l'exception ENetException (propre à 10.3) ne me donne pas le même détail que l'exception en 10.2.

J'ai trouvé une ficelle (pas très propre d'ailleurs) en modifiant (en 10.3) la fonction CheckResponseError du Soap.SOAPHTTPTrans.pas.
Pour le moment ça marche :)