如何在窗口1里修改启动窗口里的多个按钮？

Ruang

liu2000 发表于 2025-3-24 21:46
大哥不对，只能改一个按钮名称，我的需求是，右击按钮1出来窗口2修改的是按钮1的名称，右击按钮2改按钮2 ...

  

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

变量名	类 型	静态	数组	备 注
组件句柄	整数型
组件	按钮
i	整数型
自定义名字	文本型

组件句柄 ＝ 寻找组件 (_启动窗口, , “按钮”, , )
调试输出 (取找到组件数目 (组件句柄))
计次循环首 (取找到组件数目 (组件句柄) － 1, i)
组件 ＝ 取所找到组件 (组件句柄, i)
自定义名字 ＝ 读配置项 (取特定目录 (1) ＋ “按钮标题” ＋ 到文本 (i) ＋ “.ini”, “按钮标题”, “按钮” ＋ 到文本 (i) ＋ “.标题”, )
如果真 (自定义名字 ＝ “”)
到循环尾 ()
组件.标题 ＝ 自定义名字
事件转移 (取事件组件 (), 组件)
计次循环尾 ()
清除组件寻找句柄 (组件句柄)

i支持库列表	支持库注释
spec	特殊功能支持库
shell	操作系统界面功能支持库

.版本 2<br /> .支持库 spec<br /> .支持库 shell<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 组件句柄, 整数型<br /> .局部变量 组件, 按钮<br /> .局部变量 i, 整数型<br /> .局部变量 自定义名字, 文本型<br /> <br /> 组件句柄 ＝ 寻找组件 (_启动窗口, , “按钮”, , )<br /> 调试输出 (取找到组件数目 (组件句柄))<br /> .计次循环首 (取找到组件数目 (组件句柄) － 1, i)<br />     组件 ＝ 取所找到组件 (组件句柄, i)<br />     自定义名字 ＝ 读配置项 (取特定目录 (1) ＋ “按钮标题” ＋ 到文本 (i) ＋ “.ini”, “按钮标题”, “按钮” ＋ 到文本 (i) ＋ “.标题”, )<br />     .如果真 (自定义名字 ＝ “”)<br />         到循环尾 ()<br />     .如果真结束<br />     组件.标题 ＝ 自定义名字<br />     事件转移 (取事件组件 (), 组件)<br /> .计次循环尾 ()<br /> 清除组件寻找句柄 (组件句柄)

试试看


补充内容 (2025-3-24 22:35):
这是寻找所有按钮，如果不全，可能是你创建按钮的上下级有问题导致的

是可可吖

例子.e (1.18 MB, 下载次数: 1)

前天 22:57 上传

点击文件名下载附件

看看是不是你想要的，拿去自己改吧

Ruang

例子 3.e (992.69 KB, 下载次数: 2)

前天 23:06 上传

点击文件名下载附件


你想要的应该是这个效果

两种数据保存方案
1在程序种直接修改数据，再保存到本地
2保存到本地数据，再按钮单独读取


补充内容 (2025-3-24 23:09):
补充一下，按照你的要求鼠标右击弹出窗口1

补充内容 (2025-3-24 23:09):
你的要求有点奇怪

Ruang

  

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

变量名	类 型	静态	数组	备 注
组件句柄	整数型
组件	按钮
i	整数型
自定义名字	文本型

组件句柄 ＝ 寻找组件 (_启动窗口, , “按钮”, , )
计次循环首 (取找到组件数目 (组件句柄) － 1, i)
组件 ＝ 取所找到组件 (组件句柄, i)
如果真 (取组件名称 (组件) ≠ “按钮1”)
事件转移 (组件, 按钮1)
自定义名字 ＝ 读配置项 (取特定目录 (1) ＋ “按钮标题” ＋ 到文本 (i) ＋ “.ini”, “按钮标题”, “按钮” ＋ 到文本 (i) ＋ “.标题”, )
如果真 (自定义名字 ＝ “”)
到循环尾 ()
组件.标题 ＝ 自定义名字
计次循环尾 ()
清除组件寻找句柄 (组件句柄)

子程序名	返回值类型	公开	备 注
_按钮1_鼠标右键被放开	逻辑型
参数名	类 型	参考	可空	数组	备 注
横向位置	整数型
纵向位置	整数型
功能键状态	整数型

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

组件 ＝ 取事件组件 ()
全_存储 ＝ 组件.标题
载入 (窗口1, , 真)

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

.版本 2<br /> .支持库 shell<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 组件句柄, 整数型<br /> .局部变量 组件, 按钮<br /> .局部变量 i, 整数型<br /> .局部变量 自定义名字, 文本型<br /> <br /> 组件句柄 ＝ 寻找组件 (_启动窗口, , “按钮”, , )<br /> .计次循环首 (取找到组件数目 (组件句柄) － 1, i)<br />     组件 ＝ 取所找到组件 (组件句柄, i)<br />     .如果真 (取组件名称 (组件) ≠ “按钮1”)<br />         事件转移 (组件, 按钮1)<br />     .如果真结束<br />     自定义名字 ＝ 读配置项 (取特定目录 (1) ＋ “按钮标题” ＋ 到文本 (i) ＋ “.ini”, “按钮标题”, “按钮” ＋ 到文本 (i) ＋ “.标题”, )<br />     .如果真 (自定义名字 ＝ “”)<br />         到循环尾 ()<br />     .如果真结束<br />     组件.标题 ＝ 自定义名字<br /> .计次循环尾 ()<br /> 清除组件寻找句柄 (组件句柄)<br /> <br /> .子程序 _按钮1_鼠标右键被放开, 逻辑型<br /> .参数 横向位置, 整数型<br /> .参数 纵向位置, 整数型<br /> .参数 功能键状态, 整数型<br /> .局部变量 组件, 按钮<br /> <br /> 组件 ＝ 取事件组件 ()<br /> 全_存储 ＝ 组件.标题<br /> 载入 (窗口1, , 真)

linqing4

  

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

按钮1.标题 ＝ 读配置项 (取特定目录 (1) ＋ “按钮标题1.ini”, “按钮标题”, “按钮1.标题”, )
按钮1.标记 ＝ 取特定目录 (1) ＋ “按钮标题1.ini”

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

调试输出 (按钮1.标记)

i支持库列表	支持库注释
shell	操作系统界面功能支持库
spec	特殊功能支持库

.版本 2<br /> .支持库 shell<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 按钮1.标题 ＝ 读配置项 (取特定目录 (1) ＋ “按钮标题1.ini”, “按钮标题”, “按钮1.标题”, )<br /> 按钮1.标记 ＝ 取特定目录 (1) ＋ “按钮标题1.ini”<br /> <br /> <br /> .版本 2<br /> .支持库 spec<br /> <br /> .子程序 _按钮1_被单击<br /> <br /> 调试输出 (按钮1.标记)

一个全局变量直接传递配置文件路径，然后修改窗口直接读取就好了，简单实用。



补充内容 (2025-3-25 07:55):
看错了，以为是右键按钮后，再点击下面的修改按钮的。。。不如上面的事件转移了。

liu2000

Ruang 发表于 2025-3-24 23:08
你想要的应该是这个效果

两种数据保存方案

写到文件 (目录_取特定目录 (3, ) ＋ “/daoju2.mac”, 到字节集 (新文本))  ' 写出需要用的宏
写配置项 (取特定目录 (3) ＋ “按钮标题2.ini”, “按钮标题”, “按钮2.标题”, _启动窗口.按钮2.标题 ＋ 编辑框1.内容)  ' 写出按钮名称，刀具名称

_启动窗口.按钮2.标题 ＝ 编辑框1.内容


大佬这个要每一个按钮都要发送一下配置项的，不然保存的永远都是第一个按钮，第三个按钮就是

写到文件 (目录_取特定目录 (3, ) ＋ “/daoju3.mac”, 到字节集 (新文本))  ' 写出需要用的宏
写配置项 (取特定目录 (3) ＋ “按钮标题3.ini”, “按钮标题”, “按钮3.标题”, _启动窗口.按钮3.标题 ＋ 编辑框1.内容)  ' 写出按钮名称，刀具名称


现在能右击打开那个窗口了，不能打开那个保存那个按钮的名称，也没写出/daoju3.mac文件

daoju3.mac文件是刀具参数，窗口1保存出来的，daoju1.mac和daoju2.mac


这个原因我才想创建20个窗口的，我想不通怎么实现按钮1通过窗口1修改参数后保存，按钮2再通过窗口1修改参数保存，因为窗口1就一个，要改的按钮有20个，

liu2000

Ruang 发表于 2025-3-25 08:52
我想不通怎么实现按钮1通过窗口1修改参数后保存，按钮2再通过窗口1修改参数保存，因为窗口1就一个，要改 ...

求个例子呀大佬~

aipca

改成超级列表操作，明显要方便多了，写个例子，一些楞节自行在修改一下。还可以增加刀头的图片项，实现图文对应。