数组内容写到按钮标题

半夏微凉ゝ

怎么实现把数组成员写到每个按钮标题上并实现上一页下一页
问题源码
问题.e (879.13 KB, 下载次数: 5)

2021-4-24 09:40 上传

点击文件名下载附件



补充内容 (2021-4-24 10:15):
写入已经实现了... 上一页下一页不会搞  

kingtt

已改好.e (138.82 KB, 下载次数: 17)

2021-4-24 10:53 上传

点击文件名下载附件

sunsir

问题.e (978.01 KB, 下载次数: 2)

2021-4-24 10:06 上传

点击文件名下载附件

影知

也可以用复制组件的方式来做


补充内容 (2021-4-24 10:19):
文本[计数*页数]

sunsir

sunsir 发表于 2021-4-24 10:06

翻页的话太麻烦了，自己研究吧~

yq1431

大神无处不在

Eric_Yang

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_窗口1
变量名	类 型	数组	备 注
数组	整数型	0
b	整数型	0
n	整数型

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

变量名	类 型	静态	数组	备 注
i	整数型
a	整数型		0

数组 ＝ { 0, 1, 2, 3, 4, 5, 6, 7, 8, 9 }  ' 定义数组
窗口_枚举所有子窗口 (窗口1.取窗口句柄 (), a, “Button”)  ' 枚举所有按钮句柄
计次循环首 (取数组成员数 (a), i)
判断 (窗口_取控件内容 (a [i]) ＝ “上一页” 或 窗口_取控件内容 (a [i]) ＝ “下一页”)
到循环尾 ()
加入成员 (b, a [i])  ' 过滤掉上一页和下一页两个按钮

计次循环尾 ()
变量循环首 (1, 取数组成员数 (b), 1, n)
窗口_置控件内容 (b [n], 到文本 (数组 [n]))  ' 置控件内容并记录已经是使用了多少数组成员
变量循环尾 ()

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

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

计次循环首 (取数组成员数 (b), i)
判断 (n ＞ 取数组成员数 (数组))
n ＝ 1  ' 当数量大于数组数量  从第一个开始循环


窗口_置控件内容 (b [i], 到文本 (数组 [n]))
n ＝ n ＋ 1  ' 每次执行完 n+1 表示插入数组的下一成员
计次循环尾 ()

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

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

n ＝ n － 取数组成员数 (b) × 2  ' 先减去要插入的数的数量，因为单独减去按钮数量会再插入不会改变数据，所有要减去两倍的按钮数量
判断 (n ≤ 0)
n ＝ 取数组成员数 (数组) ＋ n  ' 当n为负数时等于数组数量减去了多的数量



计次循环首 (取数组成员数 (b), i)
判断 (n ＞ 取数组成员数 (数组))
n ＝ 1



窗口_置控件内容 (b [i], 到文本 (数组 [n]))
n ＝ n ＋ 1
计次循环尾 ()

.版本 2<br /> <br /> .程序集 窗口程序集_窗口1<br /> .程序集变量 数组, 整数型, , "0"<br /> .程序集变量 b, 整数型, , "0"<br /> .程序集变量 n, 整数型<br /> <br /> .子程序 _窗口1_创建完毕<br /> .局部变量 i, 整数型<br /> .局部变量 a, 整数型, , "0"<br /> <br /> 数组 ＝ { 0, 1, 2, 3, 4, 5, 6, 7, 8, 9 }  ' 定义数组<br /> 窗口_枚举所有子窗口 (窗口1.取窗口句柄 (), a, “Button”)  ' 枚举所有按钮句柄<br /> .计次循环首 (取数组成员数 (a), i)<br />     .判断开始 (窗口_取控件内容 (a <i>) ＝ “上一页” 或 窗口_取控件内容 (a <i>) ＝ “下一页”)<br />         到循环尾 ()<br />     .默认<br />         加入成员 (b, a <i>)  ' 过滤掉上一页和下一页两个按钮<br />     .判断结束<br /> <br /> .计次循环尾 ()<br /> .变量循环首 (1, 取数组成员数 (b), 1, n)<br />     窗口_置控件内容 (b [n], 到文本 (数组 [n]))  ' 置控件内容并记录已经是使用了多少数组成员<br /> .变量循环尾 ()<br /> <br /> <br /> .子程序 _按钮6_被单击<br /> .局部变量 i, 整数型<br /> <br /> .计次循环首 (取数组成员数 (b), i)<br />     .判断开始 (n ＞ 取数组成员数 (数组))<br />         n ＝ 1  ' 当数量大于数组数量  从第一个开始循环<br />     .默认<br /> <br />     .判断结束<br />     窗口_置控件内容 (b <i>, 到文本 (数组 [n]))<br />     n ＝ n ＋ 1  ' 每次执行完 n+1 表示插入数组的下一成员<br /> .计次循环尾 ()<br /> <br /> <br /> .子程序 _按钮5_被单击<br /> .局部变量 i, 整数型<br /> <br /> <br /> n ＝ n － 取数组成员数 (b) × 2  ' 先减去要插入的数的数量，因为单独减去按钮数量会再插入不会改变数据，所有要减去两倍的按钮数量<br /> .判断开始 (n ≤ 0)<br />     n ＝ 取数组成员数 (数组) ＋ n  ' 当n为负数时等于数组数量减去了多的数量<br /> .默认<br /> <br /> .判断结束<br /> <br /> .计次循环首 (取数组成员数 (b), i)<br />     .判断开始 (n ＞ 取数组成员数 (数组))<br />         n ＝ 1<br />     .默认<br /> <br />     .判断结束<br /> <br />     窗口_置控件内容 (b <i>, 到文本 (数组 [n]))<br />     n ＝ n ＋ 1<br /> .计次循环尾 ()

用了精易模块