- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- [求助]关于窗口打印？[已解决] (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=60456)
-- 发布时间：2014/11/25 11:59:00
-- [求助]关于窗口打印？[已解决]
如图：
此主题相关图片如下：qq截图20141125115900.png
此主题相关图片如下：1_page1.jpg
此主题相关图片如下：1_page2.jpg
[此贴子已经被作者于2014-11-25 15:10:38编辑过]
-- 发布时间：2014/11/25 12:03:00
--
例子发上来
-- 发布时间：2014/11/25 12:43:00
--
附例子，同时再问一下，在发布完程序后，像这种窗口打印，如何调整打印机？
-- 发布时间：2014/11/25 14:32:00
--
设置打印机参考
http://www.foxtable.com/help/topics/1603.htm
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:问题.foxdb |
-- 发布时间：2014/11/25 14:51:00
--
请问您是否只是将打印按钮的代码进行修改呢？我将代码复制过来，结果还是分开两页打印的。另外如果在打印的时候将标题行的行高设为0，整个表格的位置就上移了，这样可能打出来的字也是上移的，能否有什么方法，不让它打印呢？
-- 发布时间：2014/11/25 14:53:00
--
你有一个控件设置成了另起一页打印
-- 发布时间：2014/11/25 14:54:00
--
【方阻下限】控件->另起一页->False
-- 发布时间：2014/11/25 15:01:00
--
另外如果在打印的时候将标题行的行高设为0，整个表格的位置就上移了，这样可能打出来的字也是上移的，能否有什么方法，不让它打印呢？
-- 发布时间：2014/11/25 15:03:00
--
e.Form.Controls("生产打印表").Table.SetHeaderRowHeight(0,0) \'再设置标题行高.
e.Form.Controls("生产打印表").Top += 46
Dim doc As PrintDoc = e.Form.GernatePrintDoc()
\'doc.Print
Doc.Preview
e.Form.Controls("生产打印表").Top -= 46
e.Form.Controls("生产打印表").Table.SetHeaderRowHeight( 23,23) \'再设置标题行高.
e.Form.close