Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]piao据设计相关问题，15：40更新了 有新问题，请老师看看！


  共有4253人关注过本帖树形打印复制链接

主题：[求助]piao据设计相关问题，15：40更新了 有新问题，请老师看看！
帅哥哟，离线，有人找我吗？
huangfanzi
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：五尾狐 帖子：1105 积分：8967 威望：0 精华：0 注册：2014/10/25 11:24:00 		[求助]piao据设计相关问题，15：40更新了 有新问题，请老师看看！  发帖心情 Post By：2015/7/9 19:38:00 [显示全部帖子]

我在项目中做的出入库单，没用关联表加EXCEL做，而是直接参考了piao据设计中实战演练一来做，请问老师，我多页打印时，能像EXCEL那样做出 “第X页，共Y页”的效果吗？
[此贴子已经被作者于2015/7/10 15:42:26编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
huangfanzi
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：五尾狐 帖子：1105 积分：8967 威望：0 精华：0 注册：2014/10/25 11:24:00 		  发帖心情 Post By：2015/7/9 19:45:00 [显示全部帖子]

专业报表还没学过，暂时也不想研究，先照着改改算了，请问一下，上面的代码我加在什么地方，是加在 窗口中的控件 “打印”按钮中吗？ 

 回到顶部
帅哥哟，离线，有人找我吗？
huangfanzi
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：五尾狐 帖子：1105 积分：8967 威望：0 精华：0 注册：2014/10/25 11:24:00 		  发帖心情 Post By：2015/7/10 8:48:00 [显示全部帖子]

老师，页眉或页脚上的左中右三个区域的字体大小能分开设置吗？

 回到顶部
帅哥哟，离线，有人找我吗？
huangfanzi
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：五尾狐 帖子：1105 积分：8967 威望：0 精华：0 注册：2014/10/25 11:24:00 		  发帖心情 Post By：2015/7/10 10:06:00 [显示全部帖子]

老师，我现在遇到二个piao据设计问题
一是在窗口中的table表在窗口打开时字段标题是居中的，但一打印预览成了左对齐了
二是我设置的piao据是用连打纸哪种，宽度与高分别为241与139.4，我在窗口的页面设计中设置了这个值，但窗口的大小并没有变，这就导致我不能将table排版到合适宽度，处理这个问题的思路应该是什么？
谢谢！
 回到顶部
帅哥哟，离线，有人找我吗？
huangfanzi
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：五尾狐 帖子：1105 积分：8967 威望：0 精华：0 注册：2014/10/25 11:24:00 		  发帖心情 Post By：2015/7/10 15:30:00 [显示全部帖子]

基本上窗口打印搞成了，感谢老师的指导，但又有二个新问题了，请老师看看！
第一，当我选中窗口中的合计行时，点打印按钮就出错了，图如下：

图片点击可在新窗口打开查看此主题相关图片如下：qq截图1.jpg
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下：qq截图2.jpg
图片点击可在新窗口打开查看
以下是打印按钮的代码：
Dim doc As PrintDoc = e.Form.GernatePrintDoc()
Dim rx As New prt.RenderTable
rx.Cells(0,0).Text = "上海金属新材料有限公司"
rx.Cells(1,0).Text = "原料入库通知单"
rx.Cols(0).Style.TextAlignHorz = prt.AlignHorzEnum.Center '设置居中
rx.CellStyle.Spacing.Bottom = 0.5 '底端内容缩进0.5毫米
rx.Cells(0,0).Style.FontSize = 16 '设置字体大小
rx.Cells(1,0).Style.FontSize = 14 '设置字体大小
Doc.PageHeader = rx '作为页眉使用

Dim rx1 As New prt.RenderTable
rx1.Cells(0,0).Text = "制单:" &  CurrentTable.Current("录入人")
rx1.Cells(0,1).Text = "制单时间:" &  CurrentTable.Current("录入时间")
rx1.Cells(0,2).Text = "打印日期:" & Date.Today
rx1.Cells(1,0).Text = " "
rx1.Cells(2,0).Text = "一式四联: 【白色】 财务             【红色】 统计"
rx1.Cells(2,1).Text = "【蓝色】 营销             【黄色】 仓库 "
rx1.Cells(2,2).Text = "第[PageNo]页,共[PageCount]页"
rx1.Cols(0).Style.TextAlignHorz = prt.AlignHorzEnum.Left
rx1.Cols(1).Style.TextAlignHorz = prt.AlignHorzEnum.Center
rx1.Cols(2).Style.TextAlignHorz = prt.AlignHorzEnum.right
rx1.CellStyle.Spacing.Bottom = 0.5 '底端内容缩进0.5毫米
rx1.Style.FontSize = 8 '字体大小为8磅
Doc.PageFooter = rx1 '作为页脚使用

doc.Preview() '预览

第二，我窗口中所看到的汇总行会自动合并相关单元格，可一打印后，就不合并了，导致排版出了问题，如下图：

图片点击可在新窗口打开查看此主题相关图片如下：qq截图3.jpg
图片点击可在新窗口打开查看

[此贴子已经被作者于2015/7/10 15:30:13编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
huangfanzi
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：五尾狐 帖子：1105 积分：8967 威望：0 精华：0 注册：2014/10/25 11:24:00 		  发帖心情 Post By：2015/7/10 16:06:00 [显示全部帖子]

第一个问题解决了，我改用了maintable
第二个问题没解决，现在是空行合并了，table表我用是副本

图片点击可在新窗口打开查看此主题相关图片如下：qq截图4.jpg
图片点击可在新窗口打开查看

[此贴子已经被作者于2015/7/10 16:09:39编辑过]
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04883 秒, 5 次数据查询