TXT 文件是一种纯文本文件,这种格式的文件能在几乎所有计算机上进行查看,但其功能性较弱,除了储存文件有效字符信息外,不能储存其他任何信息。如果想要在文本文件上进行更多的操作,如插入注解或表单等,可以将文本文件转换成 PDF 文件来实现。本文将展示如何用 Spire.PDF for .NET 以编程的方式将 TXT 文本文件转换为 PDF 文件。
安装 Spire.PDF for .NET
首先,我们需要将 Spire.PDF for .NET 包中包含的 DLL 文件添加为 .NET 项目中的引用。可以从此链接下载 DLL 文件,也可以通过 NuGet 安装 DLL 文件。
PM> Install-Package Spire.PDF
将 TXT 文本文件转换为 PDF 文件
以下是使用 Spire.PDF for .NET 将 TXT 文本文件转换为 PDF 文件的主要步骤:
- 创建 String 类的对象,并用 File.ReadAllText() 方法读取 TXT 文件的文本内容。
- 创建 PdfDocument 类的对象,并用 PdfDocument.Pages.Add() 方法在 PDF 文件中添加一个页面。
- 用读取的文本内容创建 PdfTextWidget 类的对象。
- 用 PdfTextWidget.Draw() 方法将文本添加到 PDF 文件的页面上。
- 用 PdfDocument.SaveToFile() 方法保存结果文件。
- C#
- VB.NET
using Spire.Pdf;
using Spire.Pdf.Graphics;
using System.Drawing;
using System.IO;
namespace ConvertTextToPdf
{
class Program
{
static void Main(string[] args)
{
//读取TXT文件中的文本内容
string text = File.ReadAllText("示例.txt");
//创建PdfDocument类的对象
PdfDocument pdf = new PdfDocument();
//添加一个页面
PdfPageBase page = pdf.Pages.Add();
//创建PdfFont类的对象
PdfTrueTypeFont font = new PdfTrueTypeFont(new Font("宋体", 11f), true);
//创建PdfTextLayout类的对象
PdfTextLayout textLayout = new PdfTextLayout();
textLayout.Break = PdfLayoutBreakType.FitPage;
textLayout.Layout = PdfLayoutType.Paginate;
//创建PdfStringFormat类的对象
PdfStringFormat format = new PdfStringFormat();
format.Alignment = PdfTextAlignment.Justify;
format.LineSpacing = 20f;
//用读取的文本创建PdfTextWidget类的对象
PdfTextWidget textWidget = new PdfTextWidget(text, font, PdfBrushes.Black);
//设置文本格式
textWidget.StringFormat = format;
//将文本添加到页面指定位置
RectangleF bounds = new RectangleF(new PointF(10, 25), page.Canvas.ClientSize);
textWidget.Draw(page, bounds, textLayout);
//保存结果文件
pdf.SaveToFile("TXT转PDF.pdf", FileFormat.PDF);
}
}
}
Imports Spire.Pdf
Imports Spire.Pdf.Graphics
Imports System.Drawing
Imports System.IO
Namespace ConvertTextToPdf
Friend Class Program
Private Shared Sub Main(ByVal args As String())
'读取TXT文件中的文本内容
Dim text = File.ReadAllText("示例.txt")
'创建PdfDocument类的对象
Dim pdf As PdfDocument = New PdfDocument()
'添加一个页面
Dim page As PdfPageBase = pdf.Pages.Add()
'创建PdfFont类的对象
Dim font As PdfFont = New PdfFont(PdfFontFamily.Helvetica, 11)
'创建PdfTextLayout类的对象
Dim textLayout As PdfTextLayout = New PdfTextLayout()
textLayout.Break = PdfLayoutBreakType.FitPage
textLayout.Layout = PdfLayoutType.Paginate
'创建PdfStringFormat类的对象
Dim format As PdfStringFormat = New PdfStringFormat()
format.Alignment = PdfTextAlignment.Justify
format.LineSpacing = 20.0F
'用读取的文本创建PdfTextWidget类的对象
Dim textWidget As PdfTextWidget = New PdfTextWidget(text, font, PdfBrushes.Black)
'设置文本格式
textWidget.StringFormat = format
'将文本添加到页面指定位置
Dim bounds As RectangleF = New RectangleF(New PointF(10, 25), page.Canvas.ClientSize)
textWidget.Draw(page, bounds, textLayout)
'保存结果文件
pdf.SaveToFile("TXT转PDF.pdf", FileFormat.PDF)
End Sub
End Class
End Namespace
申请临时 License
如果您希望删除结果文档中的评估消息,或者摆脱功能限制,请该Email地址已收到反垃圾邮件插件保护。要显示它您需要在浏览器中启用JavaScript。获取有效期 30 天的临时许可证。