Конвертирование изображения в файл PDF с добавлением верхнего и нижнего колонтитулов на C# и .NET


Полный код

using System;
using System.IO;
using SautinSoft.PdfVision;

namespace Sample
{
    class Program
    {
        static void Main(string[] args)
        {
            PageHeaderAndFooter();
        }
        public static void PageHeaderAndFooter()
        {
            string inpFile = Path.GetFullPath(@"..\..\..\image-png.png");
            string outFile = new FileInfo(@"Result.pdf").FullName;
			// Before starting, we recommend to get a free 100-day key:
            // https://sautinsoft.com/start-for-free/
            
            // Apply the key here:
			// SautinSoft.PdfVision.SetLicense("...");

            PdfVision v = new PdfVision();

            ImageToPdfOptions options = new ImageToPdfOptions();
            options.PageSetup.PaperType = PaperType.A3;
            options.PageSetup.Orientation = Orientation.Landscape;
            options.PageSetup.PageMargins.Left = LengthUnitConverter.ToPoint(10f, LengthUnit.Millimeter);
            options.PageSetup.PageMargins.Top = LengthUnitConverter.ToPoint(20f, LengthUnit.Millimeter);
            options.PageSetup.PageMargins.Right = LengthUnitConverter.ToPoint(10f, LengthUnit.Millimeter);
            options.PageSetup.PageMargins.Bottom = LengthUnitConverter.ToPoint(30f, LengthUnit.Millimeter);

            // You can add any single-line text into top and bottom of the pages using these properties:
            options.PageNumbering.PageNumbersInTop = "This is a simple document Header!";
            options.PageNumbering.Aligment = HorizontalAlignment.Left;
            options.PageNumbering.FontFamily = PdfStandardFonts.HelveticaOblique;
            options.PageNumbering.FontSize = 28;
           

            try
            {
                v.ConvertImageToPdf(new string[] {inpFile}, outFile, options);
                System.Diagnostics.Process.Start(new System.Diagnostics.ProcessStartInfo(outFile) { UseShellExecute = true });
            }
            catch (Exception ex)
            {
                Console.WriteLine($"Error: {ex.Message}");
                Console.ReadLine();
            }
        }
    }
}

Download

Imports System
Imports System.IO
Imports SautinSoft.PdfVision

Namespace Sample
    Friend Class Program
        Shared Sub Main(args As String())
            PageHeaderAndFooter()
        End Sub

        Public Shared Sub PageHeaderAndFooter()
            Dim inpFile As String = Path.GetFullPath("../../../image-png.png")
            Dim outFile As String = New FileInfo("Result.pdf").FullName

            ' Before starting, we recommend to get a free 100-day key:
            ' https://sautinsoft.com/start-for-free/

            ' Apply the key here:
            ' SautinSoft.PdfVision.SetLicense("...")

            Dim v As New PdfVision()

            Dim options As New ImageToPdfOptions()
            options.PageSetup.PaperType = PaperType.A3
            options.PageSetup.Orientation = Orientation.Landscape
            options.PageSetup.PageMargins.Left = LengthUnitConverter.ToPoint(10.0F, LengthUnit.Millimeter)
            options.PageSetup.PageMargins.Top = LengthUnitConverter.ToPoint(20.0F, LengthUnit.Millimeter)
            options.PageSetup.PageMargins.Right = LengthUnitConverter.ToPoint(10.0F, LengthUnit.Millimeter)
            options.PageSetup.PageMargins.Bottom = LengthUnitConverter.ToPoint(30.0F, LengthUnit.Millimeter)

            ' You can add any single-line text into top and bottom of the pages using these properties:
            options.PageNumbering.PageNumbersInTop = "This is a simple document Header!"
            options.PageNumbering.Aligment = HorizontalAlignment.Left
            options.PageNumbering.FontFamily = PdfStandardFonts.HelveticaOblique
            options.PageNumbering.FontSize = 28

            Try
                v.ConvertImageToPdf({inpFile}, outFile, options)
                Process.Start(New ProcessStartInfo(outFile) With {.UseShellExecute = True})
            Catch ex As Exception
                Console.WriteLine($"Error: {ex.Message}")
                Console.ReadLine()
            End Try
        End Sub
    End Class
End Namespace

Download


Если вам нужен пример кода или у вас есть вопрос: напишите нам по адресу support@sautinsoft.ru или спросите в онлайн-чате (правый нижний угол этой страницы) или используйте форму ниже:



Вопросы и предложения всегда приветствуются!

Мы разрабатываем компоненты .Net с 2002 года. Мы знаем форматы PDF, DOCX, RTF, HTML, XLSX и Images. Если вам нужна помощь в создании, изменении или преобразовании документов в различных форматах, мы можем вам помочь. Мы напишем для вас любой пример кода абсолютно бесплатно.