Imports Vintasoft.Imaging   
   
Imports Vintasoft.Barcode   
Imports Vintasoft.Barcode.BarcodeInfo   
Imports Vintasoft.Barcode.QualityTests   
   
''' <summary>
''' Test that shows how to test the print quality of multi-row 2D barcodes
''' (PDF417, PDF417Compact and MicroPDF417).
''' </summary>
Class ISO15415QualityTestMultiRowExample   
   
    ''' <summary>
    ''' Runs the test.
    ''' </summary>
    Public Shared Sub Test()   
        ' load image with barcode from file
        Using barcodeImage As VintasoftBitmap = ImageCodecs.[Default].Decode("test1.jpg")   
            ' read barcodes from image and test the print quality of 2D barcodes
            ReadBarcodesAndTestBarcodePrintQuality(barcodeImage)   
        End Using   
    End Sub   
   
    ''' <summary>
    ''' Reads barcodes from image and tests the print quality of 2D barcodes.
    ''' </summary>
    ''' <param name="imageWithBarcodes"></param>
    Public Shared Sub ReadBarcodesAndTestBarcodePrintQuality(imageWithBarcodes As VintasoftBitmap)   
        ' create the barcode reader
        Using reader As New BarcodeReader()   
            ' specify that reader must collect information for quality test
            reader.Settings.CollectTestInformation = True   
   
            ' specify that reader must search for PDF417, PDF417Compact and MicroPDF417 barcodes only
            reader.Settings.ScanBarcodeTypes = BarcodeType.PDF417 Or BarcodeType.PDF417Compact Or BarcodeType.MicroPDF417   
   
            ' read barcodes
            Dim barcodeInfos As IBarcodeInfo() = reader.ReadBarcodes(imageWithBarcodes)   
   
            ' for each found barcode
            For i As Integer = 0 To barcodeInfos.Length - 1   
                ' test print quality of barcode using ISO 15415 test
                Dim test As New ISO15415QualityTest()   
                test.CalculateGrades(DirectCast(barcodeInfos(i), BarcodeInfo2D), imageWithBarcodes)   
   
                ' print results of ISO 15415 test
   
                Console.WriteLine(String.Format("[{0}] {1}", barcodeInfos(i).BarcodeType, barcodeInfos(i).Value))   
                Console.WriteLine(String.Format("Decode                 : {0}", GradeToString(test.DecodeGrade)))   
                Console.WriteLine(String.Format("Unused error correction: {0} ({1}%)", GradeToString(test.UnusedErrorCorrectionGrade), test.UnusedErrorCorrection))   
                If test.StartPatternTestGrade <> ISO15415QualityGrade.Unavailable Then   
                    Console.WriteLine(String.Format("Start pattern test:      {0}", GradeToString(test.StartPatternTestGrade), test.StartPatternTestGrade))   
                End If   
                If test.CenterPatternTestGrade <> ISO15415QualityGrade.Unavailable Then   
                    Console.WriteLine(String.Format("Center pattern test:     {0}", GradeToString(test.CenterPatternTestGrade), test.CenterPatternTest))   
                End If   
                If test.CenterPatternTestGrade <> ISO15415QualityGrade.Unavailable Then   
                    Console.WriteLine(String.Format("Stop pattern test:       {0}", GradeToString(test.CenterPatternTestGrade), test.CenterPatternTestGrade))   
                End If   
                Console.WriteLine(String.Format("Codeword yield:          {0}", GradeToString(test.CodewordYieldGrade), test.CodewordYieldGrade))   
                Console.WriteLine(String.Format("Codeword print quality:  {0}", GradeToString(test.CodewordPrintQualityGrade), test.CodewordPrintQualityGrade))   
                If test.QuietZone >= 0 Then   
                    Console.WriteLine(String.Format("Quiet zone:              {0} ({1} %)", GradeToString(test.QuietZoneGrade), test.QuietZone))   
                End If   
                Console.WriteLine(String.Format("Distortion angle:        {0}�", test.DistortionAngle))   
                Console.WriteLine(String.Format("-------------Scan grade: {0}", GradeToString(test.ScanGrade)))   
                Console.WriteLine()   
            Next   
        End Using   
    End Sub   
   
    ''' <summary>
    ''' Converts ISO15415 quality grade into string value.
    ''' </summary>
    Private Shared Function GradeToString(grade As ISO15415QualityGrade) As String   
        Return String.Format("{0}({1})", CInt(grade).ToString(), grade)   
    End Function   
   
End Class

using System;

using Vintasoft.Imaging;

using Vintasoft.Barcode;
using Vintasoft.Barcode.BarcodeInfo;
using Vintasoft.Barcode.QualityTests;

/// <summary>
/// Test that shows how to test the print quality of multi-row 2D barcodes
/// (PDF417, PDF417Compact and MicroPDF417).
/// </summary>
class ISO15415QualityTestMultiRowExample
{

    /// <summary>
    /// Runs the test.
    /// </summary>
    public static void Test()
    {
        // load image with barcode from file
        using (VintasoftBitmap barcodeImage = ImageCodecs.Default.Decode("test1.jpg"))
        {
            // read barcodes from image and test the print quality of 2D barcodes
            ReadBarcodesAndTestBarcodePrintQuality(barcodeImage);
        }
    }
    
    /// <summary>
    /// Reads barcodes from image and tests the print quality of 2D barcodes.
    /// </summary>
    /// <param name="imageWithBarcodes"></param>
    public static void ReadBarcodesAndTestBarcodePrintQuality(VintasoftBitmap imageWithBarcodes)
    {
        // create the barcode reader
        using (BarcodeReader reader = new BarcodeReader())
        {
            // specify that reader must collect information for quality test
            reader.Settings.CollectTestInformation = true;

            // specify that reader must search for PDF417, PDF417Compact and MicroPDF417 barcodes only
            reader.Settings.ScanBarcodeTypes =
                BarcodeType.PDF417 | BarcodeType.PDF417Compact | BarcodeType.MicroPDF417;

            // read barcodes
            IBarcodeInfo[] barcodeInfos = reader.ReadBarcodes(imageWithBarcodes);

            // for each found barcode
            for (int i = 0; i < barcodeInfos.Length; i++)
            {
                // test print quality of barcode using ISO 15415 test
                ISO15415QualityTest test = new ISO15415QualityTest();
                test.CalculateGrades((BarcodeInfo2D)barcodeInfos[i], imageWithBarcodes);

                // print results of ISO 15415 test

                Console.WriteLine(string.Format("[{0}] {1}",
                    barcodeInfos[i].BarcodeType, barcodeInfos[i].Value));
                Console.WriteLine(string.Format("Decode                 : {0}",
                    GradeToString(test.DecodeGrade)));
                Console.WriteLine(string.Format("Unused error correction: {0} ({1}%)",
                    GradeToString(test.UnusedErrorCorrectionGrade), test.UnusedErrorCorrection));
                if (test.StartPatternTestGrade != ISO15415QualityGrade.Unavailable)
                    Console.WriteLine(string.Format("Start pattern test:      {0}",
                        GradeToString(test.StartPatternTestGrade), test.StartPatternTestGrade));
                if (test.CenterPatternTestGrade != ISO15415QualityGrade.Unavailable)
                    Console.WriteLine(string.Format("Center pattern test:     {0}",
                        GradeToString(test.CenterPatternTestGrade), test.CenterPatternTest));
                if (test.CenterPatternTestGrade != ISO15415QualityGrade.Unavailable)
                    Console.WriteLine(string.Format("Stop pattern test:       {0}",
                        GradeToString(test.CenterPatternTestGrade), test.CenterPatternTestGrade));
                Console.WriteLine(string.Format("Codeword yield:          {0}",
                    GradeToString(test.CodewordYieldGrade), test.CodewordYieldGrade));
                Console.WriteLine(string.Format("Codeword print quality:  {0}",
                    GradeToString(test.CodewordPrintQualityGrade), test.CodewordPrintQualityGrade));
                if (test.QuietZone >= 0)
                    Console.WriteLine(string.Format("Quiet zone:              {0} ({1} %)",
                        GradeToString(test.QuietZoneGrade), test.QuietZone));
                Console.WriteLine(string.Format("Distortion angle:        {0}°",
                    test.DistortionAngle));
                Console.WriteLine(string.Format("-------------Scan grade: {0}",
                    GradeToString(test.ScanGrade)));
                Console.WriteLine();
            }
        }
    }

    /// <summary>
    /// Converts ISO15415 quality grade into string value.
    /// </summary>
    static string GradeToString(ISO15415QualityGrade grade)
    {
        return string.Format("{0}({1})", ((int)grade).ToString(), grade);
    }

}