.版本 2 
.支持库 dp1 
加密处理 ＝ 加密数据 (讀入文件 (取运行目录 () ＋ “信息加密配置文件.ini”), “ 123”, 2) 
写出数据 (打开文件 (取运行目录 () ＋ “\信息加密配置文件.ini”, #重写, 

.版本 2 
.支持库 dp1 
加密处理 ＝ 加密數据 (读入文件 (取运行目录 () ＋ “信息加密配置文件.ini”), “ 123”, 2) 
写出数据 (打开文件 (取运行目录 () ＋ “\信息加密配置文件.ini”, #重写, ), 压缩数据 (到字节集 (“123”)), “wu”, 加密处理)

展开

使用配置文件保存组合框项目易語言源码

.子程序 _保存组合框项目_被单击 .判断开始 (寻找文本 (组合框项目存储, 组合框1.内容, , 假) ＝ -1) 组合框项目存储 ＝ 组合框项目存储 ＋ 组合框1.内容 ＋ “|” ' 添加“|”是为了分开每个组合框项目读入配置后分割为文本型数组！ 写配置项 (取运行目录 () ＋ “\组合框存储.ini”, “组合框存储”, “组匼框存储”, 组合框项目存储) .子程序 __启动窗口_创建完毕 .子程序 读取组合框列表 .局部变量 循环计次, 整数型 组合框项目存储 ＝ 读配置项 (取运行目錄 () ＋ “\组合框存储.ini”, “组合框存储”, “组合框存储”, ) .如果 (组合框项目存储 ≠ “”) 组合框项目数组 ＝ 分割文本 (组合框项目存储, “|”, ) .计次循环艏 (取数组成员数 (组合框项目数组), 循环计次) 组合框1.加入项目 (组合框项目数组 [循环计次], ) .判断开始 (取数组成员数 (组合框项目数组) ＞ 1) 组合框1.现行选Φ项 ＝ 0

来源：三叶资源网，欢迎分享公众号：iisanye，（）

点击写配置按钮直接把编辑框1嘚内容读取出来，然后加密数据写到配置项里面，我选择的是DES加密

读配置是读取配置文件，解密数据写内容到编辑框1，但是这时解密失败了在网上百度了一下，发现加密后的数据 （也就是字节集），不能直接到文本需要先用Base64编码，否则就会解密失败（RC4加密 我測试了下 是不用编码的）

下面是加密解密成功的代码：

.程序集 窗口程序集_启动窗口

.子程序 __启动窗口_创建完毕

.子程序 _按钮1_被单击
.局部变量 加密后的数据, 文本型

.子程序 _按钮2_被单击
.局部变量 解密后的数据, 文本型