标题：不同页码设置不同的水印

1楼

lxhmax 发表于：2024/5/28 15:16:00

Dim doc As New PrintDoc '定义一个报表
Dim rt As prt.RenderText '定义一个文本对象

'设置水印
rt = New prt.RenderText '设置文本对象的内容
rt.Text = "Foxtable" '设置文本内容
rt.Width = "Parent.Width" '宽度等于页面宽度
rt.Height = "Parent.Height" '高度等于页面高度
rt.Style.TextAngle = 45 '旋转45度
rt.Style.TextAlignHorz = prt.AlignHorzEnum.Center '水平居中对齐
rt.Style.TextAlignVert = prt.AlignVertEnum.Center '垂直居中对齐
rt.Style.FontSize = 72 '字体大小为8磅
rt.Style.TextColor = Color.Gray '文本颜色为灰色
Doc.WaterMark = rt '作为水印使用
doc.Preview() '预览

老师,这个水印可以设置不容的页码用不同的水印不?

2楼

有点蓝 发表于：2024/5/28 15:24:00

不能的，

3楼

lxhmax 发表于：2024/5/28 15:27:00

If 1=1 Then

Dim a As New prt.RenderArea '定义一个容器

a.Height = 40 : a.Width = 40

a.X = 130 : a.Y = 147

Dim yinzhang As New prt.RenderImage '印章

yinzhang.Image = GetImage(ProjectPath & "印章.png") '自己换印章图像

yinzhang.Height = 40

a.Children.Add(yinzhang) '将印章加入到签名

doc.Body.Children.Add(a) '将容器ra加入到报表

End If

老师,这个容器可以指定的放到第几页不?

[此贴子已经被作者于2024/5/28 15:46:04编辑过]

4楼

有点蓝 发表于：2024/5/28 16:12:00

如果是自己做分页的就可以，比如：http://www.foxtable.com/webhelp/topics/2408.htm，否则无法知道打印的是哪一页

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