- 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=53507)
-- 发布时间：2014/7/9 15:25:00
-- 打印窗体设置页边距不起作用
代码如下：
Dim pnl As WinForm.Panel = e.Form.Controls("Panel1")
Dim doc As PrintDoc = e.Form.GernatePrintDoc(pnl)
Doc.PageSetting.Width=210
Doc.PageSetting.Height=90
Doc.PageSetting.TopMargin =5
Doc.PageSetting.LeftMargin=5
doc.Preview()
其中：
Doc.PageSetting.TopMargin =5
Doc.PageSetting.LeftMargin=5
这两句不起作用，页边距预览的时候无论设置多少都没变化
-- 发布时间：2014/7/9 15:31:00
--
到这里去设置吧
此主题相关图片如下：qq截图20140709153033.png
-- 发布时间：2014/7/9 15:35:00
--
设置错，窗口要这样设置的。
http://www.foxtable.com/help/topics/1602.htm
-- 发布时间：2014/7/9 15:37:00
--
打印前界面：
此主题相关图片如下：打印前界面.png
打印预览界面：
此主题相关图片如下：预览.png
-- 发布时间：2014/7/9 15:38:00
--
无论左边距和上边距改成多少，Label打印的位置都不会改变
我将边距改成0，打印的位置还是靠不到边
-- 发布时间：2014/7/9 15:50:00
--
谁说无效？
Dim pnl As WinForm.Panel = e.Form.Controls("Panel1")
e.Form.Page.LeftMargin = 100 \'设置左边距
Dim doc As PrintDoc = e.Form.GernatePrintDoc(pnl)
doc.Preview()
http://www.foxtable.com/help/topics/1602.htm