禁止自动旋转

打印报表的时候,系统默认会自动根据实际纸张的大小,判断是否需要旋转打印内容,以便更好地配合纸张。
如果不需要自动旋转打印内容,可以将AutoRotate属性设为False。

例如:

Dim doc As New PrintDoc
Dim
ra As New prt.RenderArea
doc.PageSetting.Width =
150
doc.PageSetting.Height =
80
doc.AutoRotate =
False '禁止自动旋转打印内容
ra.Width =
"Parent.Width"
ra.Height =
"Parent.Height"
ra.Style.Borders.All = New prt.Linedef(
5
, Color.Red)
doc.Body.Children.Add(ra)
doc.Print()

你可以删除下面这一行代码,重新打印一张,看看结果有什么不同:

doc.AutoRotate = False '禁止自动旋转打印内容

 


本页地址:http://www.foxtable.com/webhelp/topics/1589.htm