标题：打印设置问题

1楼

15666282205 发表于：2024/9/20 10:16:00

老师，我设计了一个窗口，打印领料单，页面设置里无论怎样设置，实际打印宽度始终是21厘米，实际用的纸是23厘米，怎么解决这个问题？

2楼

有点蓝 发表于：2024/9/20 10:19:00

添加一个23厘米的纸张：http://www.foxtable.com/webhelp/topics/2904.htm

3楼

15666282205 发表于：2024/9/20 10:33:00

Dim doc As New PrintDoc()
doc.PageSetting.Width = 200  '纸张宽度为200毫米
doc.PageSetting.Height = 170  '纸张高度为170毫米
doc.AutoRotate = False  '如果纸张的宽度超过高度,要加上这行代码
'添加打印内容
doc.Preview

老师，这些代码放在哪里？

4楼

有点蓝 发表于：2024/9/20 10:39:00

预览，打印按钮，如果是窗口报表，看这个：http://www.foxtable.com/webhelp/topics/1602.htm

5楼

15666282205 发表于：2024/9/20 10:53:00

自定义纸张

要使用自定义纸张，只需直接设置纸张的宽度和高度即可，单位为毫米。

示例

例如使用一个10厘米宽，12厘米高的纸张：

e.Form.Page.Width = 100 '纸张宽度为100毫米
e.Form.Page.Height = 120 '纸张高度为120毫米
Dim doc As PrintDoc = e.Form.GernatePrintDoc()
doc.Preview()

老师，代码放在哪里？

6楼

有点蓝 发表于：2024/9/20 11:01:00

添加一个按钮

7楼

15666282205 发表于：2024/9/20 11:12:00

放在按钮里提示错误

8楼

有点蓝 发表于：2024/9/20 11:25:00

什么错误？发上来看才能分析问题咯

9楼

cd_tdh 发表于：2024/9/20 12:45:00

我测试没问题

10楼

15666282205 发表于：2024/9/21 8:05:00

老师，代码放在按钮里提示下面的错误：

编译错误：local variable "doc" is already declared in the current blok

错误代码：Dim doc As PrintDoc = e.Form.GernatePrintDoc()

[此贴子已经被作者于2024/9/25 18:07:16编辑过]

共11 条记录, 每页显示 10 条, 页签: [1] [2]