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 excel操作，写了个adodataset转excel的函数

Delphi打开外部程序或文件

Delphi 各种tstream(流)介绍

Delphi 在单独线程中运行窗体

Delphi 时间年月日，星期

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

Delphi 如何在在windows平台下实现进程隐藏

Delphi fdmemtable1建立缓存表

Delphi中使用 twebbrowser 编辑网页

Delphi 判断进程名是否存在，如果存在则结束进程

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

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