删除附件再上传附件，软件报错“A component named UpFileView already exists”。

Forms/UpFileManageFrame.pas

@@ -294,7 +294,9 @@ procedure TUpFileManageView.AddUpFileView(AUpFile: TUpFile);
 var vVew: TUpFileView;
 begin
   vVew := TUpFileView.Create(Self);
-  vVew.Name := Format('UpFileView%d', [AUpFile.No]);    // 此时ID尚末获取，不能用ID
+// 先删再增会重复。
+//  vVew.Name := Format('UpFileView%d', [AUpFile.No]);    // 此时ID尚末获取，不能用ID
+  vVew.Name := Format('UpFileView_%s', [PHPWeb.TempName]);
   vVew.Owner := Self;
   vVew.ProjectData := FProjectData;
   vVew.parent := sbFile;