L
liuminghao
Unregistered / Unconfirmed
GUEST, unregistred user!
看了你如下解答，很有些启发，所以..。当然，人人有分。[
] 骗分。-------- Delphi7编写的客户端调用C#编写的WebService服务时，如果函数中传递的参数为汉字时，可能出现乱码现象。 在网上搜索了一些资料，找到解决办法：将HTTPRIO的UseUTF8InHeader属性改为true即可。 即编辑由Import WSDL文件生成的 *.pas 单元文件，在Get函数中增加一句：RIO.HTTPWebNode.UseUTF8InHeader:=True。 代码片断大致如下： ------------------ ....... try RIO.HTTPWebNode.UseUTF8InHeader:=True;
//在此添加一句，修改编码方案。 Result := (RIO as test);
if UseWSDL then
begin
RIO.WSDLLocation := Addr;
RIO.Service := defSvc;
RIO.Port := defPrt;
end else
RIO.URL := Addr;
finally if (Result = nil) and (HTTPRIO = nil) then
RIO.Free;
end;
....... ----------------
] 骗分。-------- Delphi7编写的客户端调用C#编写的WebService服务时，如果函数中传递的参数为汉字时，可能出现乱码现象。 在网上搜索了一些资料，找到解决办法：将HTTPRIO的UseUTF8InHeader属性改为true即可。 即编辑由Import WSDL文件生成的 *.pas 单元文件，在Get函数中增加一句：RIO.HTTPWebNode.UseUTF8InHeader:=True。 代码片断大致如下： ------------------ ....... try RIO.HTTPWebNode.UseUTF8InHeader:=True;//在此添加一句，修改编码方案。 Result := (RIO as test);
if UseWSDL then
begin
RIO.WSDLLocation := Addr;
RIO.Service := defSvc;
RIO.Port := defPrt;
end else
RIO.URL := Addr;
finally if (Result = nil) and (HTTPRIO = nil) then
RIO.Free;
end;
....... ----------------