''' <summary>
''' Acquires images from eSCL device and saves images to a PDF file.
''' </summary>
Public Sub AcquireImagesFromEsclDeviceAndSaveImagesToPdfFile()
    ' create eSCL device manager
    Using deviceManager As New Vintasoft.EsclImageScanning.EsclDeviceManager()
        ' open eSCL device manager
        deviceManager.Open()

        ' wait while the eSCL device manager searches for eSCL devices
        System.Threading.Thread.Sleep(deviceManager.DeviceSearchTimeout)
        ' get count of eSCL devices
        Dim deviceCount As Integer = deviceManager.Devices.Count
        If deviceCount = 0 Then
            System.Console.WriteLine("Devices are not found.")
            Return
        End If

        ' select the first eSCL device
        Dim device As Vintasoft.EsclImageScanning.EsclDevice = deviceManager.Devices(0)

        ' open eSCL device
        device.Open()

        Dim acquiredImage As Vintasoft.EsclImageScanning.EsclAcquiredImage = Nothing
        Do
            Try
                ' acquire image from eSCL device
                acquiredImage = device.AcquireImageSync()
                ' if image is received
                If acquiredImage IsNot Nothing Then
                    System.Console.WriteLine("Image is acquired.")

                    ' create TIFF encoder settings
                    Dim pdfEncoderSettings As New Vintasoft.EsclImageScanning.ImageEncoders.EsclPdfEncoderSettings()
                    ' specify that image must be added to a PDF file
                    pdfEncoderSettings.PdfMultiPage = True
                    ' specify image must be compressed with ZIP compression
                    pdfEncoderSettings.PdfImageCompression = Vintasoft.EsclImageScanning.ImageEncoders.EsclPdfImageCompression.ZIP

                    ' process acquired image
                    acquiredImage.Save("test.pdf", pdfEncoderSettings)
                Else
                    ' if image is not received
                    System.Console.WriteLine("Scan is completed.")
                    Exit Try
                End If
            Catch ex As System.Exception
                System.Console.WriteLine(String.Format("Scan is failed: {0}", ex.Message))
                Exit Try
            End Try
            ' while image is acquired
        Loop While acquiredImage IsNot Nothing

        ' close eSCL device
        device.Close()

        ' close eSCL device manager
        deviceManager.Close()
    End Using

    System.Console.ReadLine()
End Sub

/// <summary>
/// Acquires images from eSCL device and saves images to a PDF file.
/// </summary>
public void AcquireImagesFromEsclDeviceAndSaveImagesToPdfFile()
{
    // create eSCL device manager
    using (Vintasoft.EsclImageScanning.EsclDeviceManager deviceManager = new Vintasoft.EsclImageScanning.EsclDeviceManager())
    {
        // open eSCL device manager
        deviceManager.Open();

        // wait while the eSCL device manager searches for eSCL devices
        System.Threading.Thread.Sleep(deviceManager.DeviceSearchTimeout);
        // get count of eSCL devices
        int deviceCount = deviceManager.Devices.Count;
        if (deviceCount == 0)
        {
            System.Console.WriteLine("Devices are not found.");
            return;
        }

        // select the first eSCL device
        Vintasoft.EsclImageScanning.EsclDevice device = deviceManager.Devices[0];

        // open eSCL device
        device.Open();

        Vintasoft.EsclImageScanning.EsclAcquiredImage acquiredImage = null;
        do
        {
            try
            {
                // acquire image from eSCL device
                acquiredImage = device.AcquireImageSync();
                // if image is received
                if (acquiredImage != null)
                {
                    System.Console.WriteLine("Image is acquired.");

                    // create TIFF encoder settings
                    Vintasoft.EsclImageScanning.ImageEncoders.EsclPdfEncoderSettings pdfEncoderSettings =
                        new Vintasoft.EsclImageScanning.ImageEncoders.EsclPdfEncoderSettings();
                    // specify that image must be added to a PDF file
                    pdfEncoderSettings.PdfMultiPage = true;
                    // specify image must be compressed with ZIP compression
                    pdfEncoderSettings.PdfImageCompression = Vintasoft.EsclImageScanning.ImageEncoders.EsclPdfImageCompression.ZIP;

                    // process acquired image
                    acquiredImage.Save("test.pdf", pdfEncoderSettings);
                }
                // if image is not received
                else
                {
                    System.Console.WriteLine("Scan is completed.");
                    break;
                }
            }
            catch (System.Exception ex)
            {
                System.Console.WriteLine(string.Format("Scan is failed: {0}", ex.Message));
                break;
            }
        }
        // while image is acquired
        while (acquiredImage != null);

        // close eSCL device
        device.Close();

        // close eSCL device manager
        deviceManager.Close();
    }

    System.Console.ReadLine();
}