- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- [求助]专业报表，该如何使用精确定位到第3页？ (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=169410)
-- 发布时间：2021/6/15 15:55:00
-- [求助]专业报表，该如何使用精确定位到第3页？
对象都是按顺序加入到报表中的，只能通过调整排列方式以及相互间隔，来间接影响对象的位置。
有的时候，我们会需要精确定位，例如单据套打。
精确定位的实现很简单，先指定对象的坐标位置，然后再加入到报表中即可。
我有一个图片对象，在第一页和第二页都不用打印，只要在第三页打印，使用的是A4纸
我用对象的X和Y属性进行定位时，发现只能在第一页进行定位，后面的无法定位，超出第一页的高度就无法显示了，
该如何使用精确定位到第3页？
-- 发布时间：2021/6/15 15:59:00
--
贴出具体代码说明
-- 发布时间：2021/6/15 16:21:00
--
此主题相关图片如下：图片1.png
上传 了示例代码，图片要打印都第四页的右上角的一块区域
[此贴子已经被作者于2021/6/15 16:59:05编辑过]
-- 发布时间：2021/6/15 16:52:00
--
和rm9 一样添加到表格里即可
Dim rm9 As New prt.RenderImage \'定义一个图片对象
rm9.Image = GetImage("001.png") \'设置图片
rt.cells(rt.Rows.Count,0).RenderObject = rm9
Dim rm10 As New prt.RenderImage \'定义一个图片对象
rm10.Image = GetImage("001.png") \'设置图片
rt.cells(rt.Rows.Count,4).RenderObject = rm10
rt.Rows(rt.Rows.Count-1).Height = 13 & "mm" \'设置首行高度为13mm
rt.Cells(rt.Rows.Count-1,0).SpanCols = 3 \'\'第1行第所有单元格为一个完整单元格.
rt.Cells(rt.Rows.Count-1,4).SpanCols = 4
rt.Rows(rt.Rows.Count-1).Style.GridLines.Bottom = new Prt.LineDef(1,Color.DimGray) \'设置下划线为深灰色
-- 发布时间：2021/6/15 16:58:00
--
这样不好看，能不能用 x 和 Y 定位的办法呢，这样自由些，也可以用排出好看的效果
-- 发布时间：2021/6/15 17:07:00
--
除非手工分页，否则无法定位。也可以考虑把rm9，rm10放到同一个容器里，在容器里可以使用 x 和 Y 定位，在把容器放到表格里
-- 发布时间：2021/6/16 17:50:00
--
单元格就是容器！