zoukankan      html  css  js  c++  java
  • C# 给Word不同页面设置不同背景

    给Word文档设置背景时,通常只能针对整篇文档设置统一的背景,如果需要对某些页面单独设置背景,则需要通过另外的方式来实现。本文通过C# 程序代码演示如何来实现。并附VB.NET代码作参考。

    思路:通过在页眉中添加形状或者图片,并将形状或图片平铺(即设置形状或图片大小为页面大小)到整个页面。添加背景时,通过添加形状并设置形状颜色来设置成纯色背景效果;通过添加图片来实现图片背景效果。

    本次程序运行环境中包括:引入Spire.Doc.dll;.Net Framework 4.5.1

    设置不同背景时,分以下2种情况:

    1. 只需设置首页背景和其他页面不同

    1.1 设置纯色背景

    【C#】

    using Spire.Doc;
    using Spire.Doc.Documents;
    using Spire.Doc.Fields;
    using System.Drawing;
    
    namespace DifferentBackground1
    {
        class Program
        {
            static void Main(string[] args)
            {
                //加载Word测试文档
                Document doc = new Document();
                doc.LoadFromFile("测试.docx");
    
                //获取第一节
                Section section = doc.Sections[0];
    
                //设置首页页眉页脚不同
                section.PageSetup.DifferentFirstPageHeaderFooter = true;
    
                //在首页页眉添加形状
                HeaderFooter firstpageheader = section.HeadersFooters.FirstPageFooter;//获取首页页眉
                firstpageheader.Paragraphs.Clear();//清除页眉默认的段落格式(因默认页眉格式中包含有一条横线)
                Paragraph firstpara = firstpageheader.AddParagraph();//重新添加段落
                float width = section.PageSetup.PageSize.Width;//获取页面宽度、高度
                float height = section.PageSetup.PageSize.Height;
                ShapeObject shape = firstpara.AppendShape(width, height, ShapeType.Rectangle);//添加形状
                shape.BehindText = true;//设置形状衬于文字下方
                shape.HorizontalAlignment = ShapeHorizontalAlignment.Center;//设置对齐方式,铺满页面
                shape.VerticalOrigin = VerticalOrigin.TopMarginArea;
                shape.FillColor = Color.LightBlue;//形状颜色
    
    
                //在其他页面的页眉中添加形状
                HeaderFooter otherheader = section.HeadersFooters.Header;
                otherheader.Paragraphs.Clear();
                Paragraph otherpara = otherheader.AddParagraph();
                ShapeObject shape1 = otherpara.AppendShape(width, height, ShapeType.Rectangle);
                shape1.BehindText = true;
                shape1.HorizontalAlignment = ShapeHorizontalAlignment.Center;
                shape1.VerticalOrigin = VerticalOrigin.TopMarginArea;
                shape1.FillColor = Color.Pink;
    
    
                //保存文档
                doc.SaveToFile("ColorBackground1.docx", FileFormat.Docx2013);
                System.Diagnostics.Process.Start("ColorBackground1.docx");
            }
        }
    }

    【VB.NET】

    Imports Spire.Doc
    Imports Spire.Doc.Documents
    Imports Spire.Doc.Fields
    Imports System.Drawing
    
    Namespace DifferentBackground1
        Class Program
            Private Shared Sub Main(args As String())
                '加载Word测试文档
                Dim doc As New Document()
                doc.LoadFromFile("测试.docx")
    
                '获取第一节
                Dim section As Section = doc.Sections(0)
    
                '设置首页页眉页脚不同
                section.PageSetup.DifferentFirstPageHeaderFooter = True
    
                '在首页页眉添加形状
                Dim firstpageheader As HeaderFooter = section.HeadersFooters.FirstPageFooter
                '获取首页页眉
                firstpageheader.Paragraphs.Clear()
                '清除页眉默认的段落格式(因默认页眉格式中包含有一条横线)
                Dim firstpara As Paragraph = firstpageheader.AddParagraph()
                '重新添加段落
                Dim width As Single = section.PageSetup.PageSize.Width
                '获取页面宽度、高度
                Dim height As Single = section.PageSetup.PageSize.Height
                Dim shape As ShapeObject = firstpara.AppendShape(width, height, ShapeType.Rectangle)
                '添加形状
                shape.BehindText = True
                '设置形状衬于文字下方
                shape.HorizontalAlignment = ShapeHorizontalAlignment.Center
                '设置对齐方式,铺满页面
                shape.VerticalOrigin = VerticalOrigin.TopMarginArea
                shape.FillColor = Color.LightBlue
                '形状颜色
    
                '在其他页面的页眉中添加形状
                Dim otherheader As HeaderFooter = section.HeadersFooters.Header
                otherheader.Paragraphs.Clear()
                Dim otherpara As Paragraph = otherheader.AddParagraph()
                Dim shape1 As ShapeObject = otherpara.AppendShape(width, height, ShapeType.Rectangle)
                shape1.BehindText = True
                shape1.HorizontalAlignment = ShapeHorizontalAlignment.Center
                shape1.VerticalOrigin = VerticalOrigin.TopMarginArea
                shape1.FillColor = Color.Pink
    
    
                '保存文档
                doc.SaveToFile("ColorBackground1.docx", FileFormat.Docx2013)
                System.Diagnostics.Process.Start("ColorBackground1.docx")
            End Sub
        End Class
    End Namespace
    View Code

    1.2 设置图片背景

    【C#】

    using Spire.Doc;
    using Spire.Doc.Documents;
    using Spire.Doc.Fields;
    
    namespace DifferentBackground1
    {
        class Program
        {
            static void Main(string[] args)
            {
                 //加载Word测试文档
                Document doc = new Document();
                doc.LoadFromFile("测试.docx");
    
                //获取第一节
                Section section = doc.Sections[0];
    
                //设置首页页眉页脚不同
                section.PageSetup.DifferentFirstPageHeaderFooter = true;
    
                HeaderFooter firstpageheader = section.HeadersFooters.FirstPageFooter;//获取首页页眉
                firstpageheader.Paragraphs.Clear();//清除页眉默认的段落格式(因默认页眉格式中包含有一条横线)
                Paragraph firstpara = firstpageheader.AddParagraph();//重新添加段落
    
                //获取页面宽度、高度
                float width = section.PageSetup.PageSize.Width;
                float height = section.PageSetup.PageSize.Height; 
              
                //添加图片到首页页眉
                DocPicture pic0 = firstpara.AppendPicture("1.png");
                pic0.TextWrappingStyle = TextWrappingStyle.Behind;
                pic0.HorizontalAlignment = ShapeHorizontalAlignment.Center;
                pic0.VerticalOrigin = VerticalOrigin.TopMarginArea;
                pic0.Width = width;
                pic0.Height = height;
    
    
                //在其他页面的页眉中添加图片
                HeaderFooter otherheader = section.HeadersFooters.Header;
                otherheader.Paragraphs.Clear();
                Paragraph otherpara = otherheader.AddParagraph();
                DocPicture pic1 = otherpara.AppendPicture("2.png");
                pic1.TextWrappingStyle = TextWrappingStyle.Behind;
                pic1.HorizontalAlignment = ShapeHorizontalAlignment.Center;
                pic1.VerticalOrigin = VerticalOrigin.TopMarginArea;
                pic1.Width = width;
                pic1.Height = height;
    
    
                //保存文档
                doc.SaveToFile("ImageBackground1.docx", FileFormat.Docx2013);
                System.Diagnostics.Process.Start("ImageBackground1.docx");
            }
        }
    }

    【VB.NET】

    Imports Spire.Doc
    Imports Spire.Doc.Documents
    Imports Spire.Doc.Fields
    
    Namespace DifferentBackground1
        Class Program
            Private Shared Sub Main(args As String())
                '加载Word测试文档
                Dim doc As New Document()
                doc.LoadFromFile("测试.docx")
    
                '获取第一节
                Dim section As Section = doc.Sections(0)
    
                '设置首页页眉页脚不同
                section.PageSetup.DifferentFirstPageHeaderFooter = True
    
                Dim firstpageheader As HeaderFooter = section.HeadersFooters.FirstPageFooter
                '获取首页页眉
                firstpageheader.Paragraphs.Clear()
                '清除页眉默认的段落格式(因默认页眉格式中包含有一条横线)
                Dim firstpara As Paragraph = firstpageheader.AddParagraph()
                '重新添加段落
                '获取页面宽度、高度
                Dim width As Single = section.PageSetup.PageSize.Width
                Dim height As Single = section.PageSetup.PageSize.Height
    
                '添加图片到首页页眉
                Dim pic0 As DocPicture = firstpara.AppendPicture("1.png")
                pic0.TextWrappingStyle = TextWrappingStyle.Behind
                pic0.HorizontalAlignment = ShapeHorizontalAlignment.Center
                pic0.VerticalOrigin = VerticalOrigin.TopMarginArea
                pic0.Width = width
                pic0.Height = height
    
    
                '在其他页面的页眉中添加图片
                Dim otherheader As HeaderFooter = section.HeadersFooters.Header
                otherheader.Paragraphs.Clear()
                Dim otherpara As Paragraph = otherheader.AddParagraph()
                Dim pic1 As DocPicture = otherpara.AppendPicture("2.png")
                pic1.TextWrappingStyle = TextWrappingStyle.Behind
                pic1.HorizontalAlignment = ShapeHorizontalAlignment.Center
                pic1.VerticalOrigin = VerticalOrigin.TopMarginArea
                pic1.Width = width
                pic1.Height = height
    
    
                '保存文档
                doc.SaveToFile("ImageBackground1.docx", FileFormat.Docx2013)
                System.Diagnostics.Process.Start("ImageBackground1.docx")
            End Sub
        End Class
    End Namespace
    View Code

    2. 设置指定多个页面背景不同

    注:给多个页面设置不同背景时,需要通过获取不同节的页眉来设置,本次程序环境中所用源文档已设置了多个节,如需手动设置分节,可参考代码:

    document.Sections[0].Paragraphs[0].InsertSectionBreak(SectionBreakType.NoBreak);

    2.1 设置纯色背景

    【C#】

    using Spire.Doc;
    using Spire.Doc.Documents;
    using Spire.Doc.Fields;
    using System.Drawing;
    
    namespace DifferentBackground2
    {
        class Program
        {
            static void Main(string[] args)
            {
                //加载Word文档
                Document doc = new Document();
                doc.LoadFromFile("测试.docx");
    
                //获取第一节
                Section section1 = doc.Sections[0];
    
                //获取页面宽度、高度
                float width = section1.PageSetup.PageSize.Width;
                float height = section1.PageSetup.PageSize.Height;
    
                //添加图片到页眉
                HeaderFooter header1 = section1.HeadersFooters.Header;
                header1.Paragraphs.Clear();
                Paragraph para1 = header1.AddParagraph();
                ShapeObject shape1 = para1.AppendShape(width, height, ShapeType.Rectangle);//添加形状
                shape1.BehindText = true;//设置形状衬于文字下方
                shape1.HorizontalAlignment = ShapeHorizontalAlignment.Center;//设置对齐方式,铺满页面
                shape1.VerticalOrigin = VerticalOrigin.TopMarginArea;
                shape1.FillColor = Color.LightSalmon;//形状颜色
    
                //同理设置第二节页眉中的形状
                Section section2 = doc.Sections[1];
                HeaderFooter header2 = section2.HeadersFooters.Header;
                header2.Paragraphs.Clear();
                Paragraph para2 = header2.AddParagraph();
                ShapeObject shape2 = para2.AppendShape(width, height, ShapeType.Rectangle);//添加形状
                shape2.BehindText = true;//设置形状衬于文字下方
                shape2.HorizontalAlignment = ShapeHorizontalAlignment.Center;//设置对齐方式,铺满页面
                shape2.VerticalOrigin = VerticalOrigin.TopMarginArea;
                shape2.FillColor = Color.Moccasin;//形状颜色
    
                //同理设置第三节中的页眉中的形状
                Section section3 = doc.Sections[2];
                HeaderFooter header3 = section3.HeadersFooters.Header;
                header3.Paragraphs.Clear();
                Paragraph para3 = header3.AddParagraph();
                ShapeObject shape3 = para3.AppendShape(width, height, ShapeType.Rectangle);//添加形状
                shape3.BehindText = true;//设置形状衬于文字下方
                shape3.HorizontalAlignment = ShapeHorizontalAlignment.Center;//设置对齐方式,铺满页面
                shape3.VerticalOrigin = VerticalOrigin.TopMarginArea;
                shape3.FillColor = Color.LawnGreen;//形状颜色
    
                //保存文档
                doc.SaveToFile("ColorBackground2.docx", FileFormat.Docx2013);
                System.Diagnostics.Process.Start("ColorBackground2.docx");
            }
        }
    }

    【VB.NET】

    Imports Spire.Doc
    Imports Spire.Doc.Documents
    Imports Spire.Doc.Fields
    Imports System.Drawing
    
    Namespace DifferentBackground2
        Class Program
            Private Shared Sub Main(args As String())
                '加载Word文档
                Dim doc As New Document()
                doc.LoadFromFile("测试.docx")
    
                '获取第一节
                Dim section1 As Section = doc.Sections(0)
    
                '获取页面宽度、高度
                Dim width As Single = section1.PageSetup.PageSize.Width
                Dim height As Single = section1.PageSetup.PageSize.Height
    
                '添加图片到页眉
                Dim header1 As HeaderFooter = section1.HeadersFooters.Header
                header1.Paragraphs.Clear()
                Dim para1 As Paragraph = header1.AddParagraph()
                Dim shape1 As ShapeObject = para1.AppendShape(width, height, ShapeType.Rectangle)
                '添加形状
                shape1.BehindText = True
                '设置形状衬于文字下方
                shape1.HorizontalAlignment = ShapeHorizontalAlignment.Center
                '设置对齐方式,铺满页面
                shape1.VerticalOrigin = VerticalOrigin.TopMarginArea
                shape1.FillColor = Color.LightSalmon
                '形状颜色
                '同理设置第二节页眉中的图片
                Dim section2 As Section = doc.Sections(1)
                Dim header2 As HeaderFooter = section2.HeadersFooters.Header
                header2.Paragraphs.Clear()
                Dim para2 As Paragraph = header2.AddParagraph()
                Dim shape2 As ShapeObject = para2.AppendShape(width, height, ShapeType.Rectangle)
                '添加形状
                shape2.BehindText = True
                '设置形状衬于文字下方
                shape2.HorizontalAlignment = ShapeHorizontalAlignment.Center
                '设置对齐方式,铺满页面
                shape2.VerticalOrigin = VerticalOrigin.TopMarginArea
                shape2.FillColor = Color.Moccasin
                '形状颜色
                '同理设置第三节中的页眉中的图片
                Dim section3 As Section = doc.Sections(2)
                Dim header3 As HeaderFooter = section3.HeadersFooters.Header
                header3.Paragraphs.Clear()
                Dim para3 As Paragraph = header3.AddParagraph()
                Dim shape3 As ShapeObject = para3.AppendShape(width, height, ShapeType.Rectangle)
                '添加形状
                shape3.BehindText = True
                '设置形状衬于文字下方
                shape3.HorizontalAlignment = ShapeHorizontalAlignment.Center
                '设置对齐方式,铺满页面
                shape3.VerticalOrigin = VerticalOrigin.TopMarginArea
                shape3.FillColor = Color.LawnGreen
                '形状颜色
                '保存文档
                doc.SaveToFile("ColorBackground2.docx", FileFormat.Docx2013)
                System.Diagnostics.Process.Start("ColorBackground2.docx")
            End Sub
        End Class
    End Namespace
    View Code

     

    2.2 设置图片背景

    【C#

    using Spire.Doc;
    using Spire.Doc.Documents;
    using Spire.Doc.Fields;
    
    namespace DifferentBackground2
    {
        class Program
        {
            static void Main(string[] args)
            {
                //加载Word文档
                Document doc = new Document();
                doc.LoadFromFile("测试.docx");
    
                //获取第一节
                Section section1 = doc.Sections[0];
                //添加图片到页眉
                HeaderFooter header1 = section1.HeadersFooters.Header;
                header1.Paragraphs.Clear();
                Paragraph para1 = header1.AddParagraph();
                DocPicture pic1 = para1.AppendPicture("1.png");
                pic1.TextWrappingStyle = TextWrappingStyle.Behind;
                pic1.HorizontalAlignment = ShapeHorizontalAlignment.Center;
                pic1.VerticalOrigin = VerticalOrigin.TopMarginArea;
                float width = section1.PageSetup.PageSize.Width;
                float height = section1.PageSetup.PageSize.Height;
                pic1.Width = width;
                pic1.Height = height;
    
                //同理设置第二节页眉中的图片
                Section section2 = doc.Sections[1];
                HeaderFooter header2 = section2.HeadersFooters.Header;
                header2.Paragraphs.Clear();
                Paragraph para2 = header2.AddParagraph();
                DocPicture pic2 = para2.AppendPicture("2.png");
                pic2.TextWrappingStyle = TextWrappingStyle.Behind;
                pic2.HorizontalAlignment = ShapeHorizontalAlignment.Center;
                pic2.VerticalOrigin = VerticalOrigin.TopMarginArea; 
                pic2.Width = width;
                pic2.Height = height;
    
                //同理设置第三节中的页眉中的图片
                Section section3 = doc.Sections[2];
                HeaderFooter header3 = section3.HeadersFooters.Header;
                header3.Paragraphs.Clear();
                Paragraph para3 = header3.AddParagraph();
                DocPicture pic3 = para3.AppendPicture("3.png");
                pic3.TextWrappingStyle = TextWrappingStyle.Behind;
                pic3.HorizontalAlignment = ShapeHorizontalAlignment.Center;
                pic3.VerticalOrigin = VerticalOrigin.TopMarginArea;
                pic3.Width = width;
                pic3.Height = height;
    
                //保存文档
                doc.SaveToFile("ImageBackground2.docx", FileFormat.Docx2013);
                System.Diagnostics.Process.Start("ImageBackground2.docx");
            }
        }
    }

    【VB.NET】

    Imports Spire.Doc
    Imports Spire.Doc.Documents
    Imports Spire.Doc.Fields
    
    Namespace DifferentBackground2
        Class Program
            Private Shared Sub Main(args As String())
                '加载Word文档
                Dim doc As New Document()
                doc.LoadFromFile("测试.docx")
    
                '获取第一节
                Dim section1 As Section = doc.Sections(0)
                '添加图片到页眉
                Dim header1 As HeaderFooter = section1.HeadersFooters.Header
                header1.Paragraphs.Clear()
                Dim para1 As Paragraph = header1.AddParagraph()
                Dim pic1 As DocPicture = para1.AppendPicture("1.png")
                pic1.TextWrappingStyle = TextWrappingStyle.Behind
                pic1.HorizontalAlignment = ShapeHorizontalAlignment.Center
                pic1.VerticalOrigin = VerticalOrigin.TopMarginArea
                Dim width As Single = section1.PageSetup.PageSize.Width
                Dim height As Single = section1.PageSetup.PageSize.Height
                pic1.Width = width
                pic1.Height = height
    
                '同理设置第二节页眉中的图片
                Dim section2 As Section = doc.Sections(1)
                Dim header2 As HeaderFooter = section2.HeadersFooters.Header
                header2.Paragraphs.Clear()
                Dim para2 As Paragraph = header2.AddParagraph()
                Dim pic2 As DocPicture = para2.AppendPicture("2.png")
                pic2.TextWrappingStyle = TextWrappingStyle.Behind
                pic2.HorizontalAlignment = ShapeHorizontalAlignment.Center
                pic2.VerticalOrigin = VerticalOrigin.TopMarginArea
                pic2.Width = width
                pic2.Height = height
    
                '同理设置第三节中的页眉中的图片
                Dim section3 As Section = doc.Sections(2)
                Dim header3 As HeaderFooter = section3.HeadersFooters.Header
                header3.Paragraphs.Clear()
                Dim para3 As Paragraph = header3.AddParagraph()
                Dim pic3 As DocPicture = para3.AppendPicture("3.png")
                pic3.TextWrappingStyle = TextWrappingStyle.Behind
                pic3.HorizontalAlignment = ShapeHorizontalAlignment.Center
                pic3.VerticalOrigin = VerticalOrigin.TopMarginArea
                pic3.Width = width
                pic3.Height = height
    
                '保存文档
                doc.SaveToFile("ImageBackground2.docx", FileFormat.Docx2013)
                System.Diagnostics.Process.Start("ImageBackground2.docx")
            End Sub
        End Class
    End Namespace
    View Code
  • 相关阅读:
    python 函数参数
    文件操作总结
    时间模块总结
    代码编程规范
    javascript 学习
    Spring-扫描注解原理,注解自动扫描原理分析
    String中的intern方法
    Zookeeper服务注册与发现原理浅析
    一篇文章了解RPC框架原理
    如何设计一个秒杀系统
  • 原文地址:https://www.cnblogs.com/Yesi/p/14361897.html
Copyright © 2011-2022 走看看