外部的文本内容部分替换

EvenKing

想用易语言写个改变文本内容的小程序，大概是这样：
先读取一个指定目录的一个名为1.ini的文件，里面内容如下
=---------------------=
Project1：trueProject2：false
Project3：10
Project4：360
=---------------------=

“Project：”这个不改，改的是后面的数值：[true/false]
还有一个难点：true和false一个是4位，一个是5位，不同情况下怎么判定..
Project3后面的数值是介于0~100之间的，在改变的时候会有1位数.2位数.3位数，如何判定.
之前试了一下文本替换，输出到编辑框，但是怎么改滑块条，值都不变
这个文本的内容是：
=-----------=
abcde:5
fghij:66

=-----------=
写的程序内容是：
=-------------------------------------------------------------------------------------------------------------------------------------=

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

文本信息 ＝ 到文本 (读入文件 (“C:\Users\Administrator\Desktop\2.txt”))
标签1.标题 ＝ 取文本中间 (文本信息, 7, 2)
标签2.标题 ＝ 取文本中间 (文本信息, 16, 2)

子程序名	返回值类型	公开	备 注
_滑块条1_位置被改变

文本信息 ＝ 子文本替换 (文本信息, “abcde：” ＋ 取文本中间 (文本信息, 7, 2), 到文本 (滑块条1.位置), , , 真)
编辑框1.内容 ＝ 文本信息

子程序名	返回值类型	公开	备 注
_滑块条2_位置被改变

文本替换 (文本信息, 16, 2, 到文本 (滑块条2.位置))
编辑框1.内容 ＝ 文本信息

.版本 2<br /> .程序集 窗口程序集_启动窗口<br /> .子程序 __启动窗口_创建完毕<br /> 文本信息 ＝ 到文本 (读入文件 (“C:\Users\Administrator\Desktop\2.txt”))<br /> 标签1.标题 ＝ 取文本中间 (文本信息, 7, 2)<br /> 标签2.标题 ＝ 取文本中间 (文本信息, 16, 2)<br /> .子程序 _滑块条1_位置被改变<br /> 文本信息 ＝ 子文本替换 (文本信息, “abcde：” ＋ 取文本中间 (文本信息, 7, 2), 到文本 (滑块条1.位置), , , 真)<br /> 编辑框1.内容 ＝ 文本信息<br /> .子程序 _滑块条2_位置被改变<br /> 文本替换 (文本信息, 16, 2, 到文本 (滑块条2.位置))<br /> 编辑框1.内容 ＝ 文本信息

=--------------------------------------------------------------------------------------------------------------------------------------=
想让各位易友支支招，或者帮我一下，感谢各位了！！！！

走一回

  

子程序名	返回值类型	公开	备 注
_滑块条1_位置被改变

写配置项 (取运行目录 () ＋ “\xx.ini”, “信息”, “Project3”, 到文本 (滑块条1.位置))

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

滑块条1.最大位置 ＝ 到整数 (读配置项 (取运行目录 () ＋ “\xx.ini”, “信息”, “Project4”, ))
滑块条1.位置 ＝ 到整数 (读配置项 (取运行目录 () ＋ “\xx.ini”, “信息”, “Project3”, ))

.版本 2<br /> <br /> .子程序 _滑块条1_位置被改变<br /> <br /> 写配置项 (取运行目录 () ＋ “\xx.ini”, “信息”, “Project3”, 到文本 (滑块条1.位置))<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 滑块条1.最大位置 ＝ 到整数 (读配置项 (取运行目录 () ＋ “\xx.ini”, “信息”, “Project4”, ))<br /> 滑块条1.位置 ＝ 到整数 (读配置项 (取运行目录 () ＋ “\xx.ini”, “信息”, “Project3”, ))

xx.ini的内容:
[信息]
Project1=true
Project2=false
Project3=164
Project4=360

走一回

你想说什么,要什么 效果????

风度猫

每行取p到:的文本.然后删除,剩下的不就是你想要的

EvenKing

走一回 发表于 2019-3-24 13:13
你想说什么,要什么 效果????

滑块条来选择，当滑块条改变的时候，滑块条的位置就是输出的值，（Project3和Project4）

EvenKing

走一回 发表于 2019-3-24 13:13
你想说什么,要什么 效果????

滑块条和组合框来改变文本里面加粗字体

EvenKing

风度猫 发表于 2019-3-24 13:15
每行取p到:的文本.然后删除,剩下的不就是你想要的

不是很清楚...能详细一点吗，实在感谢

风度猫

  

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

变量名	类 型	静态	数组	备 注
文本信息	文本型
分割每行信息	文本型		0
数据量	整数型
i	整数型
要删除的文本	文本型
得到文本	通用型

文本信息 ＝ 到文本 (读入文件 (“C:\Users\Administrator\Desktop\2.txt”))
分割每行信息 ＝ 分割文本 (文本信息, #换行符, )
数据量 ＝ 取数组成员数 (分割每行信息)
i ＝ 1
计次循环首 (数据量, i)
要删除的文本 ＝ 文本_取出中间文本 (分割每行信息 [i], “p”, “:”, )
得到文本=文本_替换 (分割每行信息 [i], , , , 要删除的文本, “”)
调试输出 (得到文本)
计次循环尾 ()

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> <br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 文本信息, 文本型<br /> .局部变量 分割每行信息, 文本型, , "0"<br /> .局部变量 数据量, 整数型<br /> .局部变量 i, 整数型<br /> .局部变量 要删除的文本, 文本型<br /> .局部变量 得到文本, 通用型<br /> <br /> 文本信息 ＝ 到文本 (读入文件 (“C:\Users\Administrator\Desktop\2.txt”))<br /> 分割每行信息 ＝ 分割文本 (文本信息, #换行符, )<br /> 数据量 ＝ 取数组成员数 (分割每行信息)<br /> i ＝ 1<br /> .计次循环首 (数据量, i)<br />     要删除的文本 ＝ 文本_取出中间文本 (分割每行信息 <i>, “p”, “:”, )<br />     得到文本=文本_替换 (分割每行信息 <i>, , , , 要删除的文本, “”)<br />     调试输出 (得到文本)<br /> .计次循环尾 ()