如何用易语言修改文件内容
1个回答
展开全部
我想您应该是要去掉和添加前面的“;”吧,一下是代码,只做查考
’----------------------------------------------------------------------------------
.版本 2
.子程序 修改数据
.参数 修改方式, 逻辑型, , 指定修改方式,真为开启插件,假为关闭插件
.参数 插件名称, 文本型, , 要修改的插件名称
.局部变量 临时数据, 字节集
.局部变量 临时数组, 文本型, , "0"
.局部变量 循环次数, 整数型
.局部变量 n, 整数型
.局部变量 名称长度, 整数型
.局部变量 临时文本, 文本型
.局部变量 最后数据, 文本型
.局部变量 m, 整数型
' 假设您编译后的文件与plugins.ini同目录
临时数据 = 读入文件 (取运行目录 () + “\plugins.ini”) ' 文件比较小,直接读入算了
创建目录 (取运行目录 () + “\datbak”) ' 创建一个备份目录,失败与否不用理会
写到文件 (取运行目录 () + “\datbak\” + 到文本 (取现行时间 ()) + “.inibak”, 临时数据) ' 以当前时间备份数据
临时数组 = 分割文本 (到文本 (临时数据), #换行符, )
循环次数 = 取数组成员数 (临时数组)
名称长度 = 取文本长度 (插件名称)
.计次循环首 (循环次数, n)
.判断开始 (修改方式 = 真)
.如果真 (取文本左边 (临时数组 [n], 1) = “;”)
临时文本 = 取文本中间 (临时数组 [n], 2, 名称长度)
.如果真 ( 临时文本= 插件名称)
临时数组 [n] = 临时文本
跳出循环 ()
.如果真结束
.如果真结束
.默认
.如果真 (取文本左边 (临时数组 [n], 名称长度) = 插件名称)
临时数组 [n] = “;” + 临时文本
跳出循环 ()
.如果真结束
.判断结束
.计次循环尾 ()
.计次循环首 (循环次数, m)
最后数据 = 最后数据 + 临时数组 [m] + #换行符
.计次循环尾 ()
写到文件 (取运行目录 () + “\plugins.ini”, 到字节集 (最后数据))
信息框 (“chenggong!”, 0, )
’----------------------------------------------------------------------------------
.版本 2
.子程序 修改数据
.参数 修改方式, 逻辑型, , 指定修改方式,真为开启插件,假为关闭插件
.参数 插件名称, 文本型, , 要修改的插件名称
.局部变量 临时数据, 字节集
.局部变量 临时数组, 文本型, , "0"
.局部变量 循环次数, 整数型
.局部变量 n, 整数型
.局部变量 名称长度, 整数型
.局部变量 临时文本, 文本型
.局部变量 最后数据, 文本型
.局部变量 m, 整数型
' 假设您编译后的文件与plugins.ini同目录
临时数据 = 读入文件 (取运行目录 () + “\plugins.ini”) ' 文件比较小,直接读入算了
创建目录 (取运行目录 () + “\datbak”) ' 创建一个备份目录,失败与否不用理会
写到文件 (取运行目录 () + “\datbak\” + 到文本 (取现行时间 ()) + “.inibak”, 临时数据) ' 以当前时间备份数据
临时数组 = 分割文本 (到文本 (临时数据), #换行符, )
循环次数 = 取数组成员数 (临时数组)
名称长度 = 取文本长度 (插件名称)
.计次循环首 (循环次数, n)
.判断开始 (修改方式 = 真)
.如果真 (取文本左边 (临时数组 [n], 1) = “;”)
临时文本 = 取文本中间 (临时数组 [n], 2, 名称长度)
.如果真 ( 临时文本= 插件名称)
临时数组 [n] = 临时文本
跳出循环 ()
.如果真结束
.如果真结束
.默认
.如果真 (取文本左边 (临时数组 [n], 名称长度) = 插件名称)
临时数组 [n] = “;” + 临时文本
跳出循环 ()
.如果真结束
.判断结束
.计次循环尾 ()
.计次循环首 (循环次数, m)
最后数据 = 最后数据 + 临时数组 [m] + #换行符
.计次循环尾 ()
写到文件 (取运行目录 () + “\plugins.ini”, 到字节集 (最后数据))
信息框 (“chenggong!”, 0, )
追问
看不懂呢,能不能简单点,好的话我补分
追答
-_-!!!!!! 无语!!!~~~~
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询