搜按钮标题，定位至按钮

大鹏z

如图，在高级选择夹中写了许多按钮，多到自己都找不到想要找的。怎么能实现通过搜索框模糊搜索，快速定位到想要的按钮呢。

熬夜

窗口_枚举所有子窗口  进行标题对比

malin158

源码模块论坛有源码
1.e (958.16 KB, 下载次数: 4)

6 天前 上传

点击文件名下载附件

1173847128

  

子程序名	返回值类型	公开	备 注
_按钮2_被单击

变量名	类 型	静态	数组	备 注
组件	整数型
组件数量	整数型
按钮	按钮
i	整数型

组件 ＝ 寻找组件 (_启动窗口, “按钮”, , , )
组件数量 ＝ 取找到组件数目 (组件)
计次循环首 (组件数量, i)
按钮 ＝ 取所找到组件 (组件, i － 1)  ' 索引开始是0 所以要-1
如果真 (编辑框1.内容 ＝ 按钮.标题)
调试输出 (“找到了”)
' 写你自己代码
返回 ()  ' 找到就返回

计次循环尾 ()
调试输出 (“没找到”)

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

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 _按钮2_被单击<br /> .局部变量 组件, 整数型<br /> .局部变量 组件数量, 整数型<br /> .局部变量 按钮, 按钮<br /> .局部变量 i, 整数型<br /> <br /> 组件 ＝ 寻找组件 (_启动窗口, “按钮”, , , )<br /> 组件数量 ＝ 取找到组件数目 (组件)<br /> .计次循环首 (组件数量, i)<br />     按钮 ＝ 取所找到组件 (组件, i － 1)  ' 索引开始是0 所以要-1<br />     .如果真 (编辑框1.内容 ＝ 按钮.标题)<br />         调试输出 (“找到了”)<br />         ' 写你自己代码<br />         返回 ()  ' 找到就返回<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> <br /> 调试输出 (“没找到”)

1173847128

1173847128 发表于 2025-7-20 01:02
[e=0].版本 2
.支持库 spec

复制就能用  编辑框1.内容  是你要找的 按钮标题名字

精易论坛龙

首先，按钮加入是属于动态还是固定手动添加？最好是复制组件动态添加，按钮添加标记，按钮都有固定名称或者标题，搜索出来后，读取对应标记，按钮太多，最后加入滚动条，通过定位滚动条，达到定位按钮。

大鹏z

malin158 发表于 2025-7-20 01:02
源码模块论坛有源码

怎么才能达到模糊搜索的功能呢

大鹏z

1173847128 发表于 2025-7-20 01:03
复制就能用  编辑框1.内容  是你要找的 按钮标题名字

怎么才能达到模糊搜索的功能呢

大鹏z

求大佬指点

2224848

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
所有按钮信息	按钮信息	0

数据类型名	公开	备 注
按钮信息
成员名	类 型	传址	数组	备 注
名称	文本型
句柄	整数型
选择夹索引	整数型
页面索引	整数型

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

初始化按钮数据库 ()
编辑框_搜索.内容 ＝ "输入按钮名称搜索"

子程序名	返回值类型	公开	备 注
初始化按钮数据库

.局部变量 选择夹数量, 整数型
.局部变量 页数, 整数型
.局部变量 按钮数, 整数型
.局部变量 总计数, 整数型

清除数组 (所有按钮信息)
选择夹数量 ＝ 高级选择夹1.取子夹数目 ()

计次循环首 (选择夹数量, i)
页数 ＝ 高级选择夹1.取页面数量 (i - 1)
计次循环首 (页数, j)
高级选择夹1.现行子夹 ＝ i - 1
高级选择夹1.现行页面 ＝ j - 1

按钮数 ＝ 取组件数目 ("按钮")
计次循环首 (按钮数, k)
总计数 ＝ 总计数 ＋ 1
重定义数组 (所有按钮信息, 真, 总计数)

所有按钮信息[总计数].名称 ＝ 取组件名称 (取组件句柄 ("按钮" ＋ 到文本 (k)))
所有按钮信息[总计数].句柄 ＝ 取组件句柄 ("按钮" ＋ 到文本 (k))
所有按钮信息[总计数].选择夹索引 ＝ i - 1
所有按钮信息[总计数].页面索引 ＝ j - 1
计次循环尾 ()
计次循环尾 ()
计次循环尾 ()

输出调试文本 ("共扫描到" ＋ 到文本 (总计数) ＋ "个按钮")

子程序名	返回值类型	公开	备 注
_编辑框_搜索_内容被改变

.局部变量 搜索词, 文本型
.局部变量 i, 整数型
.局部变量 结果列表, 文本型

搜索词 ＝ 删首尾空 (编辑框_搜索.内容)
如果 (搜索词 ＝ "")
列表框_结果.可视 ＝ 假
返回 ()

列表框_结果.清空 ()

计次循环首 (取数组成员数 (所有按钮信息), i)
如果 (寻找文本 (所有按钮信息[i].名称, 搜索词, , 假) ≠ -1)
列表框_结果.加入项目 (所有按钮信息[i].名称 ＋ " (页:" ＋ 到文本 (所有按钮信息[i].选择夹索引 ＋ 1) ＋ "-" ＋ 到文本 (所有按钮信息[i].页面索引 ＋ 1) ＋ ")", )
列表框_结果.置绑定数值 (取列表框项目数 () - 1, i)  ' 绑定数组索引

计次循环尾 ()

如果 (取列表框项目数 () ＞ 0)
列表框_结果.可视 ＝ 真
列表框_结果.可视 ＝ 假

子程序名	返回值类型	公开	备 注
_列表框_结果_列表项被选择

.局部变量 选中索引, 整数型
.局部变量 数据索引, 整数型

选中索引 ＝ 列表框_结果.现行选中项
如果 (选中索引 ≥ 0)
数据索引 ＝ 列表框_结果.取绑定数值 (选中索引)

' 切换到对应选择夹和页面
高级选择夹1.现行子夹 ＝ 所有按钮信息[数据索引].选择夹索引
高级选择夹1.现行页面 ＝ 所有按钮信息[数据索引].页面索引

' 高亮显示目标按钮
按钮高亮显示 (所有按钮信息[数据索引].句柄)

子程序名	返回值类型	公开	备 注
按钮高亮显示
参数名	类 型	参考	可空	数组	备 注
按钮句柄	整数型

.局部变量 临时颜色, 整数型

' 保存原颜色
临时颜色 ＝ 取按钮背景色 (按钮句柄)

' 设置高亮色
置按钮背景色 (按钮句柄, #黄色 )
程序_延时 (800)

' 恢复原色
置按钮背景色 (按钮句柄, 临时颜色)

i支持库列表	支持库注释
iext	扩展界面支持库一
shell	操作系统界面功能支持库

.版本 2<br /> .支持库 iext<br /> .支持库 shell<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 所有按钮信息, 按钮信息, , "0"<br /> <br /> .数据类型 按钮信息<br />     .成员 名称, 文本型<br />     .成员 句柄, 整数型<br />     .成员 选择夹索引, 整数型<br />     .成员 页面索引, 整数型<br /> <br /> .子程序 __启动窗口_创建完毕<br />     初始化按钮数据库 ()<br />     编辑框_搜索.内容 ＝ "输入按钮名称搜索"<br /> <br /> .子程序 初始化按钮数据库<br />     .局部变量 选择夹数量, 整数型<br />     .局部变量 页数, 整数型<br />     .局部变量 按钮数, 整数型<br />     .局部变量 总计数, 整数型<br />     <br />     清除数组 (所有按钮信息)<br />     选择夹数量 ＝ 高级选择夹1.取子夹数目 ()<br />     <br />     .计次循环首 (选择夹数量, i)<br />         页数 ＝ 高级选择夹1.取页面数量 (i - 1)<br />         .计次循环首 (页数, j)<br />             高级选择夹1.现行子夹 ＝ i - 1<br />             高级选择夹1.现行页面 ＝ j - 1<br />             <br />             按钮数 ＝ 取组件数目 ("按钮")<br />             .计次循环首 (按钮数, k)<br />                 总计数 ＝ 总计数 ＋ 1<br />                 重定义数组 (所有按钮信息, 真, 总计数)<br />                 <br />                 所有按钮信息[总计数].名称 ＝ 取组件名称 (取组件句柄 ("按钮" ＋ 到文本 (k)))<br />                 所有按钮信息[总计数].句柄 ＝ 取组件句柄 ("按钮" ＋ 到文本 (k))<br />                 所有按钮信息[总计数].选择夹索引 ＝ i - 1<br />                 所有按钮信息[总计数].页面索引 ＝ j - 1<br />             .计次循环尾 ()<br />         .计次循环尾 ()<br />     .计次循环尾 ()<br />     <br />     输出调试文本 ("共扫描到" ＋ 到文本 (总计数) ＋ "个按钮")<br /> <br /> .子程序 _编辑框_搜索_内容被改变<br />     .局部变量 搜索词, 文本型<br />     .局部变量 i, 整数型<br />     .局部变量 结果列表, 文本型<br />     <br />     搜索词 ＝ 删首尾空 (编辑框_搜索.内容)<br />     .如果 (搜索词 ＝ "")<br />         列表框_结果.可视 ＝ 假<br />         返回 ()<br />     .如果结束<br />     <br />     列表框_结果.清空 ()<br />     <br />     .计次循环首 (取数组成员数 (所有按钮信息), i)<br />         .如果 (寻找文本 (所有按钮信息<i>.名称, 搜索词, , 假) ≠ -1)<br />             列表框_结果.加入项目 (所有按钮信息<i>.名称 ＋ " (页:" ＋ 到文本 (所有按钮信息<i>.选择夹索引 ＋ 1) ＋ "-" ＋ 到文本 (所有按钮信息<i>.页面索引 ＋ 1) ＋ ")", )<br />             列表框_结果.置绑定数值 (取列表框项目数 () - 1, i)  ' 绑定数组索引<br />         .如果结束<br />     .计次循环尾 ()<br />     <br />     .如果 (取列表框项目数 () ＞ 0)<br />         列表框_结果.可视 ＝ 真<br />     .否则<br />         列表框_结果.可视 ＝ 假<br />     .如果结束<br /> <br /> .子程序 _列表框_结果_列表项被选择<br />     .局部变量 选中索引, 整数型<br />     .局部变量 数据索引, 整数型<br />     <br />     选中索引 ＝ 列表框_结果.现行选中项<br />     .如果 (选中索引 ≥ 0)<br />         数据索引 ＝ 列表框_结果.取绑定数值 (选中索引)<br />         <br />         ' 切换到对应选择夹和页面<br />         高级选择夹1.现行子夹 ＝ 所有按钮信息[数据索引].选择夹索引<br />         高级选择夹1.现行页面 ＝ 所有按钮信息[数据索引].页面索引<br />         <br />         ' 高亮显示目标按钮<br />         按钮高亮显示 (所有按钮信息[数据索引].句柄)<br />     .如果结束<br /> <br /> .子程序 按钮高亮显示<br /> .参数 按钮句柄, 整数型<br />     .局部变量 临时颜色, 整数型<br />     <br />     ' 保存原颜色<br />     临时颜色 ＝ 取按钮背景色 (按钮句柄)<br />     <br />     ' 设置高亮色<br />     置按钮背景色 (按钮句柄, #黄色 )<br />     程序_延时 (800)<br />     <br />     ' 恢复原色<br />     置按钮背景色 (按钮句柄, 临时颜色)