精易论坛

标题: 关于 EXUI 超级列表框EX.事件方面问题。大神请赐教 [打印本页]

---

作者: zhangx1aoxi    时间: 2023-3-7 13:28
标题: 关于 EXUI 超级列表框EX.事件方面问题。大神请赐教
先用精易写的超级列表框事件（当前表项被改变），现在想改换为EXUI,超级列表框., 但是没有当前表项被改变。
精易超级列表框

  

子程序名	返回值类型	公开	备 注
_超级列表框6_当前表项被改变

变量名	类 型	静态	数组	备 注
i	整数型
导出	文本型
文件号	整数型

当前表项被改变 ()

子程序名	返回值类型	公开	备 注
当前表项被改变	文本型
参数名	类 型	参考	可空	数组	备 注
现行选中项	整数型

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

.版本 2<br /> .子程序 _超级列表框6_当前表项被改变<br /> .局部变量 i, 整数型<br /> .局部变量 导出, 文本型<br /> .局部变量 文件号, 整数型<br /> <br /> 当前表项被改变 ()<br /> <br /> <br /> <br /> .子程序 当前表项被改变, 文本型<br /> .参数 现行选中项, 整数型<br /> .局部变量 sy1, 整数型

精易.png (1.7 KB, 下载次数: 0)

下载附件

2023-3-7 13:25 上传

精易超级列表框

EXUI.png (1.31 KB, 下载次数: 0)

下载附件

2023-3-7 13:26 上传

超级列表框EX

---

作者: 15039346689    时间: 2023-3-7 13:59

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
集_项目索引	整数型

子程序名	返回值类型	公开	备 注
_超级列表框EX1_项目左键单击	整数型
参数名	类 型	参考	可空	数组	备 注
项目索引	整数型
列索引	整数型
元素索引	整数型
事件来源	整数型

如果真 (项目索引 ≠ 集_项目索引)
' 这里应该就是表项被改变吧，你测试下
集_项目索引 ＝ 项目索引

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

集_项目索引 ＝ -2

.版本 2<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 集_项目索引, 整数型<br /> <br /> .子程序 _超级列表框EX1_项目左键单击, 整数型<br /> .参数 项目索引, 整数型<br /> .参数 列索引, 整数型<br /> .参数 元素索引, 整数型<br /> .参数 事件来源, 整数型<br /> <br /> .如果真 (项目索引 ≠ 集_项目索引)<br />     ' 这里应该就是表项被改变吧，你测试下<br /> <br /> .如果真结束<br /> 集_项目索引 ＝ 项目索引<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 集_项目索引 ＝ -2

---

作者: zhangx1aoxi    时间: 2023-3-7 14:02

15039346689 发表于 2023-3-7 13:59
[e=0].版本 2

.程序集 窗口程序集_启动窗口

好的,我搬完砖马上测试

---

作者: 15039346689    时间: 2023-3-7 15:04
超级列表框EX当前表项被改变.e (7.81 KB, 下载次数: 11)

2023-3-7 15:01 上传

点击文件名下载附件

  

---

作者: zhangx1aoxi    时间: 2023-3-7 15:18

15039346689 发表于 2023-3-7 15:04

老大，你的例子 我启动报错,我的是2022年的exui和2018年的报错闪退

---

作者: zhangx1aoxi    时间: 2023-3-7 15:20

15039346689 发表于 2023-3-7 15:04

好像大佬是VIP库,

---

作者: 15039346689    时间: 2023-3-7 15:28

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
集_项目索引	整数型

子程序名	返回值类型	公开	备 注
_超级列表框EX1_项目左键单击	整数型
参数名	类 型	参考	可空	数组	备 注
项目索引	整数型
列索引	整数型
元素索引	整数型
事件来源	整数型

如果真 (事件来源 ＝ 2)
如果真 (项目索引 ≠ 集_项目索引)
调试输出 (超级列表框EX1.现行选中项)  ' --------------------这里是项目被改变事件
集_项目索引 ＝ 项目索引

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

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

集_项目索引 ＝ -2
计次循环首 (10, i)  ' ------------------- 插入表项
超级列表框EX1.插入项目 (i － 1, 1, , 30)
超级列表框EX1.置项目文本 (i － 1, 1, 到文本 (i))
计次循环尾 ()

子程序名	返回值类型	公开	备 注
_按钮EX1_鼠标左键单击	整数型		-------------------通过按钮改变表项
参数名	类 型	参考	可空	数组	备 注
坐标x	整数型
坐标y	整数型
保留参数1	整数型
保留参数2	整数型

超级列表框EX1.现行选中项 ＝ 超级列表框EX1.现行选中项 ＋ 1
_超级列表框EX1_项目左键单击 (超级列表框EX1.现行选中项, 1, 1, 2)
集_项目索引 ＝ 超级列表框EX1.现行选中项

i支持库列表	支持库注释
spec	特殊功能支持库
ExuiKrnln	(未知支持库)

.版本 2<br /> .支持库 spec<br /> .支持库 ExuiKrnln<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 集_项目索引, 整数型<br /> <br /> .子程序 _超级列表框EX1_项目左键单击, 整数型<br /> .参数 项目索引, 整数型<br /> .参数 列索引, 整数型<br /> .参数 元素索引, 整数型<br /> .参数 事件来源, 整数型<br /> <br /> .如果真 (事件来源 ＝ 2)<br />     .如果真 (项目索引 ≠ 集_项目索引)<br />         调试输出 (超级列表框EX1.现行选中项)  ' --------------------这里是项目被改变事件<br />     .如果真结束<br />     集_项目索引 ＝ 项目索引<br /> .如果真结束<br /> <br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 i, 整数型<br /> <br /> 集_项目索引 ＝ -2<br /> .计次循环首 (10, i)  ' ------------------- 插入表项<br />     超级列表框EX1.插入项目 (i － 1, 1, , 30)<br />     超级列表框EX1.置项目文本 (i － 1, 1, 到文本 (i))<br /> .计次循环尾 ()<br /> <br /> .子程序 _按钮EX1_鼠标左键单击, 整数型, , -------------------通过按钮改变表项<br /> .参数 坐标x, 整数型<br /> .参数 坐标y, 整数型<br /> .参数 保留参数1, 整数型<br /> .参数 保留参数2, 整数型<br /> <br /> 超级列表框EX1.现行选中项 ＝ 超级列表框EX1.现行选中项 ＋ 1<br /> _超级列表框EX1_项目左键单击 (超级列表框EX1.现行选中项, 1, 1, 2)<br /> 集_项目索引 ＝ 超级列表框EX1.现行选中项

补充内容 (2023-3-7 15:30):
就这些东西,我好像是官网下载的EX,不影响吧

---

作者: zhangx1aoxi    时间: 2023-3-7 16:04

15039346689 发表于 2023-3-7 15:28
[e=0].版本 2
.支持库 spec
.支持库 ExuiKrnln

你的例子 运行就中止了

VX图片_20230307160338.png (17.99 KB, 下载次数: 0)

下载附件

2023-3-7 16:04 上传

---

作者: 小书臣    时间: 2025-3-24 15:02
好的,我搬完砖马上测试

---

欢迎光临 精易论坛 (https://125.confly.eu.org/)

Powered by Discuz! X3.4