精易论坛

标题: 配置保存BUG [打印本页]

作者: 是大哥吖    时间: 2021-5-11 17:08
标题: 配置保存BUG
.版本 2

.子程序 批量_编辑框_保存配置, 整数型, 公开, 保存窗口上所有编辑框的内容!与"批量_编辑框_读取配置()"命令一起用的!  返回被操作的编辑框数量!
.参数 组件的父窗口, 窗口, , 直接填写顶级窗口就行了,如:_启动窗口
.参数 配置文件名, 文本型, 可空, 可空:默认保存在根目录\data目录下,名为setsoft.ini
.参数 不保存的控件名称, 文本型, 可空, 不需要自动保存数据的控件名称,以|分开;
.局部变量 局_寻找句柄, 整数型
.局部变量 局_计次, 整数型
.局部变量 局_组件, 编辑框
.局部变量 局_临时文本, 文本型
.局部变量 局_组件数量, 整数型

.如果真 (配置文件名 = “”)
    配置文件名 = 取默认目录 ()
.如果真结束
局_寻找句柄 = 寻找组件 (组件的父窗口, , “编辑框”, , )
局_组件数量 = 取找到组件数目 (局_寻找句柄)
.计次循环首 (局_组件数量, 局_计次)
    局_组件 = 取所找到组件 (局_寻找句柄, 局_计次 - 1)
    .如果真 (内部_对比 (不保存的控件名称, 取组件名称 (局_组件)))
        局_临时文本 = 子文本替换 (局_组件.内容, #换行符, “><br><”, , , 真)
        局_临时文本 = 子文本替换 (局_临时文本, #引号, “#引号”, , , 真)
        写配置项 (配置文件名, “编辑框”, 取组件名称 (局_组件), 局_临时文本)
    .如果真结束

.计次循环尾 ()
清除组件寻找句柄 (局_寻找句柄)
返回 (局_组件数量)



‘======
        局_临时文本 = 子文本替换 (局_组件.内容, #换行符, “><br><”, , , 真)
        局_临时文本 = 子文本替换 (局_临时文本, #引号, “#引号”, , , 真)



编码_URL编码 (局_组件.内容, 真, )


应该直接编码保存读取,这样也有的内容会出问题






作者: Ly0303    时间: 2021-6-5 12:07

太棒了,离南山法院又近一步!
作者: lhw2965    时间: 2021-10-20 16:35
1111111225555555




欢迎光临 精易论坛 (https://125.confly.eu.org/) Powered by Discuz! X3.4