以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  打印方向  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=150027)

--  作者:fendouww
--  发布时间:2020/5/19 8:44:00
--  打印方向

图片点击可在新窗口打开查看此主题相关图片如下:1589848842379.jpg
图片点击可在新窗口打开查看
窗口打印设置为横向,打印预览也是横向,但直接打印就变成了纵向,是哪里问题呢?
图片点击可在新窗口打开查看此主题相关图片如下:snipaste_2020-05-19_08-41-50.jpg
图片点击可在新窗口打开查看

--  作者:有点蓝
--  发布时间:2020/5/19 8:57:00
--  
设置的尺寸不正确吧,确定打印机支持1100毫米(1.1米)宽的纸张打印?纸张超出打印机的可打印范围就这样了


--  作者:fendouww
--  发布时间:2020/5/19 9:17:00
--  
1100是设定的窗口大小,跟打印有关系吗?但打印预览是好的
--  作者:fendouww
--  发布时间:2020/5/19 9:18:00
--  
打印预览
--  作者:有点蓝
--  发布时间:2020/5/19 9:45:00
--  
打印设置里是不是也设置为横向了?把页边距调小点试试
--  作者:fendouww
--  发布时间:2020/5/19 10:13:00
--  
有缩放选项吗?似乎是窗口大小的问题,传输给打印机的大小有10多MB
--  作者:有点蓝
--  发布时间:2020/5/19 10:18:00
--  
窗口打印没有缩放选项,您把窗口设计小点。打印的内容大,和图片也有关系,图片本身就占用比较多的内存
--  作者:fendouww
--  发布时间:2020/5/19 10:35:00
--  
e.Form.BaseForm.height = 625
e.Form.BaseForm.width = 1100
\'e.Form.Page.PaperKind = 9
e.Form.Page.Width = 210 \'纸张宽度为100毫米
e.Form.Page.Height = 297 \'纸张高度为120毫米

e.Form.Page.LeftMargin = 7 \'设置左边距
e.Form.Page.RightMargin = 7 \'设置右边距
e.Form.Page.TopMargin = 7 \'设置上边距
e.Form.Page.BottomMargin = 7 \'设置下边距
e.Form.Page.Landscape = True
Dim doc As PrintDoc = e.Form.GernatePrintDoc()
doc.Print()

我这样设置了还是不行,打出来就是竖的

--  作者:有点蓝
--  发布时间:2020/5/19 10:36:00
--  
窗口导出文件发上来测试一下
--  作者:fendouww
--  发布时间:2020/5/19 10:51:00
--  
请查看下,怎么都调不过来