''' <summary>
''' Embeds all fonts into PDF document.
''' </summary>
''' <param name="pdfFilename">The filename of PDF document.</param>
''' <param name="pathToFonts">The path to available fonts.</param>
''' <param name="resultFilename">The filename of resulting PDF document.</param>
Public Shared Sub EmbedAllFontsIntoDocument(pdfFilename As String, pathToFonts As String, resultFilename As String)
    Using document As New Vintasoft.Imaging.Pdf.PdfDocument(pdfFilename)
        ' set a font programs controller
        document.FontProgramsController = New Vintasoft.Imaging.Fonts.FileFontProgramsController(True, pathToFonts)
        ' embed all fonts
        document.FontManager.EmbedAllFonts()
        ' pack and save document to new location
        document.Pack(resultFilename)
    End Using
End Sub

/// <summary>
/// Embeds all fonts into PDF document.
/// </summary>
/// <param name="pdfFilename">The filename of PDF document.</param>
/// <param name="pathToFonts">The path to available fonts.</param>
/// <param name="resultFilename">The filename of resulting PDF document.</param>
public static void EmbedAllFontsIntoDocument(string pdfFilename, string pathToFonts, string resultFilename)
{
    using (Vintasoft.Imaging.Pdf.PdfDocument document = new Vintasoft.Imaging.Pdf.PdfDocument(pdfFilename))
    {
        // set a font programs controller
        document.FontProgramsController = new Vintasoft.Imaging.Fonts.FileFontProgramsController(true, pathToFonts);
        // embed all fonts
        document.FontManager.EmbedAllFonts();
        // pack and save document to new location
        document.Pack(resultFilename);
    }
}