Delphi编码与Web服务响应

时间:2017-06-08 05:01:22

标签: web-services delphi utf-8

我正在使用Delphi 10 Seattle,我遇到了Web服务的xml响应问题,当预期值为úú >或á,é,í,ó

我正在使用HTTPRIO组件来调用webservice:

    vRequest_test:=uGetServiceSoap_test.GetServiceSoap(False,'',HR);
    vResponse:=vRequest_test.FECAESolr(vAuth,vSeg); 

其中HR是HTTPRIO组件。我使用AfterExecute事件获得响应XML:

procedure TSegElec.RIOAfterExecute(const MethodName: string;
  SOAPResponse: TStream);

begin
   SoapResponse.Position := 0;
   fXMLFResponse.LoadFromStream(SOAPResponse);

end;

其中FXMLFresponse是一个TString变量。

我已尝试将编码设置为utf-8,并将选项变量设置为:

[soSendMultiRefObj,soTryAllSchema,**soUTF8InHeader**,soCacheMimeResponse,**soUTF8EncodeXML**]

但不是结果:(当我用SoapUI工具调用WS时,它会返回正确的字符值。

我有什么想法可以试试吗?

此致

0 个答案:

没有答案