平鋪背景通常是指用一個(gè)或多個(gè)小圖像重復(fù)填充的背景。在本文中，您將學(xué)習(xí)如何在 PDF 中平鋪圖像，并使用 C# 和 VB.NET 為您的 PDF 創(chuàng)建平鋪背景。

Spire.PDF for .NET 是一款獨(dú)立 PDF 控件，用于 .NET 程序中創(chuàng)建、編輯和操作 PDF 文檔。使用 Spire.PDF 類(lèi)庫(kù)，開(kāi)發(fā)人員可以新建一個(gè) PDF 文檔或者對(duì)現(xiàn)有的 PDF 文檔進(jìn)行處理，且無(wú)需安裝 Adobe Acrobat。

E-iceblue 功能類(lèi)庫(kù)Spire 系列文檔處理組件均由中國(guó)本土團(tuán)隊(duì)研發(fā)，不依賴(lài)第三方軟件，不受其他國(guó)家的技術(shù)或法律法規(guī)限制，同時(shí)適配國(guó)產(chǎn)操作系統(tǒng)如中科方德、中標(biāo)麒麟等，兼容國(guó)產(chǎn)文檔處理軟件 WPS（如 .wps/.et/.dps 等格式

Spire.PDF for.net下載 

步驟 1：創(chuàng)建一個(gè) PdfDocument 對(duì)象并加載示例 PDF 文檔。

PdfDocument pdf = new PdfDocument();
pdf.LoadFromFile("sample.pdf");

第 2 步：將圖像文件加載到 PdfImage 對(duì)象。

PdfImage image = PdfImage.FromFile("logo.png");

步驟3：創(chuàng)建一個(gè)PdfTilingBrush對(duì)象，指定其大小，設(shè)置畫(huà)筆的透明度，并在畫(huà)筆的指定位置繪制圖像。

PdfTilingBrush brush = new PdfTilingBrush(new SizeF(pdf.Pages[1].Canvas.Size.Width / 3, pdf.Pages[1].Canvas.Size.Height / 5));
brush.Graphics.SetTransparency(0.2f);
brush.Graphics.DrawImage(image,new PointF((brush.Size.Width-image.Width)/2,(brush.Size.Height-image.Height)/2));

步驟 4：使用畫(huà)筆在 PDF 頁(yè)面上繪制矩形。

pdf.Pages[1].Canvas.DrawRectangle(brush, new RectangleF(new PointF(0, 0), page.Canvas.Size));

步驟 5：保存文件。

pdf.SaveToFile("output.pdf");

輸出：

完整代碼：

[C#]

using Spire.Pdf;
using Spire.Pdf.Graphics;
using System.Drawing;

namespace Image
{
class Program
{
static void Main(string[] args)
{
PdfDocument pdf = new PdfDocument();
pdf.LoadFromFile("sample.pdf");

PdfImage image = PdfImage.FromFile("logo.png");
foreach (PdfPageBase page in pdf.Pages)
{
PdfTilingBrush brush = new PdfTilingBrush(new SizeF(page.Canvas.Size.Width / 3, page.Canvas.Size.Height / 5));
brush.Graphics.SetTransparency(0.2f);
brush.Graphics.DrawImage(image, new PointF((brush.Size.Width - image.Width) / 2, (brush.Size.Height - image.Height) / 2));
page.Canvas.DrawRectangle(brush, new RectangleF(new PointF(0, 0), page.Canvas.Size));
}
pdf.SaveToFile("output.pdf");
}
}
}

[VB.NET]

Imports Spire.Pdf
Imports Spire.Pdf.Graphics
Imports System.Drawing

Namespace Image
Class Program
Private Shared Sub Main(args As String())
Dim pdf As New PdfDocument()
pdf.LoadFromFile("sample.pdf")

Dim image As PdfImage = PdfImage.FromFile("logo.png")
For Each page As PdfPageBase In pdf.Pages
Dim brush As New PdfTilingBrush(New SizeF(page.Canvas.Size.Width / 3, page.Canvas.Size.Height / 5))
brush.Graphics.SetTransparency(0.2F)
brush.Graphics.DrawImage(image, New PointF((brush.Size.Width - image.Width) / 2, (brush.Size.Height - image.Height) / 2))
page.Canvas.DrawRectangle(brush, New RectangleF(New PointF(0, 0), page.Canvas.Size))
Next
pdf.SaveToFile("output.pdf")
End Sub
End Class
End Namespace

歡迎下載|體驗(yàn)更多E-iceblue產(chǎn)品