虚拟表格例子虚表快速展现数据

易语言 2020-08-18 20:54:09

虚拟表格例子虚表快速展现数据

.子程序 _纵向滚动条1_位置被改变

现行浏览位置 = 纵向滚动条1.位置
刷新虚表显示 ()

.子程序 __启动窗口_创建完毕
.局部变量 测试表项数
.局部变量 i, 整数型

测试表项数 = 10000 × 1
表格显示数 = 20
重定义数组 (虚表数组, 假, 测试表项数)
.计次循环首 (取数组成员数 (虚表数组), i)
虚表数组 [i] = 到文本 (i)
.计次循环尾 ()
现行浏览位置 = 1
纵向滚动条1.最小位置 = 1
纵向滚动条1.最大位置 = 测试表项数 - 表格显示数
刷新虚表显示 ()

.子程序 刷新虚表显示
.局部变量 i, 整数型

列表框1.清空 ()
.变量循环首 (现行浏览位置, 现行浏览位置 + 表格显示数, 1, i)
列表框1.加入项目 (虚表数组 [i], 0)
.变量循环尾 ()