以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]窗口设计piao据预览  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=151196)

--  作者:ntqhj
--  发布时间:2020/6/17 17:07:00
--  [求助]窗口设计piao据预览

预览票据:

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


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


--  作者:有点蓝
--  发布时间:2020/6/17 17:35:00
--  
参考:http://www.foxtable.com/webhelp/topics/2437.htm
--  作者:ntqhj
--  发布时间: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()

--  作者:有点蓝
--  发布时间:2020/6/19 10:55:00
--  
Dim doc As PrintDoc = e.Form.GernatePrintDoc(grp.Panel2) 或者Panel1
--  作者:ntqhj
--  发布时间:2020/6/19 16:36:00
--  
按老师的代码已实现预览显示分区面板内的内容。分区面板外的控件内容不能显示,如何让分区面板内的内容与分区面板外的控件内容在同一窗口预览?另:自定义样式的颜色如何在窗口预览中取消掉?望老师帮助!
[此贴子已经被作者于2020/6/19 16:42:12编辑过]

--  作者:有点蓝
--  发布时间:2020/6/19 16:48:00
--  
只能打印同一个容器里的内容,把要打印的内容放到同一个分区面板内。

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

--  作者:ntqhj
--  发布时间:2020/6/19 17:04:00
--  
就是表记录自定义的填充颜色,在窗口预览里不要显示,否则打印时候也会打印颜色,不想打印除标题栏以外的颜色呢
--  作者:有点蓝
--  发布时间:2020/6/19 17:09:00
--  
请截图说明
--  作者:ntqhj
--  发布时间:2020/6/19 17:10:00
--  
没看到如何截图直接上传预览后的截图附件
图片点击可在新窗口打开查看此主题相关图片如下:图.png
图片点击可在新窗口打开查看
红色填充在窗口预览时显示无色
[此贴子已经被作者于2020/6/19 17:13:00编辑过]

--  作者:有点蓝
--  发布时间:2020/6/19 17:15:00
--  
如果是drawcell事件,可以在停掉打印完在恢复

drawcell事件

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

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