高级表格 限制显示行数记录例子
.版本 2
.支持库 eGrid
.程序集 窗口程序集_启动窗口
.子程序 __启动窗口_创建完毕
计算 ()
监控高级表格2.置数据 (0, 1, 1, “数值”)
监控高级表格2.置数据 (0, 2, 1, “数值1”)
监控高级表格2.置数据 (0, 3, 1, “数值2”)
监控高级表格2.置数据 (0, 4, 1, “数值3”)
.子程序 计算
.局部变量 行号变量, 整数型
.计次循环首 (监控高级表格2.行数 - 1, 行号变量)
监控高级表格2.置数据 (行号变量, 1, 1, “001”)
监控高级表格2.置数据 (行号变量, 2, 1, “002”)
监控高级表格2.置数据 (行号变量, 3, 1, “003”)
监控高级表格2.置数据 (行号变量, 4, 1, “004”)
.计次循环尾 ()
.子程序 _按钮1_被单击
表格限制行数 (监控高级表格2, 到整数 (编辑框1.内容))
.子程序 表格限制行数
.参数 表格容器, 高级表格
.参数 保留行数, 整数型
.局部变量 计次, 整数型
.局部变量 多出的行, 整数型
.计次循环首 (表格容器.行数, 计次)
.如果真 (表格容器.行数 - 1 > 保留行数)
表格容器.删除行 (计次 - 多出的行)
多出的行 = 多出的行 + 1
.如果真结束
.计次循环尾 ()