1-18个全部读取

是可可吖 发表于 2025-3-21 02:06
我没理解，是组合框加入1-16，然后组合框随机选择1-16其中一个，写入对应名字？这样吗 ...

拾光 发表于 2025-3-21 01:45
那个文本内容发一下

[人员设置]
名字1=姊妹
名字2=弟兄
名字3=天天
名字4=琪琪
名字5=卡卡
名字6=溜溜
名字7=悦悦
名字8=七宝
名字9=丸子
名字10=甜甜
名字11=子轩
名字12=涂涂
名字13=酥酥
名字14=穗子
名字15=西宝
名字16=旺仔
名字17=仔仔
名字18=宝子姐

拾光 发表于 2025-3-21 02:01
.版本 2
.支持库 EThread

读取直接关了的

我没理解，是组合框加入1-16，然后组合框随机选择1-16其中一个，写入对应名字？这样吗

没看清你要求

补充内容 (2025-3-21 02:05):
上面的就可以了

  

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

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

变量名	类 型	静态	数组	备 注
配置文件路径	文本型
节名称	文本型
键名称	文本型
键值	文本型
索引	整数型

' 配置文件和节名称
配置文件路径 ＝ 取运行目录 () ＋ “\renyuan.ini”
节名称 ＝ “人员设置”
' 清空组合框
组合框_名字1.清空 ()
' 循环读取配置文件中的键值
索引 ＝ 1
循环判断首 ()
键名称 ＝ “名字” ＋ 到文本 (索引)
键值 ＝ 读配置项 (配置文件路径, 节名称, 键名称, “”)
如果真 (键值 ≠ “”)
组合框_名字1.加入项目 (键值, )
索引 ＝ 索引 ＋ 1

循环判断尾 (键值 ≠ “”)
如果真 (索引 ＝ 1)
信息框 (“未读取到数据，请检查配置文件！”, 0, , )

.版本 2<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 配置文件路径, 文本型<br /> .局部变量 节名称, 文本型<br /> .局部变量 键名称, 文本型<br /> .局部变量 键值, 文本型<br /> .局部变量 索引, 整数型<br /> <br /> ' 配置文件和节名称<br /> 配置文件路径 ＝ 取运行目录 () ＋ “\renyuan.ini”<br /> 节名称 ＝ “人员设置”<br /> <br /> ' 清空组合框<br /> 组合框_名字1.清空 ()<br /> <br /> ' 循环读取配置文件中的键值<br /> 索引 ＝ 1<br /> .循环判断首 ()<br />     键名称 ＝ “名字” ＋ 到文本 (索引)<br />     键值 ＝ 读配置项 (配置文件路径, 节名称, 键名称, “”)<br />     .如果真 (键值 ≠ “”)<br />         组合框_名字1.加入项目 (键值, )<br />         索引 ＝ 索引 ＋ 1<br />     .如果真结束<br /> <br /> .循环判断尾 (键值 ≠ “”)<br /> <br /> .如果真 (索引 ＝ 1)<br />     信息框 (“未读取到数据，请检查配置文件！”, 0, , )<br /> .如果真结束

那个ini放到运行目录下 或者你自己改 都行

.版本 2
.支持库 EThread


启动线程 (&组合框加入项目, , )



.子程序 组合框加入项目
.局部变量 I, 整数型


.计次循环首 (文本_取出现次数 (到文本 (读入文件 (取运行目录 () ＋ “\” ＋ “renyuan.ini”)), “=”, ), I)
    组合框1.加入项目 (读配置项 (取运行目录 () ＋ “\” ＋ “renyuan.ini”, “人员设置”, “名字” ＋ 到文本 (I), ), )
.计次循环尾 ()