程序和文件加密软件完成版

写出到C盘的加密密码 这个我自己是用另外的数据算法加密了的。

为了安全起见，建议还是写出的文件加密吧，毕竟现在网络环境不安全，把自己比较重要、私密的文件加密，也可以安心下。

写出数据信息 ＝ 文本_取左边 (编辑框2.内容, “-加密-”, 0, 假)
.如果 (选择框3.选中 ＝ 真)
.如果真 (写出数据信息 ＝ “”)
信息框 (“该文件未加密 不需要解密”, #警告图标, “提示：”, _启动窗口)
返回 ()
.如果真结束
.如果真 (写到文件 (文件_取目录 (接收到的文件路径1) ＋ 写出数据信息 ＋ “_解密_” ＋ 编辑框3.内容, 解密数据 (读入文件 (接收到的文件路径1), 编辑框1.内容, )) ＝ 假)
透明标签3.标题 ＝ “解密文件失败！”
返回 ()
.如果真结束
调试输出 (接收到的文件路径1)
透明标签3.标题 ＝ “解密文件成功.....”
.如果真 (选择框2.选中 ＝ 真)
.如果真 (删除文件 (接收到的文件路径1))
透明标签3.标题 ＝ “删除加密原文件成功...”
返回 ()
.如果真结束
透明标签3.标题 ＝ “删除加密原文件失败！”
返回 ()