以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 关于 panel 打印 (http://foxtable.net/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
|