码迷,mamicode.com
首页 > Web开发 > 详细

Aspose.Words如何在文档中添加水印

时间:2015-08-31 17:36:48      阅读:247      评论:0      收藏:0      [点我收藏+]

标签:aspose.words|使用教程|水印|watermark

  Aspose.Words是一款先进的文档处理控件,在不使用Microsoft Words的情况下,它可以使用户在各个应用程序中执行各种文档处理任务,其中包括文档的生成、修改、渲染、打印,文档格式转换和邮件合并等文档处理。此外,Aspose.Words支持DOC,OOXML,RTF,HTML,OpenDocument, PDF, XPS, EPUB和其他格式。

  有时你需要在一个Word文档中插入一个水印,例如如果你想打印草稿文档或将其标记为机密。技术分享

  在Microsoft Word中,您可以使用插入水印命令快速插入水印。没有多少人使用这个命令认识到这样的水印只是一个形状与文本一起插入到页眉或页脚,或在页面的中心位置。技术分享

  而在Aspose.Words中,没有单一的“插入水印”命令就像Microsoft Word,它很容易将

何形状或图像插入到页眉或页脚,从而创建一个任何可以想象类型的水印。技术分享

Example

把水印插入一个Word文档。

C#
 using System;
 using System.Drawing;
 using System.IO;
using System.Reflection;

using Aspose.Words;
 using Aspose.Words.Drawing;
 using Aspose.Words.Fields;

namespace AddWatermark
 {
 public class Program
 {
 public static void Main(string[] args)
 {
 // Sample infrastructure.
 string exeDir = Path.GetDirectoryName(Assembly.GetExecutingAssembly().Location) + Path.DirectorySeparatorChar;
 string dataDir = new Uri(new Uri(exeDir), @"../../Data/").LocalPath;

Document doc = new Document(dataDir + "TestFile.doc");
 InsertWatermarkText(doc, "CONFIDENTIAL");
 doc.Save(dataDir + "TestFile Out.doc");
 }

/// <summary>
 /// Inserts a watermark into a document.
 /// </summary>
 /// <param name="doc">The input document.</param>
 /// <param name="watermarkText">Text of the watermark.</param>
 private static void InsertWatermarkText(Document doc, string watermarkText)
 {
 // Create a watermark shape. This will be a WordArt shape.
 // You are free to try other shape types as watermarks.
 Shape watermark = new Shape(doc, ShapeType.TextPlainText);
 
 // Set up the text of the watermark.
 watermark.TextPath.Text = watermarkText;
 watermark.TextPath.FontFamily = "Arial";
 watermark.Width = 500;
 watermark.Height = 100;
 // Text will be directed from the bottom-left to the top-right corner.
 watermark.Rotation = -40;
 // Remove the following two lines if you need a solid black text.
 watermark.Fill.Color = Color.Gray; // Try LightGray to get more Word-style watermark
 watermark.StrokeColor = Color.Gray; // Try LightGray to get more Word-style watermark

// Place the watermark in the page center.
 watermark.RelativeHorizontalPosition = RelativeHorizontalPosition.Page;
 watermark.RelativeVerticalPosition = RelativeVerticalPosition.Page;
 watermark.WrapType = WrapType.None;
 watermark.VerticalAlignment = VerticalAlignment.Center;
 watermark.HorizontalAlignment = HorizontalAlignment.Center;

// Create a new paragraph and append the watermark to this paragraph.
 Paragraph watermarkPara = new Paragraph(doc);
 watermarkPara.AppendChild(watermark);

// Insert the watermark into all headers of each document section.
 foreach (Section sect in doc.Sections)
 {
 // There could be up to three different headers in each section, since we want
 // the watermark to appear on all pages, insert into all headers.
 InsertWatermarkIntoHeader(watermarkPara, sect, HeaderFooterType.HeaderPrimary);
 InsertWatermarkIntoHeader(watermarkPara, sect, HeaderFooterType.HeaderFirst);
 InsertWatermarkIntoHeader(watermarkPara, sect, HeaderFooterType.HeaderEven);
 }
 }

private static void InsertWatermarkIntoHeader(Paragraph watermarkPara, Section sect, HeaderFooterType headerType)
 {
 HeaderFooter header = sect.HeadersFooters[headerType];

if (header == null)
 {
 // There is no header of the specified type in the current section, create it.
 header = new HeaderFooter(sect.Document, headerType);
 sect.HeadersFooters.Add(header);
 }

// Insert a clone of the watermark into the header.
 header.AppendChild(watermarkPara.Clone(true));
 }
 }
 }

 

Visual Basic
  Imports Microsoft.VisualBasic
  Imports System
  Imports System.Drawing
  Imports System.IOImports System.Reflection
Imports Aspose.Words
  Imports Aspose.Words.Drawing
  Imports Aspose.Words.Fields
Namespace AddWatermark
  Public Class Program
  Public Shared Sub Main(ByVal args() As String)
  ‘ Sample infrastructure.
  Dim exeDir As String = Path.GetDirectoryName(System.Reflection.Assembly.GetExecutingAssembly().Location) + Path.DirectorySeparatorChar
  Dim dataDir As String = New Uri(New Uri(exeDir), "../../Data/").LocalPath
Dim doc As New Document(dataDir & "TestFile.doc")
  InsertWatermarkText(doc, "CONFIDENTIAL")
  doc.Save(dataDir & "TestFile Out.doc")
  End Sub
‘‘‘ <summary>
  ‘‘‘ Inserts a watermark into a document.
  ‘‘‘ </summary>
  ‘‘‘ <param name="doc">The input document.</param>
  ‘‘‘ <param name="watermarkText">Text of the watermark.</param>
  Private Shared Sub InsertWatermarkText(ByVal doc As Document, ByVal watermarkText As String)
  ‘ Create a watermark shape. This will be a WordArt shape. 
  ‘ You are free to try other shape types as watermarks.
  Dim watermark As New Shape(doc, ShapeType.TextPlainText)
‘ Set up the text of the watermark.
  watermark.TextPath.Text = watermarkText
  watermark.TextPath.FontFamily = "Arial"
  watermark.Width = 500
  watermark.Height = 100
  ‘ Text will be directed from the bottom-left to the top-right corner.
  watermark.Rotation = -40
  ‘ Remove the following two lines if you need a solid black text.
  watermark.Fill.Color = Color.Gray ‘ Try LightGray to get more Word-style watermark
  watermark.StrokeColor = Color.Gray ‘ Try LightGray to get more Word-style watermark
‘ Place the watermark in the page center.
  watermark.RelativeHorizontalPosition = RelativeHorizontalPosition.Page
  watermark.RelativeVerticalPosition = RelativeVerticalPosition.Page
  watermark.WrapType = WrapType.None
  watermark.VerticalAlignment = VerticalAlignment.Center
  watermark.HorizontalAlignment = HorizontalAlignment.Center
‘ Create a new paragraph and append the watermark to this paragraph.
  Dim watermarkPara As New Paragraph(doc)
  watermarkPara.AppendChild(watermark)
‘ Insert the watermark into all headers of each document section.
  For Each sect As Section In doc.Sections
  ‘ There could be up to three different headers in each section, since we want
  ‘ the watermark to appear on all pages, insert into all headers.
  InsertWatermarkIntoHeader(watermarkPara, sect, HeaderFooterType.HeaderPrimary)
  InsertWatermarkIntoHeader(watermarkPara, sect, HeaderFooterType.HeaderFirst)
  InsertWatermarkIntoHeader(watermarkPara, sect, HeaderFooterType.HeaderEven)
  Next sect
  End Sub
Private Shared Sub InsertWatermarkIntoHeader(ByVal watermarkPara As Paragraph, ByVal sect As Section, ByVal headerType As HeaderFooterType)
  Dim header As HeaderFooter = sect.HeadersFooters(headerType)
If header Is Nothing Then
  ‘ There is no header of the specified type in the current section, create it.
  header = New HeaderFooter(sect.Document, headerType)
  sect.HeadersFooters.Add(header)
  End If
‘ Insert a clone of the watermark into the header.
  header.AppendChild(watermarkPara.Clone(True))
  End Sub
  End Class
  End Namespace

查看更多Aspose.Words信息技术分享

Aspose.Words如何在文档中添加水印

标签:aspose.words|使用教程|水印|watermark

原文地址:http://flt9999.blog.51cto.com/10599358/1690120

(0)
(0)
   
举报
评论 一句话评论(0
登录后才能评论!
© 2014 mamicode.com 版权所有  联系我们:gaon5@hotmail.com
迷上了代码!