以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  关于窗口打印  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=92955)

--  作者:lk15502
--  发布时间:2016/11/17 9:46:00
--  关于窗口打印
老师,早上好,设计一个窗口用于打印,绑定两个表,预览时空白
Dim d1 As PrintDoc = e.Form.GernatePrintDoc()
Dim Doc As new PrintDoc
For Each c As object In d1.Body.Children
    Doc.Body.Children.Add(c.clone)
Next

Dim ra As new prt.RenderArea
For Each c As object In d1.body.Children
    ra.Children.add(c.clone)
Next
ra.x = 0
ra.Y = 140 \'窗口打印的高度
Doc.body.Children.Add(ra)
Doc.PageSetting.LeftMargin = 0 \'设置左边距
Doc.PageSetting.RightMargin = 0 \'设置右边距
Doc.PageSetting.TopMargin = 0 \'设置上边距
Doc.PageSetting.BottomMargin = 0 \'设置下边距
Doc.Preview()
上面的代码是论坛老师给的,其他地方可以使用,只是都是绑定表得控件,是什么原因?

--  作者:有点青
--  发布时间:2016/11/17 9:57:00
--  
 你的所有控件,不能放在容器里面,不然不能打印。
--  作者:lk15502
--  发布时间:2016/11/17 10:24:00
--  
是这样的,谢谢!