ToB企服应用市场:ToB评测及商务社交产业平台

标题: 如何通过C#/VB.NET 代码调整PDF文档的页边距 [打印本页]

---

作者: 锦通    时间: 2023-4-27 12:55
标题: 如何通过C#/VB.NET 代码调整PDF文档的页边距
PDF边距是页面主要内容区域和页面边缘之间的距离。与Word页边距不同，PDF文档的页边距很难更改。因为Adobe没有提供操作页边距的直接方法。但是，您可以通过缩放页面内容来改变页边距。本文将介绍如何在不更改页面大小的情况下使用C#/VB.NET 代码调整PDF文档的页边距。

• 增加PDF文档的页边距
  
• 缩短PDF文档的页边距
  

增加PDF文档的页边距

扩大PDF文档边距的方法是新建一个页面尺寸更大的PDF，然后在大页面的合适位置绘制源页面。以下是增加 PDF 文档边距的步骤。

• 初始化PdfDocument对象。
  
• 创建另一个PdfDocument对象，该对象用于创建页面尺寸更大的新PDF文档。
  
• 设置边距的增加值。
  
• 计算新PDF文档的页面大小。
  
• 循环遍历原始文档中的页面，并使用PdfPageBase.CreateTemplate() 方法基于特定页面创建模板。
  
• 使用PdfDocument.Pages.Add() 方法将页面添加到新的PDF文档中。
  
• 使用PdfTemplate.Draw() 方法在页面上的坐标（0，0）处绘制模板。
  
• 使用PdfDocument.SaveToFile()方法将新的PDF文档保存到文件中。
  

完整代码

C#

1. using Spire.Pdf;
2. using Spire.Pdf.Graphics;
3. using System.Drawing;
5. namespace IncreaseMargins
6. {
7.     class Program
8.     {
9.         static void Main(string[] args)
10.         {
11.             //加载原始PDF文档
12.             PdfDocument originalPdf = new PdfDocument("极昼极夜是怎么形成的.pdf");
14.             //获取第一页
15.             PdfPageBase firstPage = originalPdf.Pages[0];
17.             //创建新的PdfDocument对象
18.             PdfDocument newPdf = new PdfDocument();
20.             //设置边距的增加值
21.             PdfMargins margins = newPdf.PageSettings.Margins;
22.             margins.Top = 40;
23.             margins.Bottom = 40;
24.             margins.Left = 40;
25.             margins.Right = 40;
27.             //计算新页面大小
28.             SizeF sizeF = new SizeF(firstPage.Size.Width + margins.Left + margins.Right, firstPage.Size.Height + margins.Top + margins.Bottom);
30.             //循环遍历原始文档中的页面
31.             for (int i = 0; i < originalPdf.Pages.Count; i++)
32.             {
33.                 //基于特定页面创建模板
34.                 PdfTemplate pdfTemplate = originalPdf.Pages[i].CreateTemplate();
36.                 //将页面添加到新的PDF
37.                 PdfPageBase page = newPdf.Pages.Add(sizeF);
39.                 //在页面上绘制模板
40.                 pdfTemplate.Draw(page, 0, 0);
41.             }
43.             //保存新文档
44.             newPdf.SaveToFile("增加页边距.pdf", FileFormat.PDF);
45.         }
46.     }
47. }

复制代码

VB.NET

1. Imports Spire.Pdf
2. Imports Spire.Pdf.Graphics
3. Imports System.Drawing
5. Namespace IncreaseMargins
6.     Friend Class Program
7.         Private Shared Sub Main(ByVal args As String())
8.             '加载原始PDF文档
9.             Dim originalPdf As PdfDocument = New PdfDocument("极昼极夜是怎么形成的.pdf")
11.             '获取第一页
12.             Dim firstPage As PdfPageBase = originalPdf.Pages(0)
14.             '创建新的PdfDocument对象
15.             Dim newPdf As PdfDocument = New PdfDocument()
17.             '设置边距的增加值
18.             Dim margins As PdfMargins = newPdf.PageSettings.Margins
19.             margins.Top = 40
20.             margins.Bottom = 40
21.             margins.Left = 40
22.             margins.Right = 40
24.             '计算新页面大小
25.             Dim sizeF As SizeF = New SizeF(firstPage.Size.Width + margins.Left + margins.Right, firstPage.Size.Height + margins.Top + margins.Bottom)
27.             '循环遍历原始文档中的页面
28.             For i As Integer = 0 To originalPdf.Pages.Count - 1
29.                 '基于特定页面创建模板
30.                 Dim pdfTemplate As PdfTemplate = originalPdf.Pages(i).CreateTemplate()
32.                 '将页面添加到新的PDF
33.                 Dim page As PdfPageBase = newPdf.Pages.Add(sizeF)
35.                 '在页面上绘制模板
36.                 pdfTemplate.Draw(page, 0, 0)
37.             Next
39.             '保存新文档
40.             newPdf.SaveToFile("增加页边距.pdf", FileFormat.PDF)
41.         End Sub
42.     End Class
43. End Namespace

复制代码

效果图


缩小PDF文档的页边距

缩小PDF 边距的方法是新建一个页面尺寸较小的PDF，然后在指定坐标的小页面上绘制源页面。以下是使用 Spire.PDF for .NET 缩小 PDF 文档边距的步骤。

• 在初始化PdfDocument对象时加载原始PDF文档。
  
• 创建另一个PdfDocument对象，该对象用于创建页面尺寸较小的新PDF文档。
  
• 设置边距的减少值。
  
• 计算新PDF文档的页面大小。
  
• 循环遍历原始文档中的页面，并使用PdfPageBase.CreateTemplate() 方法基于特定页面创建模板。
  
• 使用PdfDocument.Pages.Add() 方法将页面添加到新的PDF文档中。
  
• 使用PdfTemplate.Draw() 方法在页面上的指定坐标处绘制模板。
  
• 使用PdfDocument.SaveToFile() 方法将新的PDF文档保存到文件中。
  

完整代码

C#

1. using Spire.Pdf;
2. using Spire.Pdf.Graphics;
3. using System.Drawing;
5. namespace DecreaseMargins
6. {
7.     class Program
8.     {
9.         static void Main(string[] args)
10.         {
11.             //加载原始PDF文档
12.             PdfDocument originalPdf = new PdfDocument("极昼极夜是怎么形成的.pdf");
14.             //获取第一页
15.             PdfPageBase firstPage = originalPdf.Pages[0];
17.             //创建新的PdfDocument对象
18.             PdfDocument newPdf = new PdfDocument();
20.             //设置边距的减少值
21.             float left = -20;
22.             float right = -20;
23.             float top = -20;
24.             float bottom = -20;
26.             //计算新页面大小
27.             SizeF sizeF = new SizeF(firstPage.Size.Width + left + right, firstPage.Size.Height + top + bottom);
29.             //循环遍历原始文档中的页面
30.             for (int i = 0; i < originalPdf.Pages.Count; i++)
31.             {
32.                 //基于特定页面创建模板
33.                 PdfTemplate pdfTemplate = originalPdf.Pages[i].CreateTemplate();
35.                 //将页面添加到新的PDF
36.                 PdfPageBase page = newPdf.Pages.Add(sizeF, new PdfMargins(0));
38.                 //在页面上绘制模板
39.                 pdfTemplate.Draw(page, left, top);
40.             }
42.             //保存新文档
43.             newPdf.SaveToFile("缩小页边距.pdf", FileFormat.PDF);
44.         }
45.     }
46. }

复制代码

VB.NET

1. Imports Spire.Pdf
2. Imports Spire.Pdf.Graphics
3. Imports System.Drawing
5. Namespace DecreaseMargins
6.     Friend Class Program
7.         Private Shared Sub Main(ByVal args As String())
8.             '加载原始PDF文档
9.             Dim originalPdf As PdfDocument = New PdfDocument("极昼极夜是怎么形成的.pdf")
11.             '获取第一页
12.             Dim firstPage As PdfPageBase = originalPdf.Pages(0)
14.             '创建新的PdfDocument对象
15.             Dim newPdf As PdfDocument = New PdfDocument()
17.             '设置边距的减少值
18.             Dim left As Single = -20
19.             Dim right As Single = -20
20.             Dim top As Single = -20
21.             Dim bottom As Single = -20
23.             '计算新页面大小
24.             Dim sizeF As SizeF = New SizeF(firstPage.Size.Width + left + right, firstPage.Size.Height + top + bottom)
26.             '循环遍历原始文档中的页面
27.             For i As Integer = 0 To originalPdf.Pages.Count - 1
28.                 '基于特定页面创建模板
29.                 Dim pdfTemplate As PdfTemplate = originalPdf.Pages(i).CreateTemplate()
31.                 '将页面添加到新的PDF
32.                 Dim page As PdfPageBase = newPdf.Pages.Add(sizeF, New PdfMargins(0))
34.                 '在页面上绘制模板
35.                 pdfTemplate.Draw(page, left, top)
36.             Next
38.             '保存新文档
39.             newPdf.SaveToFile("缩小页边距.pdf", FileFormat.PDF)
40.         End Sub
41.     End Class
42. End Namespace

复制代码

效果图

1. <img src="https://img2023.cnblogs.com/blog/2859233/202304/2859233-20230427103514988-1015828610.jpg" alt="">

复制代码

—本文完—

1.  

复制代码

免责声明：如果侵犯了您的权益，请联系站长，我们会及时删除侵权内容，谢谢合作！

---

欢迎光临 ToB企服应用市场:ToB评测及商务社交产业平台 (https://dis.qidao123.com/)

Powered by Discuz! X3.4