易语言处理电脑系统配置,电脑易语言程序在哪

1.易语言配置文件

2.求告诉易语言如何加密配置文件和读取加密的配置文件

3.易语言替换配置文件

4.易语言读写配置或运行的问题

5.易语言 读取配置项

6.易语言读写配置项

单击保存按钮写ini配置文件如下：

写配置项 (编辑框1.内容 ＋ “\Config.ini”, “个人信息”, “姓名”, “小李”)

文件所在目录是可以在程序里面手动修改保存的，这一句与后边的怎么读配置文件名没弄明白，既然你是在程序中手动修改的，你的修改变化可以保存到数据库中去，这样一来看你如何改，都可以知道ini配置文件的位置了吧！

易语言配置文件

那么调用系统API读取配置信息

系统"kernel32.dll"下的"WritePrivateProfileStringA"API函数可写"*.ini"配置信息

系统"kernel32.dll"下的"GetPrivateProfileString"API函数可读取"*.ini"配置信息

易语言的大量支持库命令也是封装了系统API函数!

.版本 2

.支持库 spec

.子程序 _启动子程序, 整数型, , 本子程序在程序启动后最先执行

.局部变量 最后一个参数是一个配置文件的绝对路径, 文本型

.局部变量 局部_配置信息, 文本型

.局部变量 局部_文本长度, 整数型

最后一个参数是一个配置文件的绝对路径 ＝ “C:\1.ini”

WritePrivateProfileStringA (“这个参数是将要写入的小节名”, “这个参数是将要写入的配置名”, “这个参数是将要写入的数据”, 最后一个参数是一个配置文件的绝对路径) ?' 写出失败将返回0

局部_文本长度 ＝ 256 ?' 这里的文本长度是最大长度,256/2=128也就是一次最多可读入128个汉字,(上面写出的“这个参数是将要写入的数据”*2=24个字节)配置文件一般不会很长,如果很长不建议你使用配置文件保存

局部_配置信息 ＝ 取空白文本 (局部_文本长度)

GetPrivateProfileString (“这个参数是将要写入的小节名”, “这个参数是将要写入的配置名”, “默认文本”, 局部_配置信息, 局部_文本长度, 最后一个参数是一个配置文件的绝对路径)

调试输出 (局部_配置信息)

.版本 2

.DLL命令 WritePrivateProfileStringA, 整数型, "kernel32", "WritePrivateProfileStringA"

.参数 lpApplicationName, 文本型

.参数 lpKeyName, 文本型

.参数 lpString, 文本型

.参数 lpFileName, 文本型

.DLL命令 GetPrivateProfileString, 整数型, "kernel32", "GetPrivateProfileStringA"

.参数 lpApplicationName, 文本型

.参数 lpKeyName, 文本型

.参数 lpDefault, 文本型

.参数 lpReturnedString, 文本型

.参数 nSize, 整数型

.参数 lpFileName, 文本型

求告诉易语言如何加密配置文件和读取加密的配置文件

写配置项

(取运行目录

()

＋

“\setup.ini”,

“setup”,

“123”,

编辑框1.内容)

前3个参数可以自行修改!

易语言替换配置文件

.版本 2

.支持库 dp1

.程序集 窗口程序集1

.子程序 _按钮_注册_被单击

.局部变量 注册码, 文本型

.局部变量 加密后的数据, 字节集

注册码 ＝ 到文本 (取硬盘特征字 () ＋ 1 × 1)

加密后的数据 ＝ 加密数据 (到字节集 (注册码), “C/C++”, #RC4算法)

.如果真 (写配置项 (“c:\配置1.ini”, “软件注册码”, “内容”, 到文本 (加密后的数据)))

信息框 (“注册成功！”, 0, )

.如果真结束

.子程序 _按钮_验证_被单击

.局部变量 解密后的数据, 字节集

.局部变量 本地注册码, 文本型

.局部变量 注册码, 文本型

注册码 ＝ 到文本 (取硬盘特征字 () ＋ 1 × 1)

本地注册码 ＝ 读配置项 (“c:\配置1.ini”, “软件注册码”, “内容”, )

解密后的数据 ＝ 解密数据 (到字节集 (本地注册码), “C/C++”, #RC4算法)

.如果 (到文本 (解密后的数据) ＝ 注册码)

信息框 (“你已经注册了”, 0, )

.否则

信息框 (“未注册！”, 0, )

.如果结束

易语言读写配置或运行的问题

相同的配置名可以进行替换！

如果想要替换文件但找不到配置名下的配置可以用计次循环首进行查找.

代码如下：

配置=取配置节名（路径）

计次循环首（取数组成员数（配置），计次）

.如果（读配置项（路径，配置[计次]，“要替换的节名称”，）=编辑框1.内容）‘编辑框1.内容是你要替换的那个配置节名的名称

写配置项（路径，配置[计次]，编辑框1.内容，“要替换的数据”）

计次循环尾（）

配置是个数组变量 ?类型为文本型 ?数组为0 代表多个且不确定有多少个的数组

如果设置成1可能会出现报错，且只能读取一个！

易语言 读取配置项

第一个，配置项中没有地址，你可以试下把 取当前目录 () 换成 取运行目录 ()

因为你写入的配置项不是你打开的那个配置项~！

第二个：运行后，停止运行，是因为

运行 (路径1, 真, )

应该将“是否等待程序运行完毕”设置为假~！！

这样就可以了~！

运行 (文件路径, 假, )

给你看下源代码：

===============代码开始于此处==================

.版本 2

.程序集 窗口程序集1

.程序集变量 文件路径, 文本型

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

文件路径 ＝ 读配置项 (取运行目录 () ＋ “\save.ini”, “ways”, “way1”, 文件路径)

标签_路径.标题 ＝ “启动时读取的路径：” ＋ 文件路径

.子程序 _按钮_选择_被单击

通用对话框1.打开 ()

文件路径 ＝ 通用对话框1.文件名

写配置项 (取运行目录 () ＋ “\save.ini”, “ways”, “way1”, 通用对话框1.文件名)

标签_路径.标题 ＝ “选择的文件路径：” ＋ 文件路径

.子程序 _按钮_运行_被单击

运行 (文件路径, 假, )

标签_路径.标题 ＝ “运行的文件路径：” ＋ 文件路径

===============代码于此处结束==================

易语言读写配置项

.版本?2

.程序集?窗口程序集1

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

.局部变量?数组,?文本型,?,?"0"

.局部变量?a,?整数型

.计次循环首?(3,?a)

数组?[a]?＝?读配置项?(“配置文件名”,?“名单”,?到文本?(a),?)

.计次循环尾?()

按照你说的逻辑，两层的条件嵌套就可以实现

1、判断setup.ini文件是否存在，存在进入第二步判断，不存在则创建setup.ini写入两个0

2、判断setup.ini文件是记住账号和记住密码两项是否为1，是的话编辑框自动填写内容，否的话编辑框内容空

下面这个代码对应的窗口控件，一个按钮，两个编辑框