水印是呈现在文档中现有内容后面或前面的文本或图像。它通常用于避免文档被非法应用。在下文中,我将介绍如何应用Spire.PDF for .NET在C#和VB.NET程序中向PDF增加单行或多行文本水印。
• 增加单行文本水印到PDF
• 增加多行文本水印到PDF
装置Spire.PDF
首先,你须要从这个链接下载Spire.PDF的最新版本,并手动将DLL文件增加到你的应用程序中作为援用。或者,你能够通过NuGet间接装置它。
示例1 增加单行文本水印到PDF
[C#]
using Spire.Pdf;using Spire.Pdf.Graphics;using System.Drawing; namespace AddTextWatermarkToPdf{ class Program { static void Main(string[] args) { //创立一个PdfDocument 对象 PdfDocument pdf = new PdfDocument(); //加载一个示例PDF文档 pdf.LoadFromFile(@"C:\Users\Administrator\Desktop\sample.pdf"); //创立一个PdfTrueTypeFont 对象 PdfTrueTypeFont font = new PdfTrueTypeFont(new Font("Arial", 55f), true); //设置水印文本 string text = "Internal Use"; //测量文本大小 SizeF textSize = font.MeasureString(text); //计算两个偏移变量的值,用于计算坐标系的平移量float offset1 = (float)(textSize.Width * System.Math.Sqrt(2) / 4); float offset2 = (float)(textSize.Height * System.Math.Sqrt(2) / 4); //遍历文档中的所有页面 foreach (PdfPageBase page in pdf.Pages) { //设置页面透明度 page.Canvas.SetTransparency(0.8f); //将坐标系平移到右下角 page.Canvas.TranslateTransform(page.Canvas.Size.Width / 2 - offset1 - offset2, page.Canvas.Size.Height / 2 + offset1 - offset2); //将坐标系逆时针旋转45度 page.Canvas.RotateTransform(-45); //在页面上绘制水印文本 page.Canvas.DrawString(text, font, PdfBrushes.DarkGray, 0, 0); } //将更改保留到另一个文件 pdf.SaveToFile("TextWatermark.pdf"); } }}
[VB.NET]
Imports Spire.PdfImports Spire.Pdf.GraphicsImports System.Drawing Namespace AddTextWatermarkToPdf Class Program Shared Sub Main(ByVal args() As String) '创立一个PdfDocument对象 Dim pdf As PdfDocument = New PdfDocument() '加载一个示例 PDF文档 pdf.LoadFromFile("C:\Users\Administrator\Desktop\sample.pdf") '创立一个PdfTrueTypeFont对象 Dim font As PdfTrueTypeFont = New PdfTrueTypeFont(New Font("Arial",55f),True) '设置水印文本 Dim text As String = "Internal Use" '测量文本大小 Dim textSize As SizeF = font.MeasureString(text) '计算两个偏移变量的值,用于计算坐标系的平移量 Dim offset1 As single = CType((textSize.Width * System.Math.Sqrt(2) / 4), single) Dim offset2 As single = CType((textSize.Height * System.Math.Sqrt(2) / 4), single) '遍历文档中的所有页面 Dim page As PdfPageBase For Each page In pdf.Pages '设置页面透明度 page.Canvas.SetTransparency(0.8f) '将坐标系平移到右下角 page.Canvas.TranslateTransform(page.Canvas.Size.Width / 2 - offset1 - offset2, page.Canvas.Size.Height / 2 + offset1 - offset2) '将坐标系逆时针旋转45度 page.Canvas.RotateTransform(-45) '在页面上绘制水印文本 page.Canvas.DrawString(text, font, PdfBrushes.DarkGray, 0, 0) Next '将更改保留到另一个文件 pdf.SaveToFile("TextWatermark.pdf") End Sub End ClassEnd Namespace
示例2 增加多行文本水印到PDF
[C#]
using System;using Spire.Pdf;using Spire.Pdf.Graphics;using System.Drawing; namespace AddMultiLineTextWatermark{ class Program { static void Main(string[] args) { //创立一个PdfDocument 实例 PdfDocument pdf = new PdfDocument(); //加载一个 PDF文档 pdf.LoadFromFile(@"C:\Users\Administrator\Desktop\sample.pdf"); //创立一个PdfTrueTypeFont对象 PdfTrueTypeFont font = new PdfTrueTypeFont(new Font("Arial", 20f), true); //遍历文档中的所有页面 for (int i = 0; i < pdf.Pages.Count; i++) { //向指定页面增加文本水印 InsertTextWatermark(pdf.Pages[i], "DotNetFiles", font, 3, 3); } //将文档保留到文件 pdf.SaveToFile("MultiLineTextWaterMark.pdf"); System.Diagnostics.Process.Start("MultiLineTextWaterMark.pdf"); } static void InsertTextWatermark(PdfPageBase page, String watermarkText, PdfTrueTypeFont font, int rowNum, int columnNum) { //测量文本大小 SizeF textSize = font.MeasureString(watermarkText); //计算两个偏移变量的值,用于计算坐标系的平移量 float offset1 = (float)(textSize.Width * System.Math.Sqrt(2) / 4); float offset2 = (float)(textSize.Height * System.Math.Sqrt(2) / 4); //创立一个PdfTilingBrush对象 PdfTilingBrush brush = new PdfTilingBrush(new SizeF(page.ActualSize.Width / columnNum, page.ActualSize.Height / rowNum)); brush.Graphics.SetTransparency(0.3f); brush.Graphics.Save(); brush.Graphics.TranslateTransform(brush.Size.Width / 2 - offset1 - offset2, brush.Size.Height / 2 + offset1 - offset2); brush.Graphics.RotateTransform(-45); //在画刷上绘制水印文本 brush.Graphics.DrawString(watermarkText, font, PdfBrushes.Violet, 0, 0); brush.Graphics.Restore(); //应用画刷绘制一个笼罩整个页面的矩形 page.Canvas.DrawRectangle(brush, new RectangleF(new PointF(0, 0), page.ActualSize)); } }}
[VB.NET]
Imports SystemImports Spire.PdfImports Spire.Pdf.GraphicsImports System.Drawing Namespace AddMultiLineTextWatermark Class Program Shared Sub Main(ByVal args() As String) '创立一个 PdfDocument 实例 Dim pdf As PdfDocument = New PdfDocument() '加载一个 PDF文档 pdf.LoadFromFile("C:\Users\Administrator\Desktop\sample.pdf") '创立一个PdfTrueTypeFont对象 Dim font As PdfTrueTypeFont = New PdfTrueTypeFont(New Font("Arial",20f),True) '遍历文档中的所有页面 Dim i As Integer For i = 0 To pdf.Pages.Count- 1 Step i + 1 '向指定页面增加文本水印 InsertTextWatermark(pdf.Pages(i), "DotNetFiles", font, 3, 3) Next '将文档保留到文件 pdf.SaveToFile("MultiLineTextWaterMark.pdf") System.Diagnostics.Process.Start("MultiLineTextWaterMark.pdf") End Sub Shared Sub InsertTextWatermark(ByVal page As PdfPageBase, ByVal watermarkText As String, ByVal font As PdfTrueTypeFont, ByVal rowNum As Integer, ByVal columnNum As Integer) '测量文本大小 Dim textSize As SizeF = font.MeasureString(watermarkText) '计算两个偏移变量的值,用于计算坐标系的平移量 Dim offset1 As single = CType((textSize.Width * System.Math.Sqrt(2) / 4), single) Dim offset2 As single = CType((textSize.Height * System.Math.Sqrt(2) / 4), single) '创立一个PdfTilingBrush对象 Dim brush As PdfTilingBrush = New PdfTilingBrush(New SizeF(page.ActualSize.Width / columnNum,page.ActualSize.Height / rowNum)) brush.Graphics.SetTransparency(0.3f) brush.Graphics.Save() brush.Graphics.TranslateTransform(brush.Size.Width / 2 - offset1 - offset2, brush.Size.Height / 2 + offset1 - offset2) brush.Graphics.RotateTransform(-45) '在画刷上绘制水印文本 brush.Graphics.DrawString(watermarkText, font, PdfBrushes.Violet, 0, 0) brush.Graphics.Restore() '应用画刷绘制一个笼罩整个页面的矩形 page.Canvas.DrawRectangle(brush, New RectangleF(New PointF(0, 0), page.ActualSize)) End Sub End ClassEnd Namespace