复制文件夹内的全部文件到另外一个文件夹

查看源码请使用压缩包内的模块，我自己改了代码。

编辑框4.加入文本 (“复制 ” ＋ 目录 ＋ 文件名 ＋ “ 到 ” ＋ 编辑框2.内容 ＋ “\” ＋ 文件名 ＋ “ 是否覆盖 ” ＋ 是否覆盖 ＋ #换行符 ＋ #换行符)
.如果真 (文件_复制 (目录 ＋ 文件名, 编辑框2.内容 ＋ “\” ＋ 文件名, 覆盖) ＝ 假)
编辑框4.加入文本 (“失败复制 ” ＋ 目录 ＋ 文件名 ＋ #换行符 ＋ #换行符)
返回 ()
.如果真结束
编辑框4.加入文本 (“删除文件 ” ＋ 目录 ＋ 文件名 ＋ #换行符 ＋ #换行符)
.如果真 (文件_删除 (目录 ＋ 文件名) ＝ 假)
编辑框4.加入文本 (“删除复制 ” ＋ 目录 ＋ 文件名 ＋ #换行符 ＋ #换行符)
返回 ()