How to Save Results as a Searchable PDF

using IronOcr;

// This code demonstrates how to use IronOcr's IronTesseract class 
// to perform Optical Character Recognition (OCR) on an image and export 
// the result as a searchable PDF file.

class Program
{
    static void Main()
    {
        // Instantiate an instance of the IronTesseract OCR engine
        IronTesseract ocrTesseract = new IronTesseract();

        // Enable the option to render OCR results into a searchable PDF
        ocrTesseract.Configuration.RenderSearchablePdf = true;

        // Load an image input file for OCR processing.
        // The 'using' statement ensures the OcrInput resource is disposed of properly.
        using var imageInput = new OcrInput("Potter.tiff");

        // Perform the OCR operation on the input image and obtain the result.
        OcrResult ocrResult = ocrTesseract.Read(imageInput);

        // Save the OCR results as a searchable PDF. 
        // The output PDF file is named 'searchablePdf.pdf'.
        ocrResult.SaveAsSearchablePdf("searchablePdf.pdf");
    }
}

Imports IronOcr

' This code demonstrates how to use IronOcr's IronTesseract class 
' to perform Optical Character Recognition (OCR) on an image and export 
' the result as a searchable PDF file.

Friend Class Program
	Shared Sub Main()
		' Instantiate an instance of the IronTesseract OCR engine
		Dim ocrTesseract As New IronTesseract()

		' Enable the option to render OCR results into a searchable PDF
		ocrTesseract.Configuration.RenderSearchablePdf = True

		' Load an image input file for OCR processing.
		' The 'using' statement ensures the OcrInput resource is disposed of properly.
		Dim imageInput = New OcrInput("Potter.tiff")

		' Perform the OCR operation on the input image and obtain the result.
		Dim ocrResult As OcrResult = ocrTesseract.Read(imageInput)

		' Save the OCR results as a searchable PDF. 
		' The output PDF file is named 'searchablePdf.pdf'.
		ocrResult.SaveAsSearchablePdf("searchablePdf.pdf")
	End Sub
End Class

// Source Code:

// Export searchable PDF as byte array
byte[] pdfBytes = ocrResult.SaveAsSearchablePdfBytes();

// Check if the byte array is not null and has data
if (pdfBytes != null && pdfBytes.Length > 0)
{
    // Perform operations with the byte array
    Console.WriteLine("PDF bytes have been successfully generated.");
}
else
{
    // Handle the case when byte array is null or empty
    Console.WriteLine("Failed to generate PDF byte array, or it is empty.");
}

// Export searchable PDF as a stream
Stream pdfStream = ocrResult.SaveAsSearchablePdfStream();

// Check if the stream is not null
if (pdfStream != null)
{
    // Ensure the stream's position is set to the start for reading, if the stream supports seeking
    if (pdfStream.CanSeek)
    {
        pdfStream.Position = 0;
    }

    // Perform operations with the stream using a StreamReader
    using (StreamReader reader = new StreamReader(pdfStream))
    {
        // Buffer to hold read characters from the stream
        char[] buffer = new char[100];
        
        // Read characters into the buffer, with a maximum of buffer's length
        int readCount = reader.Read(buffer, 0, buffer.Length);

        // Print a confirmation message with the read character count
        Console.WriteLine($"PDF stream has been successfully generated. Read {readCount} characters.");
    }
}
else
{
    // Handle the case when the stream is null
    Console.WriteLine("Failed to generate the PDF stream.");
}

' Source Code:

' Export searchable PDF as byte array
Dim pdfBytes() As Byte = ocrResult.SaveAsSearchablePdfBytes()

' Check if the byte array is not null and has data
If pdfBytes IsNot Nothing AndAlso pdfBytes.Length > 0 Then
	' Perform operations with the byte array
	Console.WriteLine("PDF bytes have been successfully generated.")
Else
	' Handle the case when byte array is null or empty
	Console.WriteLine("Failed to generate PDF byte array, or it is empty.")
End If

' Export searchable PDF as a stream
Dim pdfStream As Stream = ocrResult.SaveAsSearchablePdfStream()

' Check if the stream is not null
If pdfStream IsNot Nothing Then
	' Ensure the stream's position is set to the start for reading, if the stream supports seeking
	If pdfStream.CanSeek Then
		pdfStream.Position = 0
	End If

	' Perform operations with the stream using a StreamReader
	Using reader As New StreamReader(pdfStream)
		' Buffer to hold read characters from the stream
		Dim buffer(99) As Char

		' Read characters into the buffer, with a maximum of buffer's length
		Dim readCount As Integer = reader.Read(buffer, 0, buffer.Length)

		' Print a confirmation message with the read character count
		Console.WriteLine($"PDF stream has been successfully generated. Read {readCount} characters.")
	End Using
Else
	' Handle the case when the stream is null
	Console.WriteLine("Failed to generate the PDF stream.")
End If