Delphi调用Http接口方法

本文整理自网络，侵删。

 
uses  IdHTTP;   
  
SS := TStringStream.Create('', TEncoding.UTF8);  
HttpClient := TIdHttp.Create();  
ParamList := TStringList.Create;  
try  
  ParamList.Add('LoginName=xx');  
  ParamList.Add('Password=xx');  
  ParamList.Add('SmsKind=808');  
  ParamList.Add('SendSim=' + edtSendSim.Text);  
  ParamList.Add('ExpSmsId=888');  
  ParamList.Add('MsgContext=' + memoMsgContext.Text);  
  HttpClient.Post('http://xxxxxxxxxx/SmsService.asmx/SendEx', ParamList, SS);  
  MemoResult.Text := SS.DataString;  
finally  
  SS.Free;  
  HttpClient.Free;  
  ParamList.Free;  
end;  
 

相关阅读 >>

Delphi dbgrid去除滚动条

Delphi unigrid记录check遍历

Delphi winapi: settimer、killtimer - 创建与移除高性能定时器

indy tidtcpclient 在网络掉线时的处理方法

Delphi xe 跨平台（windows、android安卓、苹果macos、苹果ios）写法

Delphi 设置richedit的行间距

python4Delphi 示例应用程序在 Delphi 应用程序中运行简单的 python 脚本

Delphi sender 的用法举例

Delphi 截取被遮挡的window画面

Delphi之数组

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » Delphi调用Http接口方法