- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 打印凭证时的表头如何居中 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=127569)
-- 发布时间：2018/11/16 17:58:00
-- 打印凭证时的表头如何居中
此主题相关图片如下：qq截图20181116175609.png
-- 发布时间：2018/11/16 17:59:00
--
请问老师：打印凭证时，上述表头如何居中？
-- 发布时间：2018/11/16 18:05:00
--
以下是引用发财在2018/11/16 17:59:00的发言：
请问老师：打印凭证时，上述表头如何居中？
Dim doc As PrintDoc = e.Form.GernatePrintDoc()
For Each c As Object In doc.body.children
If typeof c Is prt.RenderTable Then
c.Rows(0).Style.TextAlignHorz = prt.AlignHorzEnum.Center \'第一行内容水平居中
c.Rows(1).Style.TextAlignHorz = prt.AlignHorzEnum.Center \'第一行内容水平居中
End If
Next
doc.Preview()
-- 发布时间：2018/11/19 14:51:00
--
老师，我试来，不行的，是否可以帮我改下？
-- 发布时间：2018/11/19 15:05:00
--
以下是引用发财在2018/11/19 14:51:00的发言：
老师，我试来，不行的，是否可以帮我改下？
不可能不行。具体实例发上来测试。
-- 发布时间：2018/11/19 15:20:00
--
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目2.table |
-- 发布时间：2018/11/19 15:35:00
--
你要怎么居中，你直接移动控件的位置不就好了么？
| 下载信息 [文件大小： 下载次数： ] | |
| 点击浏览该文件:管理项目2.table |
-- 发布时间：2018/11/19 15:48:00
--
摘要、金额、备注居中
-- 发布时间：2018/11/19 16:21:00
--
Dim doc As PrintDoc = e.Form.GernatePrintDoc(e.Form.controls("panel1"))
\'Dim doc As PrintDoc = e.Form.GernatePrintDoc()
For Each c As Object In doc.body.children
If typeof c Is prt.RenderTable Then
c.Cols(0).Style.TextAlignHorz = prt.AlignHorzEnum.Center
c.Cols(1).Style.TextAlignHorz = prt.AlignHorzEnum.Center
c.Cols(2).Style.TextAlignHorz = prt.AlignHorzEnum.Center
End If
Next
doc.Preview()
-- 发布时间：2018/11/22 7:31:00
--
老师上述代码只能表格内容居中，但表头不能居中