1.直接idhttp:Tidhttp声明一个var变量是不能使用的。必须有控件
2.使用IdHTTP调post接口,xml格式
IdHTTP1.HandleRedirects := True;//允许头转向
IdHTTP1.ReadTimeout := 30000;//请求超时设置
IdHTTP1.HTTPOptions:=IdHTTP1.HTTPOptions+[hoKeepOrigProtocol];
IdHTTP1.ProtocolVersion:=pv1_1;
IdHTTP1.Request.Connection := ‘keep-alive’;
IdHTTP1.Request.CacheControl := ‘no-cache’;
IdHTTP1.Request.AcceptLanguage:=’zh-cn’;
IdHTTP1.Request.AcceptEncoding:=’gzip, deflate’;
IdHTTP1.Request.ContentType := ‘text/xml;application/x-www-form-urlencoded; Charset=UTF-8’;
postStream:=TStringStream.Create(ansitoUTF8(gv_mz_cf_xml));
responseStr:=IdHTTP1.Post(gv_hlyy_post_url,postStream);
可以post成功
注意点:a. var postStream:TStringStream
postStream:=TStringStream.Create(ansitoUTF8(gv_mz_cf_xml));
如果用Tstringlist,接受不到参数,改成TStringStream时,可以接受到数据,但是编码后的
b.解决编码后的参数
IdHTTP1.Request.ContentType := ‘text/xml;application/x-www-form-urlencoded; Charset=UTF-8’;
必须用text/xml
如果是json,使用text/json
版权声明:本文内容由互联网用户自发贡献,该文观点仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 举报,一经查实,本站将立刻删除。
如需转载请保留出处:https://bianchenghao.cn/hz/127130.html