求助!delphi6 调用WEBSERVICE中文产生乱码的问题?
webservice通过wsdl import 导入,该webservice是c#编译的
源码如下
procedure TForm1.Button1Click(Sender: TObject);
begin
//(HTTPRIO1 as ServiceSoap).EastInvoiceInfoStat(edit1.Text);
(HTTPRIO1 as Service1Soap).ConvertDataSet('1');
end;
procedure TForm1.HTTPRIO1AfterExecute(const MethodName: String;
SOAPResponse: TStream);
{begin
SOAPResponse.Position := 0;
Memo1.Lines.LoadFromStream(SOAPResponse);
SOAPResponse.Position := 0; }
var
XMLDoc: IXMLDocument;
begin
SOAPResponse.Position := 0;
Memo1.Lines.LoadFromStream(SOAPResponse);
end;
已经把HTTPRIO1的UseUtf8InHeader的属性值设为true了
Memo1中中文显示成乱码
问题点数:100、回复次数:6Top
1 楼paranoia190(190)回复于 2005-07-28 14:11:26 得分 0
帮顶Top
2 楼yzty(雨中太阳)回复于 2005-07-30 10:51:12 得分 50
你在编写的时候设置HTTPRIO.HTTPWebNode.UserUTF8Header := TrueTop
3 楼Bluce4587(老狼)回复于 2005-07-30 11:43:03 得分 50
修改config.xml文件中的 Language 相关项
或直接指定 contenttype := 'text/html;charset=gb2132';Top
4 楼xujie(gto)回复于 2005-08-01 09:20:58 得分 0
谢谢楼上两位,但结果还是不对。Top
5 楼Bluce4587(老狼)回复于 2005-08-03 18:06:21 得分 0
那就是你的Memo1.Font属性设置的字符集不是中文字符集,可能被设置成其它的字符集了,要修改Memo1的FONT属性
Top
6 楼roczhao(roc)回复于 2006-03-28 00:32:14 得分 0
没有办法了吗?
Top




