以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 求助 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=108220) |
-- 作者:丛靖垚 -- 发布时间:2017/10/18 16:06:00 -- 求助 在窗口中设置打印按钮,可是总是不能控制页边距,怎么解决呢?之前直接用窗口打印不行,在朋友的建议下添加了TabControl和panel控件,可是仍然达不到效果。 Dim tb As WinForm.TabControl = e.Form.Controls("TabControl1") Dim pan1 As WinForm.Panel = e.Form.Controls("Panel1") \'e.Form.Page.Width = 230\'纸张宽度为210毫米 \'e.Form.page.Height = 200 \'纸张高度为140毫米 Dim doc As PrintDoc Select Case tb.SelectedPage.text Case "Page1" doc = e.Form.GernatePrintDoc(pan1) End Select Doc.PageSetting.Width=210 Doc.PageSetting.Height=140 Doc.PageSetting.TopMargin=10 Doc.PageSetting.BottomMargin=10 Doc.PageSetting.LeftMargin=10 Doc.PageSetting.RightMargin=10 doc.Preview() |
-- 作者:丛靖垚 -- 发布时间:2017/10/18 16:07:00 -- 各位有没有好的解决方法,或者我的代码有改进的地方,可以告诉我呢 |
-- 作者:有点甜 -- 发布时间:2017/10/18 16:33:00 -- 1、先设置,后 GernatePrintDoc
http://www.foxtable.com/webhelp/scr/1602.htm
2、举例(截图或者实例)说明怎么不行?怎样没达到效果? |
-- 作者:丛靖垚 -- 发布时间:2017/10/19 17:05:00 -- 谢谢,已经按您说的解决了,就是没有进行页面设置。 |
-- 作者:有点甜 -- 发布时间:2017/10/19 17:19:00 -- 1、没有进行页面设置指什么?无效?
2、你可以用跨表查询的方法,如 http://www.foxtable.com/webhelp/scr/1451.htm
|
-- 作者:丛靖垚 -- 发布时间:2017/10/19 17:25:00 -- 嘿嘿,第一个问题已经解决了呢。 |
-- 作者:丛靖垚 -- 发布时间:2017/10/20 17:26:00 -- 您好,我按您的提示试着做了下,没有成功是不是因为从窗口里查询和跨表查询有所不同啊。您在费心给看看。 此主题相关图片如下:求助.jpg |
-- 作者:有点甜 -- 发布时间:2017/10/20 18:15:00 -- 你窗口各个控件绑定列了吗?试试用 findrow和position
http://www.foxtable.com/webhelp/scr/0553.htm
|