Delphi调用Http接口上传文件

本文整理自网络，侵删。

 
SS := TStringStream.Create('', TEncoding.UTF8);  
HttpClient := TIdHttp.Create();  
MutPartForm := TIdMultiPartFormDataStream.Create;  
try  
  MutPartForm.AddFormField('unitCode', UnitCode);  
  MutPartForm.AddFormField('regCode', RegCode);  
  MutPartForm.AddFile('data', 'data.zip', GetMIMETypeFromFile('data.zip'));  
  HttpClient.Post(Url, MutPartForm, SS);  
  response := SS.DataString;  
finally  
  SS.Free;  
  HttpClient.Free;  
  MutPartForm.Free;  
end;  
 

相关阅读 >>

Delphi tmemo控件滚动条scrollbar末尾插入字符串一点都会闪烁的轻松实现

Delphi 2009 之 tstringbuilder 类[4]: insert 与 remove

Delphi 7 简单语法

Delphi webbrowser控件的documentcomplete和downloadcomplete的区别

Delphi 常见的各种形式的组件的安装方法介绍

Delphi webbrowser 加载html 将html代码转换成网页

Delphi 得到文件创建时间，修改时间，访问时间

Delphi 取得和设置当前系统的短日期格式

Delphi 根据进程pid获取程序所在路径的函数

Delphi 递归获取文件夹大小

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

转载请注明出处：木庄网络博客 » Delphi调用Http接口上传文件