完整实现的单元文件 HttpFileUploadUtils.pas
如何使用(步骤说明):
- 在你的服务器单元
uses加入HttpFileUploadUtils。 - 要接收单个文件:调用
ExtractFileFromRequest(ARequestInfo, FileName),如果返回TMemoryStream非nil就SaveToFile并Free。 - 要接收多个文件:调用
ExtractAllFilesFromRequest(ARequestInfo, Files),遍历Files列表,保存每个Files[i].Stream到磁盘(或直接处理),最后Files.Free。