indy multipart/form-data

indy  multipart/form-data

uses IdMultipartFormData;

?

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15

procedure TForm1.ToolButton1Click(Sender: TObject); //rest上传文件 var   ms: TIdMultiPartFormDataStream; begin   if OpenDialog1.Execute then   begin     ms := TIdMultiPartFormDataStream.Create;     ms.AddFormField('filename', '中国');     ms.AddFile('file', OpenDialog1.FileName, '');     url := url + 'restupload';     IdHTTP1.Post(url, ms);     ms.Free;   end; end;