Delphi 使用Indy的idHttpServer接收图片文件源代码

作品简介

完整实现的单元文件 HttpFileUploadUtils.pas

如何使用(步骤说明):

  • 在你的服务器单元 uses 加入 HttpFileUploadUtils
  • 要接收单个文件:调用 ExtractFileFromRequest(ARequestInfo, FileName),如果返回 TMemoryStreamnilSaveToFileFree
  • 要接收多个文件:调用 ExtractAllFilesFromRequest(ARequestInfo, Files),遍历 Files 列表,保存每个 Files[i].Stream 到磁盘(或直接处理),最后 Files.Free


创作时间: