- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- 窗口保存为pdf文档 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=104055)
-- 发布时间：2017/7/21 22:21:00
-- 窗口保存为pdf文档
一个窗口中，有很多内容，包括表格，label，button等等，能不能将窗口显示的内容，直接保存为一个 word文档，或者excel ，pdf文档呢？
主要不是保存窗口的 模板，而是他显示出具体的内容之后，保存为文件
-- 发布时间：2017/7/21 22:39:00
--
利用窗口打印直接输出即可http://www.foxtable.com/webhelp/scr/1590.htm
Dim doc As PrintDoc = e.Form.GernatePrintDoc()
doc.SavePDF("d:\\ff.pdf")
-- 发布时间：2017/7/21 23:04:00
--
多谢，不过我试了一下，保存的pdf文件，都是乱码，请问该怎么样设置才行呢？
-- 发布时间：2017/7/21 23:17:00
--
不需要设置什么，可能是字体问题http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=78008&skin=0
-- 发布时间：2017/7/23 18:26:00
--
目前 窗口打印 和输出存在的问题及代码
1 打印 时 表的行数较多时， 上边的表和下面的 数据 发生重叠
代码如下：
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()
2 保存为 pdf 中文 为乱码 ，保存为 htm 和 image 居然数据 为空，啥也没有
代码如下：
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.SavePDF("c:\\aaa.pdf")
doc.SaveHTM("c:\\aaa.htm")
doc.SaveImage("c:\\aaa.jpg")
请各位老师指点一下， 上面的代码问题出在什么地方
多谢
-- 发布时间：2017/7/23 18:37:00
--
1、动态设置表格的最大行数
http://www.foxtable.com/webhelp/scr/1604.htm
2、乱码问题，是你窗口字体问题。你窗口的控件换一种字体
不能一次保存为三种，一次只能保存一种。
-- 发布时间：2017/7/23 20:17:00
--
1 不能设置最大行数， 只能设置最小行数，因为我们是要 打印出所有的数据的，设置最大行数，就会造成数据丢失
2 请问， 窗口控件应该设置成什么字体？我现在用的 字体 都是 宋体 12pt， 如下图所示， 另外， table 无法在界面设置字体，该怎样设置？
此主题相关图片如下：1.png
-- 发布时间：2017/7/23 21:24:00
--
1、哦，写错了，你可以设置最小行数，动态的设置就好。
2、如果你设置成黑体行不行？table的字体设置，参考 http://www.foxtable.com/webhelp/scr/0497.htm
-- 发布时间：2017/7/24 2:14:00
--
1 我就是 设置最小行数 为 20， 才出现的上下重叠现象，实际中，可能出现 超过20的情况更多
-- 发布时间：2017/7/24 8:53:00
--
以下是引用zhsenchzhi在2017/7/24 2:14:00的发言：
1 我就是 设置最小行数 为 20， 才出现的上下重叠现象，实际中，可能出现 超过20的情况更多
1 我就是 设置最小行数 为 20， 才出现的上下重叠现象，实际中，可能出现 超过20的情况更多
最小行数，根据你表格的行数设置，在打印之前用代码设置，赋值为动态的值；