文件加密大师自绘版

.如果真 (文件_取扩展名 (接收到的文件路径) ＝ “.ghjm”)
.如果真 (文件解密 (编辑框 [1].内容 (), 读入文件 (接收到的文件路径), 文件_取目录 (接收到的文件路径), 文件_取文件名 (接收到的文件路径)) ＝ 真)
信息框_Ex (取窗口句柄 (), “解密成功！！”, , , , )
返回 ()
.如果真结束
信息框_Ex (取窗口句柄 (), “解密失败！！”, , , , )
返回 ()
.如果真结束
.如果真 (文件加密 (编辑框 [1].内容 (), 读入文件 (接收到的文件路径), 文件_取目录 (接收到的文件路径), 文件_取文件名 (接收到的文件路径, 真)))
信息框_Ex (取窗口句柄 (), “加密成功！！”, , , , )
.如果真 (选择框.选中 () ＝ 真)
文件_删除 (接收到的文件路径)
.如果真结束
返回 ()
.如果真结束
信息框_Ex (取窗口句柄 (), “加密失败！！”, , , , )