易语言如何通过按钮来新建一个高级表格在高级选择夹里

as474888778

易语言如何实现通过按钮来增加高级选择夹的子夹，并新建一个高级表格在增加的子夹里。
演示操作(复制高级表格).e (4.9 KB, 下载次数: 8)

2022-2-15 14:16 上传

点击文件名下载附件

亮蓝色的风

as474888778 发表于 2022-2-15 18:20
出错了，下载不了，可否重新上传

选择夹表格.e (6.15 KB, 下载次数: 9)

2022-2-15 23:16 上传

点击文件名下载附件

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
高级表格数组	高级表格	0

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

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

加入成员 (高级表格数组, 高级表格1)
复制窗口组件 (高级表格1, 高级表格数组 [1])
高级表格数组 [1].置父窗口 (高级选择夹1)
事件转移 (高级表格数组 [1], 高级表格1)
高级表格数组 [1].左边 ＝ 0
高级表格数组 [1].顶边 ＝ 高级选择夹1.子夹头高度
高级表格数组 [1].宽度 ＝ 高级选择夹1.宽度
高级表格数组 [1].高度 ＝ 高级选择夹1.高度 － 高级选择夹1.子夹头高度
高级表格数组 [1].可视 ＝ 真

子程序名	返回值类型	公开	备 注
_高级表格1_光标位置改变

变量名	类 型	静态	数组	备 注
高级表格	高级表格

高级表格 ＝ 取事件组件 ()
调试输出 (高级选择夹1.现行子夹, 取组件名称 (高级表格), 高级表格.取光标行号 (), 高级表格.取光标列号 ())

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

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

加入成员 (高级表格数组, 高级表格1)
k ＝ 取数组成员数 (高级表格数组)
复制窗口组件 (高级表格1, 高级表格数组 [k])
高级表格数组 [k].左边 ＝ 0
高级表格数组 [k].顶边 ＝ 高级选择夹1.子夹头高度
高级表格数组 [k].宽度 ＝ 高级选择夹1.宽度
高级表格数组 [k].高度 ＝ 高级选择夹1.高度 － 高级选择夹1.子夹头高度
高级表格数组 [k].置父窗口 (高级选择夹1)
高级选择夹1.现行子夹 ＝ 高级选择夹1.加入子夹 (到文本 (高级选择夹1.取子夹数目 () ＋ 1), , , , )

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

如果 (高级选择夹1.现行子夹 ＞ 0)
高级表格数组 [高级选择夹1.现行子夹 ＋ 1].销毁 ()
删除成员 (高级表格数组, 高级选择夹1.现行子夹 ＋ 1, 1)
高级选择夹1.删除子夹 (高级选择夹1.现行子夹)
_高级选择夹1_子夹被改变 ()
信息框 (“第一个不能删除”, 0, , )

子程序名	返回值类型	公开	备 注
_高级选择夹1_将改变子夹	逻辑型
参数名	类 型	参考	可空	数组	备 注
子夹索引	整数型

如果真 (高级选择夹1.现行子夹 ＜ 取数组成员数 (高级表格数组))
如果真 (是否已创建 (高级表格数组 [高级选择夹1.现行子夹 ＋ 1]))
高级表格数组 [高级选择夹1.现行子夹 ＋ 1].可视 ＝ 假

子程序名	返回值类型	公开	备 注
_高级选择夹1_子夹被改变

如果真 (高级选择夹1.现行子夹 ＜ 取数组成员数 (高级表格数组))
如果真 (是否已创建 (高级表格数组 [高级选择夹1.现行子夹 ＋ 1]))
高级表格数组 [高级选择夹1.现行子夹 ＋ 1].可视 ＝ 真

i支持库列表	支持库注释
eGrid	高级表格支持库
iext3	扩展界面支持库三
spec	特殊功能支持库

.版本 2<br /> .支持库 eGrid<br /> .支持库 iext3<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 高级表格数组, 高级表格, , "0"<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 k, 整数型<br /> <br /> 加入成员 (高级表格数组, 高级表格1)<br /> 复制窗口组件 (高级表格1, 高级表格数组 [1])<br /> 高级表格数组 [1].置父窗口 (高级选择夹1)<br /> 事件转移 (高级表格数组 [1], 高级表格1)<br /> 高级表格数组 [1].左边 ＝ 0<br /> 高级表格数组 [1].顶边 ＝ 高级选择夹1.子夹头高度<br /> 高级表格数组 [1].宽度 ＝ 高级选择夹1.宽度<br /> 高级表格数组 [1].高度 ＝ 高级选择夹1.高度 － 高级选择夹1.子夹头高度<br /> 高级表格数组 [1].可视 ＝ 真<br /> <br /> .子程序 _高级表格1_光标位置改变<br /> .局部变量 高级表格, 高级表格<br /> <br /> 高级表格 ＝ 取事件组件 ()<br /> 调试输出 (高级选择夹1.现行子夹, 取组件名称 (高级表格), 高级表格.取光标行号 (), 高级表格.取光标列号 ())<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 k, 整数型<br /> <br /> 加入成员 (高级表格数组, 高级表格1)<br /> k ＝ 取数组成员数 (高级表格数组)<br /> 复制窗口组件 (高级表格1, 高级表格数组 [k])<br /> 高级表格数组 [k].左边 ＝ 0<br /> 高级表格数组 [k].顶边 ＝ 高级选择夹1.子夹头高度<br /> 高级表格数组 [k].宽度 ＝ 高级选择夹1.宽度<br /> 高级表格数组 [k].高度 ＝ 高级选择夹1.高度 － 高级选择夹1.子夹头高度<br /> 高级表格数组 [k].置父窗口 (高级选择夹1)<br /> 高级选择夹1.现行子夹 ＝ 高级选择夹1.加入子夹 (到文本 (高级选择夹1.取子夹数目 () ＋ 1), , , , )<br /> <br /> <br /> .子程序 _按钮2_被单击<br /> <br /> .如果 (高级选择夹1.现行子夹 ＞ 0)<br />     高级表格数组 [高级选择夹1.现行子夹 ＋ 1].销毁 ()<br />     删除成员 (高级表格数组, 高级选择夹1.现行子夹 ＋ 1, 1)<br />     高级选择夹1.删除子夹 (高级选择夹1.现行子夹)<br />     _高级选择夹1_子夹被改变 ()<br /> .否则<br />     信息框 (“第一个不能删除”, 0, , )<br /> .如果结束<br /> <br /> <br /> .子程序 _高级选择夹1_将改变子夹, 逻辑型<br /> .参数 子夹索引, 整数型<br /> <br /> .如果真 (高级选择夹1.现行子夹 ＜ 取数组成员数 (高级表格数组))<br />     .如果真 (是否已创建 (高级表格数组 [高级选择夹1.现行子夹 ＋ 1]))<br />         高级表格数组 [高级选择夹1.现行子夹 ＋ 1].可视 ＝ 假<br />     .如果真结束<br /> <br /> .如果真结束<br /> <br /> <br /> .子程序 _高级选择夹1_子夹被改变<br /> <br /> .如果真 (高级选择夹1.现行子夹 ＜ 取数组成员数 (高级表格数组))<br />     .如果真 (是否已创建 (高级表格数组 [高级选择夹1.现行子夹 ＋ 1]))<br />         高级表格数组 [高级选择夹1.现行子夹 ＋ 1].可视 ＝ 真<br />     .如果真结束<br /> <br /> .如果真结束

浅浅`

复制组件（）

as474888778

浅浅` 发表于 2022-2-15 15:11
复制组件（）

复制窗口组件没用，子夹1的高级表格复制到子夹2里，点击子夹1再点击子夹2时，这本表格就没了，不能永久存在

帅气与大侠

这个很麻烦的，因为选择夹的工作原理不是真的有很多个子夹，他只是在表头画了很多个分组，内容区域是公共区域，通过切换不同选择夹来显示不同的组件。

使用：复制窗口组件（高级表格，高级表格变量）
高级表格变量.移动（自己调整位置）
高级表格变量.可视=真
窗口_置父（高级表格变量.取窗口句柄(),高级选择夹.取窗口句柄()）

这样就在高级选择夹创建了一个新的表格了，但是切换子夹的时候这个新创建的表格就会消失。不是真的消失，只是组件的可视被选择夹默认设置为假了。

等于选择夹里面的原先组件，选择夹自己内部控制显示隐藏，你自己创建进去的，他不认识，就得你自己控制，你需要通过子夹被改变事件，来根据子夹索引。重新显示隐藏对应子夹得组件

亮蓝色的风

根据地板大佬的解说 尝试做了一下
选择夹表格.e (6.15 KB, 下载次数: 27)

2022-2-15 17:16 上传

点击文件名下载附件

as474888778

aqwvwv 发表于 2022-2-15 15:41
这个很麻烦的，因为选择夹的工作原理不是真的有很多个子夹，他只是在表头画了很多个分组，内容区域是公共区 ...

感觉他并没有复制到组件，只是共用一个组件

as474888778

亮蓝色的风 发表于 2022-2-15 17:17
根据地板大佬的解说 尝试做了一下

出错了，下载不了，可否重新上传

liuyun60

复制窗口组件后给他置父窗口到高级选择夹，注意是置父窗口到高级选择夹，并不能置父窗口到子夹，要想让复制的组件对应指定子夹你需要添加一个_高级选择夹1_鼠标左键被放开事件，在事件中将你需要显示的表格可视设置为真，其他不需要显示的表格可视设置为假