RSS订阅 | 匿名投稿
您的位置:网站首页 > 组件 > 正文

delphi IDHttp Post

作者:admin 来源: 日期:2017/3/28 23:38:29 人气: 标签:

procedure TForm1.Button1Click(Sender: TObject);var  T: TStringStream;  ts: TStringList;  SvrUrl, postUrl: string;begin  SvrUrl := 'http://app.25hours.cc:6077/webservice/25hours.asmx/StruUp';  postUrl := '';  ts := TStringList.Create;  ts.Text := 'data={"ShopID":1,"SyncVer":200}';  T := TStringStream.Create('', tencoding.UTF8);  IdHTTP1.Post(SvrUrl + postUrl, ts, T);  Memo1.Text := T.DataString;end;

读完这篇文章后,您心情如何?
0
0
0
0
0
0
0
0
本文网址:
下一篇:没有资料