|
重新开个帖子,让更多需要的人看见,如果浪费资源,请删除。
动态设置分组,打印布满页面
代码如下:如果显示不一致,请搜寻我的帖子找下NPK文件
.版本 2
.支持库 gregn50
.支持库 iext
.子程序 _按钮4_被单击
.局部变量 报表, 报表
.局部变量 m, 整数型
.局部变量 i, 整数型
.局部变量 ii, 整数型
报表.从文件加载报表 (取运行目录 () + “\Grid++Report.grf”)
.如果真 (选择框1.选中)
.计次循环首 (3, m)
报表.获取明细网格 ().获取分组集合 ().获取项目 (m).获取分组头 ().保持同页 = 假
.计次循环尾 ()
.如果真结束
报表.准备添加记录 ()
.计次循环首 (超级列表框1.取表项数 (), i)
报表.获取明细网格 ().获取数据集 ().追加 ()
.计次循环首 (4, ii)
报表.获取明细网格 ().获取数据集 ().获取字段集合 ().获取项目 (ii).字符值 = 超级列表框1.取标题 (i - 1, ii - 1)
.计次循环尾 ()
报表.获取明细网格 ().获取数据集 ().提交 ()
.计次循环尾 ()
报表.打印预览 (真)
点击进入下载-新建文件.rar |
|