列表的简单应用

dongou

类 主窗口类 继承 窗口类
        [绑定信息] //IDE自动生成的UI绑定信息(UI变量绑定,事件绑定), 不建议新人手动修改, 可收缩隐藏
                [列表类, _列表1, "列表1"]
                        [元素事件_列表项选择, 列表项选择_列表1, 1]
                        [元素事件_列表头项点击, 列表头项点击_列表1, 1]
        文本型  _布局文件 = "main.xml" //关联UI布局文件
        
        函数 整型 运行() //自动处理 加载布局文件, 绑定变量, 注册事件
                载入数据()
                显示(TRUE)
               
                返回 0
        函数 空类型 载入数据()
                _列表1.创建数据适配器(20)        //指定列数
                _列表1.列表头创建数据适配器()
                _列表1.启用模板复用(真)

                //_列表1.置项模板文件("list_cs.xml")        //自定义项模板

                计次循环 (整型 i = 1; 20)        //填充表头
                        _列表1.添加列文本(80, "name" + 到文本(i), "列" + 到文本(i))
               
                计次循环 (整型 i = 1; 9000)        //填充表项
                        整型 行索引 = _列表1.添加项文本("第" + 到文本(i) + "行")
                        计次循环 (整型 j = 1; 20)
                                _列表1.置项文本(行索引, j, "第" + 到文本(j + 1) + "列数据")

        函数 UI事件 整型 列表项选择_列表1(元素句柄 来源句柄, 整型 iItem,逻辑型 *是否拦截)
                调试输出("第" + 到文本(iItem + 1) + "行被选择了")
                返回 0
        函数 UI事件 整型 列表头项点击_列表1(元素句柄 来源句柄, 整型 iItem, 逻辑型 *是否拦截)
                调试输出("第" + 到文本(iItem + 1) + "列表头被单击了")
                返回 0


函数 整型 入口函数_窗口()
        炫彩_初始化(TRUE)
        炫彩_启用自动重绘UI(TRUE) //当修改UI后将自动调用重绘函数更新UI
        炫彩_添加搜索路径("D:\\炫彩IDE\\MyProject\\测试")
        #加载资源文件  //指示在此处自动加载资源文件, 根据项目属性设置, 从文件 或 从内存
        主窗口类  主窗口
        主窗口.运行()

        炫彩_运行()
        炫彩_退出()
        返回 0



// 我的学习笔记
测试.zip (32.02 KB, 下载次数: 40)

2024-1-24 13:55 上传

点击文件名下载附件
源码

xshn

感谢大佬 提供源码学习，请问这个出错的语句是用了哪个模块？

dongou

xshn 发表于 2024-1-24 14:28
感谢大佬 提供源码学习，请问这个出错的语句是用了哪个模块？

我也是在学习，一起进步。只用了基础模块、炫彩界面库、炫彩界面库-类 这三个

易团雪

xshn 发表于 2024-1-24 14:28
感谢大佬 提供源码学习，请问这个出错的语句是用了哪个模块？

更新基础模块就可以了

xshn

确实是模块的问题，更新了就正常了，请问这个列表的列标题 能在属性里直接设置吗？

dongou

类 主窗口类 继承 窗口类
        [绑定信息] //IDE自动生成的UI绑定信息(UI变量绑定,事件绑定), 不建议新人手动修改, 可收缩隐藏
                [列表类, _列表1, "列表1"]
                        [元素事件_列表项选择, 列表项选择_列表1, 1]
                        [元素事件_列表头项点击, 列表头项点击_列表1, 1]
                [按钮类, _修改项文本, "修改项文本"]
                        [元素事件_按钮点击, 按钮点击_修改项文本, 1]
                [按钮类, _删除表项, "删除表项"]
                        [元素事件_按钮点击, 按钮点击_删除表项, 1]
                [按钮类, _插入表项, "插入表项"]
                        [元素事件_按钮点击, 按钮点击_插入表项, 1]
                [按钮类, _添加表项, "添加表项"]
                        [元素事件_按钮点击, 按钮点击_添加表项, 1]
                [按钮类, _选中表项, "选中表项"]
                        [元素事件_按钮点击, 按钮点击_选中表项, 1]
        文本型  _布局文件 = "main.xml" //关联UI布局文件
       
        函数 整型 运行() //自动处理 加载布局文件, 绑定变量, 注册事件
                载入数据()
                显示(TRUE)
               
                返回 0
        函数 空类型 载入数据()
                _列表1.创建数据适配器(20)        //指定列数
                _列表1.列表头创建数据适配器()
                _列表1.启用模板复用(真)

                _列表1.置项模板文件("list_cs.xml")        //自定义项模板

                计次循环 (整型 i = 1; 20)        //填充表头
                        _列表1.添加列文本(100, "name" + 到文本(i), "列" + 到文本(i))
               
                计次循环 (整型 i = 1; 9000)        //填充表项
                        整型 行索引 = _列表1.添加项文本("第" + 到文本(i) + "行")
                        计次循环 (整型 j = 1; 20)
                                _列表1.置项文本(行索引, j, "第" + 到文本(j + 1) + "列数据")



        函数 UI事件 整型 列表项选择_列表1(元素句柄 来源句柄, 整型 iItem,逻辑型 *是否拦截)
                调试输出("第" + 到文本(iItem + 1) + "行被选择了")
                返回 0
        函数 UI事件 整型 列表头项点击_列表1(元素句柄 来源句柄, 整型 iItem, 逻辑型 *是否拦截)
                调试输出("第" + 到文本(iItem + 1) + "列表头被单击了")
                返回 0
        函数 UI事件 整型 按钮点击_修改项文本(元素句柄 来源句柄, 逻辑型 *是否拦截)
                调试输出(_列表1.取选择项())
                如果 (_列表1.取选择项()== -1)
                        消息框("请先选择要修改的表项")
                        返回 0
                _列表1.置项文本(_列表1.取选择项(), 1, "被修改了")
                _列表1.刷新指定项(_列表1.取选择项())
                返回 0
        函数 UI事件 整型 按钮点击_删除表项(元素句柄 来源句柄, 逻辑型 *是否拦截)
                如果 (_列表1.取选择项()== -1)
                        消息框("请先选择要修改的表项")
                        返回 0
                _列表1.删除项(_列表1.取选择项())
                _列表1.重绘()
                返回 0
        函数 UI事件 整型 按钮点击_插入表项(元素句柄 来源句柄, 逻辑型 *是否拦截)
                整型 行索引 = _列表1.插入项文本(_列表1.取选择项(), "插入的表项1")
                _列表1.置项文本(行索引, 1, "插入的表项2")
                _列表1.置项文本(行索引, 2, "插入的表项3")
                _列表1.重绘()
                返回 0
        函数 UI事件 整型 按钮点击_添加表项(元素句柄 来源句柄, 逻辑型 *是否拦截)
                整型 行索引 = _列表1.添加项文本("新增的表项1")        //添加到列表最后
                _列表1.置项文本(行索引, 1, "新增的表项2")
                _列表1.置项文本(行索引, 2, "新增的表项3")
                _列表1.调整布局()
                _列表1.滚动到底部()
                _列表1.重绘()
                返回 0
        函数 UI事件 整型 按钮点击_选中表项(元素句柄 来源句柄, 逻辑型 *是否拦截)
                _列表1.置选择项(5)        //选中第6行
                返回 0


函数 整型 入口函数_窗口()
        炫彩_初始化(TRUE)
        炫彩_启用自动重绘UI(TRUE) //当修改UI后将自动调用重绘函数更新UI
        炫彩_添加搜索路径("D:\\炫彩IDE\\MyProject\\测试")
        #加载资源文件  //指示在此处自动加载资源文件, 根据项目属性设置, 从文件 或 从内存
        主窗口类  主窗口
        主窗口.运行()

        炫彩_运行()
        炫彩_退出()
        返回 0


测试2.zip (32.45 KB, 下载次数: 32)

2024-1-24 19:19 上传

点击文件名下载附件

numbersir

对学习很友好的源码，支持一下

fjwenbin

可以出个选项卡的例子吗