精易论坛
标题:
配置保存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