Hallo,
ich versuche gerade
SOAP-Nachricht die per gzip gepackt ist zu entpacken. An vielen Stellen im Netz gibt es da die einfache Möglichkeit per:
Delphi-Quellcode:
procedure TfrmMain.HTTPRIOHTTPWebNode1BeforePost(const HTTPReqResp: THTTPReqResp;
Data: Pointer);
const
contentEncodingHeader : WideString = 'Accept-Encoding: gzip, deflate';
var
Flag: LongBool;
begin
Flag := True;
if not HttpAddRequestHeaders(Data, PWideChar(contentEncodingHeader),
Length(contentEncodingHeader), HTTP_ADDREQ_FLAG_ADD) then
RaiseLastOSError;
if not InternetSetOption(Data, INTERNET_OPTION_HTTP_DECODING,
@Flag, SizeOf(Flag)) then
RaiseLastOSError;
end;
gzip anzufordern und auch durch WinInet wieder entkodieren zu lassen. Problem ist, bei mir gibt es immer die
Exception "Die Inhaltsdecodierung ist fehlgeschlagen."
Ich habe per WireShark nachgeprüft, die Daten kommen gepackt an.
System: Windows 7, IE11, Delphi XE5
Hat jemand eine Idee woran das liegen könnte?