Foxtable(狐表)用户栏目专家坐堂 → [求助]窗口设计piao据预览


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

主题:[求助]窗口设计piao据预览

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


加好友 发短信
等级:一尾狐 帖子:474 积分:2982 威望:0 精华:0 注册:2018/1/15 13:54:00
[求助]窗口设计piao据预览  发帖心情 Post By:2020/6/17 17:07:00 [只看该作者]

预览piao据:

Dim doc As PrintDoc = e.Form.GernatePrintDoc()
doc.Preview()


以上代码我用在窗口独立的表里可以预览的,用分区面板绑定表,不能预览显示,该如何用代码实现?


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


加好友 发短信
等级:超级版主 帖子:110592 积分:562856 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/6/17 17:35:00 [只看该作者]


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


加好友 发短信
等级:一尾狐 帖子:474 积分:2982 威望:0 精华:0 注册:2018/1/15 13:54:00
  发帖心情 Post By:2020/6/19 10:49:00 [只看该作者]

套用代码提示出错,未将对象引用设置到对象的实例。该如何调整

Dim grp As WinForm.SplitContainer = e.Form.Controls("SplitContainer1")
Dim doc As PrintDoc = e.Form.GernatePrintDoc(grp)
doc.Preview()

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


加好友 发短信
等级:超级版主 帖子:110592 积分:562856 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/6/19 10:55:00 [只看该作者]

Dim doc As PrintDoc = e.Form.GernatePrintDoc(grp.Panel2) 或者Panel1

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


加好友 发短信
等级:一尾狐 帖子:474 积分:2982 威望:0 精华:0 注册:2018/1/15 13:54:00
  发帖心情 Post By:2020/6/19 16:36:00 [只看该作者]

按老师的代码已实现预览显示分区面板内的内容。分区面板外的控件内容不能显示,如何让分区面板内的内容与分区面板外的控件内容在同一窗口预览?另:自定义样式的颜色如何在窗口预览中取消掉?望老师帮助!
[此贴子已经被作者于2020/6/19 16:42:12编辑过]

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


加好友 发短信
等级:超级版主 帖子:110592 积分:562856 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/6/19 16:48:00 [只看该作者]

只能打印同一个容器里的内容,把要打印的内容放到同一个分区面板内。

什么地方的自定义样式?截图看看

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


加好友 发短信
等级:一尾狐 帖子:474 积分:2982 威望:0 精华:0 注册:2018/1/15 13:54:00
  发帖心情 Post By:2020/6/19 17:04:00 [只看该作者]

就是表记录自定义的填充颜色,在窗口预览里不要显示,否则打印时候也会打印颜色,不想打印除标题栏以外的颜色呢

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


加好友 发短信
等级:超级版主 帖子:110592 积分:562856 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/6/19 17:09:00 [只看该作者]

请截图说明

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


加好友 发短信
等级:一尾狐 帖子:474 积分:2982 威望:0 精华:0 注册:2018/1/15 13:54:00
  发帖心情 Post By:2020/6/19 17:10:00 [只看该作者]

没看到如何截图直接上传预览后的截图附件
图片点击可在新窗口打开查看此主题相关图片如下:图.png
图片点击可在新窗口打开查看
红色填充在窗口预览时显示无色
[此贴子已经被作者于2020/6/19 17:13:00编辑过]

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


加好友 发短信
等级:超级版主 帖子:110592 积分:562856 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/6/19 17:15:00 [只看该作者]

如果是drawcell事件,可以在停掉打印完在恢复

drawcell事件

if vars("打印") = false then
原来的代码
end if

打印按钮
vars("打印")= true
……原来的打印代码
doc.Preview()
vars("打印") = false

 回到顶部
总数 61 1 2 3 4 5 6 7 下一页