超级列表框加密保存读取数据

易语言 2020-08-03 19:02:24

超级列表框加密保存读取数据

在这里写了一个比较简单的,并且把文本数据.txt加密。

外部超级列表框保存命令,右边编辑框内容是最终保存数据文本效果演示。

.如果真 (外部超级列表框_保存数据 (超级列表框1.取窗口句柄 (), 取运行目录 () + “\加密数据.txt”, 0, ) = 真)
写到文件 (取运行目录 () + “\加密数据.txt”, 加密数据 (读入文件 (取运行目录 () + “\加密数据.txt”), “mima”, 2))
编辑框2.内容 = 到文本 (读入文件 (取运行目录 () + “\加密数据.txt”))
信息框 (“保存成功!” + 到文本 (取现行时间 ()), 0, )
超级列表框1.全部删除 ()