如何使用易语言制作文件加密/解密器软件?

2025-09-20 22:18:32

1、绘制界面(1)

首先,我们要绘制这一个程序的“脸”——界面。共有7个编辑框、8个按钮、若干标签和若干菜单。但是你有没有发现,在这张图上只有4个编辑框和4个按钮?因为我们用了选择夹,下一步我们将绘制选择夹另外一边的组件。

如何使用易语言制作文件加密/解密器软件?

2、绘制界面(2)

现在,我们来绘制选择框的另一面的组件吧。您还需要添加两个“通用编辑框”组件。

如何使用易语言制作文件加密/解密器软件?

3、制作菜单

在窗口空白的位置上(例如标题栏)点击右键,在弹出来的右键菜单中选择“菜单编辑器”,启动菜单编辑器。您需要通过“下移”、“左移”、“右移”和“向后插入”来控制。

如何使用易语言制作文件加密/解密器软件?

4、变量

当然,我们为了方便起见,我们需要用到“变量”这一种东西。点击“程序”选项卡中的“全局变量”。按照如图所示地方法添加两个全局变量。

如何使用易语言制作文件加密/解密器软件?

5、添加代码(1)

这一部分代码比较难懂,请多看看注释。这些代码是添加在“加密”按钮中的。

.版本 2

.支持库 dp1

.子程序 进行加密

.局部变量 文件, 字节集, , , 该文件原文件的机器码

.局部变量 加密后文件, 字节集, , , 该文件加密后的机器码

.局部变量 文件名, 文本型, , , 该文件的文件名+扩展名

信息框 (“加密开始!”, 0, )  ' 提示用户加密已开始

文件名 = 取文本右边 (编辑框1.内容, 取文本长度 (编辑框1.内容) - 倒找文本 (编辑框1.内容, “\”, , 假))  ' 获取文件扩展名,以便输出时添加扩展名

文件 = 读入文件 (编辑框1.内容)  ' 将选定的文件添加进容器中

加密后文件 = 加密数据 (文件, 编辑框3.内容, )  ' 将选定文件加密

.判断开始 (写到文件 (编辑框2.内容 + “\加密过的” + 文件名, 加密后文件))  ' 写出文件,并判断写出是否成功

    信息框 (“加密数据成功!”, 0, )  ' 写出成功后弹出信息框提示成功

.默认

    信息框 (“加密数据失败!”, 0, )  ' 写出失败后弹出信息框提示失败

.判断结束

如何使用易语言制作文件加密/解密器软件?

6、添加代码(2)

这一部分的代码是添加在“解密”按钮中的。

.版本 2

.支持库 dp1

.子程序 _按钮5_被单击

.局部变量 文件, 字节集, , , 该文件原文件的机器码

.局部变量 解密后文件, 字节集, , , 该文件解密后的机器码

.局部变量 文件名, 文本型, , , 该文件的文件名+扩展名

信息框 (“解密开始!”, 0, )  ' 提示用户解密已开始

文件名 = 取文本右边 (编辑框5.内容, 取文本长度 (编辑框5.内容) - 倒找文本 (编辑框5.内容, “\”, , 假))  ' 获取文件扩展名,以便输出时添加扩展名

文件 = 读入文件 (编辑框5.内容)  ' 将选定的文件添加进容器中

解密后文件 = 解密数据 (文件, 编辑框7.内容, )  ' 将选定文件解密

.判断开始 (写到文件 (编辑框6.内容 + “\解密过的” + 文件名, 解密后文件))  ' 写出文件,并判断写出是否成功

    信息框 (“解密数据成功!”, 0, )  ' 写出成功后弹出信息框提示成功

.默认

    信息框 (“解密数据失败!”, 0, )  ' 写出失败后弹出信息框提示失败

如何使用易语言制作文件加密/解密器软件?

声明:本网站引用、摘录或转载内容仅供网站访问者交流或参考,不代表本站立场,如存在版权或非法内容,请联系站长删除,联系邮箱:site.kefu@qq.com。
猜你喜欢