Public Function Read( _
   ByVal image As RasterImage, _
   ByVal searchRectangle As LeadRect, _
   ByVal searchType As BarcodeSearchTypeFlags, _
   ByVal units As BarcodeUnit, _
   ByVal flags As BarcodeReadFlags, _
   ByVal multipleMaxCount As Integer, _
   ByVal code1d As Barcode1d, _
   ByVal codePdf As BarcodeReadPdf, _
   ByVal codeColor As BarcodeColor _
) As RasterCollection(Of BarcodeData)

Dim instance As BarcodeEngine
Dim image As RasterImage
Dim searchRectangle As LeadRect
Dim searchType As BarcodeSearchTypeFlags
Dim units As BarcodeUnit
Dim flags As BarcodeReadFlags
Dim multipleMaxCount As Integer
Dim code1d As Barcode1d
Dim codePdf As BarcodeReadPdf
Dim codeColor As BarcodeColor
Dim value As RasterCollection(Of BarcodeData)
 
value = instance.Read(image, searchRectangle, searchType, units, flags, multipleMaxCount, code1d, codePdf, codeColor)

public RasterCollection<BarcodeData> Read( 
   RasterImage image,
   LeadRect searchRectangle,
   BarcodeSearchTypeFlags searchType,
   BarcodeUnit units,
   BarcodeReadFlags flags,
   int multipleMaxCount,
   Barcode1d code1d,
   BarcodeReadPdf codePdf,
   BarcodeColor codeColor
)

public:
RasterCollection<BarcodeData^>^ Read( 
   RasterImage^ image,
   LeadRect searchRectangle,
   BarcodeSearchTypeFlags searchType,
   BarcodeUnit units,
   BarcodeReadFlags flags,
   int multipleMaxCount,
   Barcode1d^ code1d,
   BarcodeReadPdf^ codePdf,
   BarcodeColor^ codeColor
) 

Public Sub ReadExample()
      ' Load an image
      Dim codecs As RasterCodecs = New RasterCodecs()
      codecs.ThrowExceptionsOnInvalidImages = True

      Dim image As RasterImage = codecs.Load(Path.Combine(LEAD_VARS.ImagesDir, "barcode1.tif"))

      Dim barEngine As BarcodeEngine

      Try
         ' Unlock barcode support.
         ' Note that this is a sample key, which will not work in your toolkit
         RasterSupport.Unlock(RasterSupportType.Barcodes1D, "TestKey")

         ' Initialize barcodes
         barEngine = New BarcodeEngine()

         Dim bar1d As Barcode1d = New Barcode1d()

         bar1d.Direction = BarcodeDirectionFlags.LeftToRight
         bar1d.ErrorCheck = True
         bar1d.Granularity = 9
         bar1d.MaximumLength = 3
         bar1d.MinimumLength = 1
         bar1d.WhiteLines = 3
         bar1d.OutShowText = True
         bar1d.StandardFlags = Barcode1dStandardFlags.Barcode1dNormal

         Dim barRPDF As BarcodeReadPdf = New BarcodeReadPdf()
         barRPDF.Direction = BarcodeDirectionFlags.LeftToRight

         Dim barColor As BarcodeColor = New BarcodeColor()

         barColor.BarColor = RasterColor.FromKnownColor(RasterKnownColor.Black)
         barColor.SpaceColor = RasterColor.FromKnownColor(RasterKnownColor.White)
         Dim searchRect As LeadRect = LeadRect.Empty

         ' The Read method will search for the first 10 occurrences of the (EAN 13) barcode type
         ' in the bitmap region. If the bitmap does not have a region, the Read method will
         ' search for (EAN 13) barcodes in the whole bitmap.

         Dim readBarcodes As RasterCollection(Of BarcodeData) = barEngine.Read(image, searchRect, BarcodeSearchTypeFlags.Barcode1dEan13, BarcodeUnit.ScanlinesPerPixels, BarcodeReadFlags.BlockSearch Or BarcodeReadFlags.Markers, 0, bar1d, barRPDF, barColor)

         Dim data1 As BarcodeData = CType(readBarcodes(0), BarcodeData)
         Dim count As Integer = data1.TotalCount
         Dim barcodeMsg As String = String.Format("Total Bar Code Symbols Found = {0}", count)
         Console.WriteLine(barcodeMsg)

         Dim i As Integer = 0
         Do While i < count
            Dim strData As String()

            Dim data As BarcodeData = CType(readBarcodes(i), BarcodeData)

            strData = BarcodeData.ConvertToStringArray(data.Data)
            barcodeMsg = String.Format("No. {0}" & Constants.vbLf & "Data is {1}" & Constants.vbLf & "Type {2}" & Constants.vbLf & "Units {3}" & Constants.vbLf & "PosX {4}" & Constants.vbLf & "PosY {5}" & Constants.vbLf & "Width {6}" & Constants.vbLf & "Height {7}" & Constants.vbLf & "Group {8}" & Constants.vbLf & "Duplicate Index {9}" & Constants.vbLf, i, strData(0), data.SearchType.ToString(), data.Unit.ToString(), data.Location.Left.ToString(), data.Location.Top.ToString(), data.Location.Width.ToString(), data.Location.Height.ToString(), data.Group.ToString(), data.IndexDuplicate.ToString())

            Console.WriteLine(barcodeMsg)
            i += 1
         Loop

      Catch ex As BarcodeException
         Console.WriteLine(ex.Message)
      End Try

   End Sub

Public NotInheritable Class LEAD_VARS
   Public Const ImagesDir As String = "C:\Users\Public\Documents\LEADTOOLS Images"
End Class

public void ReadExample()
   {
      // Load an image
      RasterCodecs codecs = new RasterCodecs();
      codecs.ThrowExceptionsOnInvalidImages = true;
      string fileName = Path.Combine(LEAD_VARS.ImagesDir, "barcode1.tif");
      RasterImage image = codecs.Load(fileName);

      BarcodeEngine barEngine;

      try
      {
         // Unlock barcode support.
         // Note that this is a sample key, which will not work in your toolkit
         RasterSupport.Unlock(RasterSupportType.Barcodes1D, "TestKey");

         // Initialize linear barcodes
         barEngine = new BarcodeEngine();

         LeadRect searchRect = LeadRect.Empty;
         Barcode1d bar1d = new Barcode1d();

         bar1d.Direction = BarcodeDirectionFlags.LeftToRight;
         bar1d.ErrorCheck = true;
         bar1d.Granularity = 9;
         bar1d.MaximumLength = 3;
         bar1d.MinimumLength = 1;
         bar1d.WhiteLines = 3;
         bar1d.OutShowText = true;
         bar1d.StandardFlags = Barcode1dStandardFlags.Barcode1dNormal;

         BarcodeReadPdf barRPDF = new BarcodeReadPdf();
         barRPDF.Direction = BarcodeDirectionFlags.LeftToRight;

         BarcodeColor barColor = new BarcodeColor();
         barColor.BarColor = RasterColor.FromKnownColor(RasterKnownColor.Black);
         barColor.SpaceColor = RasterColor.FromKnownColor(RasterKnownColor.White);

         // The Read method will search for the first 10 occurrences of the (EAN 13) barcode type
         // in the bitmap region. If the bitmap does not have a region, the Read method will
         // search for (EAN 13) barcodes in the whole bitmap.

         RasterCollection<BarcodeData> readBarcodes = barEngine.Read(image, searchRect, BarcodeSearchTypeFlags.Barcode1dEan13, BarcodeUnit.ScanlinesPerPixels, BarcodeReadFlags.BlockSearch | BarcodeReadFlags.Markers, 0, bar1d, barRPDF, barColor);

         BarcodeData data1 = (BarcodeData)readBarcodes[0];
         int count = data1.TotalCount;
         string barcodeMsg = string.Format("Total Bar Code Symbols Found = {0}", count);
         Console.WriteLine(barcodeMsg);

         for (int i = 0; i < count; i++)
         {
            string[] strData;

            BarcodeData data = (BarcodeData)readBarcodes[i];

            strData = BarcodeData.ConvertToStringArray(data.Data);
            barcodeMsg = string.Format("No. {0}\nData is {1}\nType {2}\nUnits {3}\nPosX {4}\nPosY {5}\nWidth {6}\nHeight {7}\nGroup {8}\nDuplicate Index {9}\n",
               i,
               strData[0],
               data.SearchType.ToString(),
               data.Unit.ToString(),
               data.Location.Left.ToString(),
               data.Location.Top.ToString(),
               data.Location.Width.ToString(),
               data.Location.Height.ToString(),
               data.Group.ToString(),
               data.IndexDuplicate.ToString());

            Console.WriteLine(barcodeMsg);
         }
      }
      catch (BarcodeException ex)
      {
         Console.WriteLine(ex.Message);
      }

   }

static class LEAD_VARS
{
   public const string ImagesDir = @"C:\Users\Public\Documents\LEADTOOLS Images";
}

public void ReadExample(RasterImage image)
{
   BarcodeEngine barEngine;
   try
   {
      // Unlock barcode support.
      // Note that this is a sample key, which will not work in your toolkit
      RasterSupport.Unlock(RasterSupportType.Barcodes1D, "TestKey");

      // Initialize linear barcodes
      barEngine = new BarcodeEngine();

      LeadRect searchRect = LeadRect.Empty;
      Barcode1d bar1d = new Barcode1d();

      bar1d.Direction = BarcodeDirectionFlags.LeftToRight;
      bar1d.ErrorCheck = true;
      bar1d.Granularity = 9;
      bar1d.MaximumLength = 3;
      bar1d.MinimumLength = 1;
      bar1d.WhiteLines = 3;
      bar1d.OutShowText = true;
      bar1d.StandardFlags = Barcode1dStandardFlags.Barcode1dNormal;

      BarcodeReadPdf barRPDF = new BarcodeReadPdf();
      barRPDF.Direction = BarcodeDirectionFlags.LeftToRight;

      BarcodeColor barColor = new BarcodeColor();
      barColor.BarColor = RasterColor.FromKnownColor(RasterKnownColor.Black);
      barColor.SpaceColor = RasterColor.FromKnownColor(RasterKnownColor.White);

      // The Read method will search for the first 10 occurrences of the (EAN 13) barcode type
      // in the bitmap region. If the bitmap does not have a region, the Read method will
      // search for (EAN 13) barcodes in the whole bitmap.

      RasterCollection<BarcodeData> readBarcodes = barEngine.Read(image, searchRect, BarcodeSearchTypeFlags.Barcode1dEan13, BarcodeUnit.ScanlinesPerPixels, BarcodeReadFlags.BlockSearch | BarcodeReadFlags.Markers, 0, bar1d, barRPDF, barColor);

      BarcodeData data1 = (BarcodeData)readBarcodes[0];
      int count = data1.TotalCount;
      string barcodeMsg = string.Format("Total Bar Code Symbols Found = {0}", count);
      Console.WriteLine(barcodeMsg);

      for (int i = 0; i < count; i++)
      {
         string[] strData;

         BarcodeData data = (BarcodeData)readBarcodes[i];

         strData = BarcodeData.ConvertToStringArray(data.Data);
         barcodeMsg = string.Format("No. {0}\nData is {1}\nType {2}\nUnits {3}\nPosX {4}\nPosY {5}\nWidth {6}\nHeight {7}\nGroup {8}\nDuplicate Index {9}\n",
            i,
            strData[0],
            data.SearchType.ToString(),
            data.Unit.ToString(),
            data.Location.Left.ToString(),
            data.Location.Top.ToString(),
            data.Location.Width.ToString(),
            data.Location.Height.ToString(),
            data.Group.ToString(),
            data.IndexDuplicate.ToString());

         Console.WriteLine(barcodeMsg);
      }
   }
   catch (BarcodeException ex)
   {
      Console.WriteLine(ex.Message);
   }

}

Public Sub ReadExample(ByVal image As RasterImage)
  Dim barEngine As BarcodeEngine
  Try
    ' Unlock barcode support.
    ' Note that this is a sample key, which will not work in your toolkit
    RasterSupport.Unlock(RasterSupportType.Barcodes1D, "TestKey")

    ' Initialize linear barcodes
    barEngine = New BarcodeEngine()

    Dim searchRect As LeadRect = LeadRect.Empty
    Dim bar1d As Barcode1d = New Barcode1d()

    bar1d.Direction = BarcodeDirectionFlags.LeftToRight
    bar1d.ErrorCheck = True
    bar1d.Granularity = 9
    bar1d.MaximumLength = 3
    bar1d.MinimumLength = 1
    bar1d.WhiteLines = 3
    bar1d.OutShowText = True
    bar1d.StandardFlags = Barcode1dStandardFlags.Barcode1dNormal

    Dim barRPDF As BarcodeReadPdf = New BarcodeReadPdf()
    barRPDF.Direction = BarcodeDirectionFlags.LeftToRight

    Dim barColor As BarcodeColor = New BarcodeColor()
    barColor.BarColor = RasterColor.FromKnownColor(RasterKnownColor.Black)
    barColor.SpaceColor = RasterColor.FromKnownColor(RasterKnownColor.White)

    ' The Read method will search for the first 10 occurrences of the (EAN 13) barcode type
    ' in the bitmap region. If the bitmap does not have a region, the Read method will
    ' search for (EAN 13) barcodes in the whole bitmap.

    Dim readBarcodes As RasterCollection(Of BarcodeData) = barEngine.Read(image, searchRect, BarcodeSearchTypeFlags.Barcode1dEan13, BarcodeUnit.ScanlinesPerPixels, BarcodeReadFlags.BlockSearch Or BarcodeReadFlags.Markers, 0, bar1d, barRPDF, barColor)

    Dim data1 As BarcodeData = CType(readBarcodes(0), BarcodeData)
    Dim count As Integer = data1.TotalCount
    Dim barcodeMsg As String = String.Format("Total Bar Code Symbols Found = {0}", count)
    Console.WriteLine(barcodeMsg)

    Dim i As Integer = 0
    Do While i < count
       Dim strData As String()

       Dim data As BarcodeData = CType(readBarcodes(i), BarcodeData)

       strData = BarcodeData.ConvertToStringArray(data.Data)
       barcodeMsg = String.Format("No. {0}" & Constants.vbLf & "Data is {1}" & Constants.vbLf & "Type {2}" & Constants.vbLf & "Units {3}" & Constants.vbLf & "PosX {4}" & Constants.vbLf & "PosY {5}" & Constants.vbLf & "Width {6}" & Constants.vbLf & "Height {7}" & Constants.vbLf & "Group {8}" & Constants.vbLf & "Duplicate Index {9}" & Constants.vbLf, i, strData(0), data.SearchType.ToString(), data.Unit.ToString(), data.Location.Left.ToString(), data.Location.Top.ToString(), data.Location.Width.ToString(), data.Location.Height.ToString(), data.Group.ToString(), data.IndexDuplicate.ToString())

       Console.WriteLine(barcodeMsg)
       i += 1
    Loop
  Catch ex As BarcodeException
    Console.WriteLine(ex.Message)
  End Try

End Sub