From 7e8f099bdaf167803a36964016280664debb6050 Mon Sep 17 00:00:00 2001 From: waso <99448773+wesov@users.noreply.github.com> Date: Sat, 2 Apr 2022 14:54:16 +0800 Subject: [PATCH] =?UTF-8?q?=E4=BF=AE=E6=AD=A3=E6=94=AF=E6=8C=81=E5=A4=9A?= =?UTF-8?q?=E4=B8=AA=E6=96=87=E4=BB=B6=E4=B8=8A=E4=BC=A0?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- MVC5.0/SDK/MVC.Controller.pas | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/MVC5.0/SDK/MVC.Controller.pas b/MVC5.0/SDK/MVC.Controller.pas index 249f910..430fdd0 100644 --- a/MVC5.0/SDK/MVC.Controller.pas +++ b/MVC5.0/SDK/MVC.Controller.pas @@ -545,12 +545,12 @@ begin begin CreateDir(path); end; - s := ExtractFileName(Request.Files[k].filename); + s := ExtractFileName(Request.Files[i].filename); if filename.Trim <> '' then begin p := ''; - if k > 0 then - p := k.ToString; + if i > 0 then + p := i.ToString; filetmp := filename.Trim + p + copy(s, Pos('.', s), s.Length - pos('.', s) + 1) end else @@ -560,8 +560,8 @@ begin FFileName := path + '\' + filetmp; Afile := TFileStream.Create(FFileName, fmCreate); try - Request.Files[k].Stream.Position := 0; - Afile.CopyFrom(Request.Files[k].Stream, Request.Files[k].Stream.Size); //测试保存文件,通过。 + Request.Files[i].Stream.Position := 0; + Afile.CopyFrom(Request.Files[i].Stream, Request.Files[i].Stream.Size); //测试保存文件,通过。 finally Afile.Free; end; -- Gitee