Foxtable(狐表)用户栏目专家坐堂 → [求助] 在增加的窗口增加打印按键


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

主题:[求助] 在增加的窗口增加打印按键

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


加好友 发短信
等级:婴狐 帖子:17 积分:186 威望:0 精华:0 注册:2015/9/11 22:22:00
[求助] 在增加的窗口增加打印按键  发帖心情 Post By:2015/9/16 9:29:00 [只看该作者]

我在添加的窗口中设置一个点击控键,希望点击一下,可以打印当前的窗口。(是有控件的窗口,不是表)

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/9/16 9:33:00 [只看该作者]

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

 

http://www.foxtable.com/help/topics/1590.htm

 


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


加好友 发短信
等级:婴狐 帖子:17 积分:186 威望:0 精华:0 注册:2015/9/11 22:22:00
  发帖心情 Post By:2015/9/16 9:37:00 [只看该作者]

谢谢啊 可以了

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


加好友 发短信
等级:婴狐 帖子:17 积分:186 威望:0 精华:0 注册:2015/9/11 22:22:00
  发帖心情 Post By:2015/9/16 9:39:00 [只看该作者]

请问下,打印的时候边框可以设置可见吗?

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


加好友 发短信
等级:婴狐 帖子:17 积分:186 威望:0 精华:0 注册:2015/9/11 22:22:00
  发帖心情 Post By:2015/9/16 9:40:00 [只看该作者]

就是控件的边框,设置可见

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/9/16 9:52:00 [只看该作者]

Dim doc As PrintDoc = e.Form.GernatePrintDoc()
For Each c As Object In doc.body.children
    If typeof c Is prt.RenderText Then
        c.Style.Borders.All = New prt.Linedef
    End If
Next
doc.Preview()


 回到顶部