| 以文本方式查看主题 - Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp) -- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2) ---- 关于 panel 打印 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=104234) |
| -- 作者：zhsenchzhi -- 发布时间：2017/7/25 23:07:00 -- 关于 panel 打印 一个 panel 比较长，有扩展尺寸，发现 当 这个panel 滚动到底部，上面部分显示不出来的时候，这时候 打印，居然 打印不出来上半部分，但是 上半部分显示，下半部分不显示的时候， 能全部打印出来，导出到pdf 也是这种情况，请问这是怎么回事？ 另外就是，如果这个 panel 里面 如果还有另外一个 子panel， 则子panel 里面 的内容也不能打印出来，如果子panel以及子子panel里的内容也要打印出来，该怎么办呢？ 代码如下： Dim p As WinForm.Panel = Forms("会议_季报编辑窗口").Controls("PanelMiddle") Forms("会议_季报编辑窗口").Page.PaperKind = 9 \'纸张类型改为A4 Forms("会议_季报编辑窗口").Page.LeftMargin = 1 \'设置左边距 Forms("会议_季报编辑窗口").Page.RightMargin = 1 \'设置右边距 Forms("会议_季报编辑窗口").Page.TopMargin = 30 \'设置上边距 Forms("会议_季报编辑窗口").Page.BottomMargin = 20 \'设置下边距 Dim doc As PrintDoc = Forms("会议_季报编辑窗口").GernatePrintDoc(p) doc.Preview() [此贴子已经被作者于2017/7/26 0:31:34编辑过]
|
| -- 作者：有点甜 -- 发布时间：2017/7/26 9:31:00 -- 在顶部放一个按钮，然后打印前，写代码 Forms("会议_季报编辑窗口").controls("Button1").select |
| -- 作者：zhsenchzhi -- 发布时间：2017/7/26 10:38:00 -- 另外就是，如果这个 panel 里面 如果还有另外一个 子panel， 则子panel 里面 的内容也不能打印出来，如果子panel以及子子panel里的内容也要打印出来，该怎么办呢？ 这个该怎么办呢？
|
| -- 作者：有点甜 -- 发布时间：2017/7/26 12:37:00 -- 不行，只能打印一个panel。
如果确实要做，自己实现窗口打印功能。
http://foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=101744&skin=0
|