|
发表于 2024-5-26 09:15:48
|
显示全部楼层
浙江省温州市
局_导出列 = { 1, 3, 5 }子程序_超级列表框导入锐浪报表 (超级列表框1, 局_导出列, 1 )|
子程序_超级列表框导入锐浪报表 | | | |
参_超级列表框 | 超级列表框 | | | | 参_导出列 | 整数型 | | | | 参_纸张方向 | 整数型 | | | |
变量名 | 类 型 | 静态 | 数组 | 备 注 | 局_主报表 | 报表 | | | 局_报表头 | 报表头 | | | 局_标题框 | 静态文字框 | | | 局_明细网格 | 明细网格 | | | 局_列 | 列 | | | 局_计次 | 整数型 | | | 局_列计次 | 整数型 | | |
局_主报表. 初始化 ()如果 (是否为空 (参_纸张方向 ) = 真 或 参_纸张方向 = 0 )局_主报表. 置设计时纸张方向 (1 )局_主报表. 置设计时纸张方向 (2 )局_报表头 = 局_主报表. 插入报表头 ()局_标题框 = 局_报表头. 获取部件框集合 (). 增加 ( #部件框类型枚举_静态文字框 ). 获取为静态文字框 ()局_标题框. 置高度 (1.5 )局_标题框. 置宽度 (5 )局_标题框. 获取字体 (). 置字号 (18 )局_标题框. 获取字体 (). 置粗体 (真)局_标题框. 置文本 (“销售明细一览表”)局_标题框. 置居中 ( #居中方式枚举_水平垂直 )局_明细网格 = 局_主报表. 插入明细网格 ()局_明细网格. 置居中显示 (真)局_明细网格. 获取标题行 (). 置背景色 (取颜色值 (231, 222, 157 )) 局_明细网格. 获取标题行 (). 置高度 (1.2 )局_明细网格. 获取内容行 (). 置交替背景色 (15200231 )局_明细网格. 获取标题行 (). 获取字体 (). 置字号 (9 )局_明细网格. 获取内容行 (). 获取字体 (). 置字号 (9 )如果 (是否为空 (参_导出列 ) = 真 或 取数组成员数 (参_导出列 ) = 0 )计次循环首 (参_超级列表框. 取列数 (), 局_计次 )局_明细网格. 获取数据集 (). 增加字段 (参_超级列表框. 取列标题 (局_计次 - 1 ), 1 )局_列 = 局_明细网格. 增加列 (参_超级列表框. 取列标题 (局_计次 - 1 ), 参_超级列表框. 取列标题 (局_计次 - 1 ), 参_超级列表框. 取列标题 (局_计次 - 1 ), 2.4 )局_列. 置可见性 (真)局_列. 获取标题格 (). 置文字对齐方式 (34 ) 局_列. 获取标题格 (). 置文字绕行 (真)局_列. 获取内容格 (). 置文字对齐方式 (34 ) 局_列. 获取内容格 (). 置按需缩小字体 (真)计次循环尾 ()局_主报表. 准备加载数据 ()计次循环首 (参_超级列表框. 取表项数 (), 局_计次 )局_主报表. 获取明细网格 (). 获取数据集 (). 追加 ()计次循环首 (参_超级列表框. 取列数 (), 局_列计次 )局_主报表. 获取明细网格 (). 获取数据集 (). 获取字段集合 (). 获取项目 (到变体型_整数型 (局_列计次 )). 置字符值 (参_超级列表框. 取标题 (局_计次 - 1, 局_列计次 - 1 )) 计次循环尾 ()局_主报表. 获取明细网格 (). 获取数据集 (). 提交 ()计次循环尾 ()计次循环首 (取数组成员数 (参_导出列 ), 局_计次 )局_明细网格. 获取数据集 (). 增加字段 (参_超级列表框. 取列标题 (参_导出列 [局_计次 ] - 1 ), 1 )局_列 = 局_明细网格. 增加列 (参_超级列表框. 取列标题 (参_导出列 [局_计次 ] - 1 ), 参_超级列表框. 取列标题 (参_导出列 [局_计次 ] - 1 ), 参_超级列表框. 取列标题 (参_导出列 [局_计次 ] - 1 ), 2.4 )局_列. 置可见性 (真)局_列. 获取标题格 (). 置文字对齐方式 (34 ) 局_列. 获取标题格 (). 置文字绕行 (真)局_列. 获取内容格 (). 置文字对齐方式 (34 ) 局_列. 获取内容格 (). 置按需缩小字体 (真)计次循环尾 ()局_主报表. 准备加载数据 ()计次循环首 (参_超级列表框. 取表项数 (), 局_计次 )局_主报表. 获取明细网格 (). 获取数据集 (). 追加 ()计次循环首 (取数组成员数 (参_导出列 ), 局_列计次 )局_主报表. 获取明细网格 (). 获取数据集 (). 获取字段集合 (). 获取项目 (到变体型_整数型 (局_列计次 )). 置字符值 (参_超级列表框. 取标题 (局_计次 - 1, 参_导出列 [局_列计次 ] - 1 )) 计次循环尾 ()局_主报表. 获取明细网格 (). 获取数据集 (). 提交 ()计次循环尾 ()局_主报表. 打印预览 (真)
|
|