Foxtable(狐表)用户栏目专家坐堂 → 关于 panel 打印


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

主题:关于 panel 打印

帅哥哟,离线,有人找我吗?
zhsenchzhi
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:423 积分:3196 威望:0 精华:0 注册:2013/5/10 10:01:00
关于 panel 打印  发帖心情 Post By:2017/7/25 23:07:00 [只看该作者]

一个 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编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/7/26 9:31:00 [只看该作者]

 在顶部放一个按钮,然后打印前,写代码 Forms("会议_季报编辑窗口").controls("Button1").select

 回到顶部
帅哥哟,离线,有人找我吗?
zhsenchzhi
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:423 积分:3196 威望:0 精华:0 注册:2013/5/10 10:01:00
  发帖心情 Post By:2017/7/26 10:38:00 [只看该作者]

另外就是,如果这个  panel 里面 如果还有另外一个 子panel, 则子panel 里面 的内容也不能打印出来,如果子panel以及子子panel里的内容也要打印出来,该怎么办呢?

这个该怎么办呢?

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/7/26 12:37:00 [只看该作者]

 不行,只能打印一个panel。

 

 如果确实要做,自己实现窗口打印功能。

 

http://foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=101744&skin=0

 

 

 

 

 


 回到顶部