Как объединить два RTF документа в памяти на C# и .NET


Полный код

using System;
using System.IO;

namespace Sample
{
    class Test
    {

        static void Main(string[] args)
        {
			// Get your free 30-day key here:   
            // https://sautinsoft.com/start-for-free/
	
            // Merge two RTF documents in memory.
            // If you need more information about "HTML to RTF .Net" email us at:
            // [email protected].
            MergeRtfsInMemory();
        }

        public static void MergeRtfsInMemory()
        {
            SautinSoft.HtmlToRtf h = new SautinSoft.HtmlToRtf();

            // Now we've both RTF documents stored in memory in String objects.
            string rtfString1 = File.ReadAllText(@"..\..\..\footer.rtf");
            string rtfString2 = File.ReadAllText(@"..\..\..\footer.rtf");

            // Let's divide RTF documents using page break.
            h.MergeSetup.PageBreakBetweenDocuments = true;

            string rtfSingle = h.MergeRtfString(rtfString1, rtfString2);

            // Save 'rtfSingle' to a file for demonstration purposes and show it.
            if (!String.IsNullOrEmpty(rtfSingle))
            {
                string singleRtfFile = "Single.rtf";
                File.WriteAllText(singleRtfFile, rtfSingle);
                System.Diagnostics.Process.Start(new System.Diagnostics.ProcessStartInfo(singleRtfFile) { UseShellExecute = true });
            }
        }
    }
}

Download

Imports System
Imports System.IO

Namespace Sample
	Friend Class Test

		Shared Sub Main(ByVal args() As String)
			' Get your free 30-day key here:   
            ' https://sautinsoft.com/start-for-free/
	
			' Merge two RTF documents in memory.
			' If you need more information about "HTML to RTF .Net" email us at:
			' [email protected].
			MergeRtfsInMemory()
		End Sub

		Public Shared Sub MergeRtfsInMemory()
			Dim h As New SautinSoft.HtmlToRtf()

			' Now we've both RTF documents stored in memory in String objects.
			Dim rtfString1 As String = File.ReadAllText("..\..\..\footer.rtf")
			Dim rtfString2 As String = File.ReadAllText("..\..\..\footer.rtf")

			' Let's divide RTF documents using page break.
			h.MergeSetup.PageBreakBetweenDocuments = True

			Dim rtfSingle As String = h.MergeRtfString(rtfString1, rtfString2)

			' Save 'rtfSingle' to a file for demonstration purposes and show it.
			If Not String.IsNullOrEmpty(rtfSingle) Then
				Dim singleRtfFile As String = "Single.rtf"
				File.WriteAllText(singleRtfFile, rtfSingle)
				System.Diagnostics.Process.Start(New System.Diagnostics.ProcessStartInfo(singleRtfFile) With {.UseShellExecute = True})
			End If
		End Sub
	End Class
End Namespace

Download


Если вам нужен пример кода или у вас есть вопрос: напишите нам по адресу [email protected] или спросите в онлайн-чате (правый нижний угол этой страницы) или используйте форму ниже:



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

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