觅风论坛

标题: 新人学习第十一课 [打印本页]

作者: 宋小贱    时间: 2022-1-20 15:36
标题: 新人学习第十一课
.版本 2
.支持库 dp1

.子程序 _按钮1_读配置_被单击
.局部变量 解密, 文本型

解密 = 到文本 (解密数据 (到字节集 (读配置项 (取运行目录 () + “\配置.ini”, “123”, “配置1”, )), “2512”, 2))
编辑框1_配置1.内容 = 解密
解密 = 到文本 (解密数据 (到字节集 (读配置项 (取运行目录 () + “\配置.ini”, “123”, “配置2”, )), “2512”, 2))
编辑框2_配置2.内容 = 解密
解密 = 到文本 (解密数据 (到字节集 (读配置项 (取运行目录 () + “\配置.ini”, “123”, “配置3”, )), “2512”, 2))
编辑框3_配置3.内容 = 解密
解密 = 到文本 (解密数据 (到字节集 (读配置项 (取运行目录 () + “\配置.ini”, “123”, “配置4”, )), “2512”, 2))
编辑框4_配置4.内容 = 解密

.子程序 _按钮2_写配置_被单击
.局部变量 加密, 文本型

加密 = 到文本 (加密数据 (到字节集 (编辑框1_配置1.内容), “2512”, 2))
写配置项 (取运行目录 () + “\配置.ini”, “123”, “配置1”, 加密)
加密 = 到文本 (加密数据 (到字节集 (编辑框2_配置2.内容), “2512”, 2))
写配置项 (取运行目录 () + “\配置.ini”, “123”, “配置2”, 加密)
加密 = 到文本 (加密数据 (到字节集 (编辑框3_配置3.内容), “2512”, 2))
写配置项 (取运行目录 () + “\配置.ini”, “123”, “配置3”, 加密)
加密 = 到文本 (加密数据 (到字节集 (编辑框4_配置4.内容), “2512”, 2))
写配置项 (取运行目录 () + “\配置.ini”, “123”, “配置4”, 加密)







欢迎光临 觅风论坛 (https://www.eyyba.com/) Powered by Discuz! X3.4