LEADTOOLS WCF Barcode (Leadtools.Services.Barcode.DataContracts assembly)
LEAD Technologies, Inc

ReadResponse Class

Example 





Members 
The ReadResponse object provides options for the Leadtools.Services.Barcode.ServiceContracts.IBarcodeService.Read operation.
Object Model
ReadResponse ClassBarcodes ClassBarcodeData Class
Syntax
[DataContractAttribute(Namespace="http://Leadtools.Services.Barcode.DataContracts/2009/01", Name="ReadResponse")]
public class ReadResponse 
'Declaration
 
<DataContractAttribute(Namespace="http://Leadtools.Services.Barcode.DataContracts/2009/01", Name="ReadResponse")>
Public Class ReadResponse 
'Usage
 
Dim instance As ReadResponse
public sealed class ReadResponse 
function Leadtools.Services.Barcode.DataContracts.ReadResponse()
[DataContractAttribute(Namespace="http://Leadtools.Services.Barcode.DataContracts/2009/01", Name="ReadResponse")]
public ref class ReadResponse 
Example
 
Public Sub ReadExample()
      Dim client As BarcodeServiceClient = New BarcodeServiceClient()
      Dim sourceBinaryData As RawBinaryData = New RawBinaryData()
      sourceBinaryData.Data = File.ReadAllBytes(Path.Combine(LEAD_VARS.ImagesDir, "barcode2.tif"))

      Dim searchRectangle As LeadRectangle = New LeadRectangle()
      searchRectangle.X = 0
      searchRectangle.Y = 0
      searchRectangle.Width = 0
      searchRectangle.Height = 0

      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 barPDF As BarcodeReadPdf = New BarcodeReadPdf()
      barPDF.Direction = BarcodeDirectionFlags.LeftToRight

      Dim barColor As BarcodeColor = New BarcodeColor()
      barColor.BarColor = "Black"
      barColor.SpaceColor = "White"

      Dim options As ReadOptions = New ReadOptions()

      Dim barcode1d4State As ReadBarcode1d4State = New ReadBarcode1d4State()
      barcode1d4State.Flags = ReadBarcode1d4StateFlags.AustralianPost
      options.Add(barcode1d4State)

      Dim barcode1dStandard As ReadBarcode1dStandard = New ReadBarcode1dStandard()
      barcode1dStandard.Flags = ReadBarcodeStandardFlags.All
      options.Add(barcode1dStandard)

      Dim barcode2DQr As ReadBarcode2DQr = New ReadBarcode2DQr()
      barcode2DQr.Flags = ReadBarcode2DQrFlags.QrCode
      options.Add(barcode2DQr)

      Dim barcode2DPdf417 As ReadBarcode2DPdf417 = New ReadBarcode2DPdf417()
      barcode2DPdf417.Flags = ReadBarcode2DPdf417Flags.Pdf417
      options.Add(barcode2DPdf417)

      Dim barcode2DMicroPdf417 As ReadBarcode2DMicroPdf417 = New ReadBarcode2DMicroPdf417()
      barcode2DMicroPdf417.Flags = ReadBarcode2DMicroPdf417Flags.MicroPdf417
      options.Add(barcode2DMicroPdf417)


      Dim request As ReadRequest = New ReadRequest()

      request.Code1d = bar1d
      request.CodeColor = barColor
      request.CodePdf = barPDF
      request.MultipleMaxCount = 0
      request.Options = options
      request.ReadFlags = BarcodeReadFlags.BlockSearch Or BarcodeReadFlags.Markers
      request.SearchRectangle = searchRectangle
      request.Source = sourceBinaryData
      request.TypeFlags = BarcodeMajorTypeFlags.Barcodes1d Or BarcodeMajorTypeFlags.Barcodes2dRead Or BarcodeMajorTypeFlags.BarcodesQrRead
      request.Unit = BarcodeUnit.ScanlinesPerPixels


      Dim response As ReadResponse = client.Read(request)

      If Not response.Barcodes Is Nothing Then
         Dim barcodeMsg As String = String.Format("Total Bar Code Symbols Found = {0}", response.Barcodes.Count)
         Console.WriteLine(barcodeMsg)

         Dim i As Integer = 0
         For Each data As BarcodeData In response.Barcodes
            i += 1
            barcodeMsg = String.Format("No. {0}" & Constants.vbLf & "Type {1}" & Constants.vbLf & "Units {2}" & Constants.vbLf & "PosX {3}" & _
                                       Constants.vbLf & "PosY {4}" & Constants.vbLf & "Width {5}" & Constants.vbLf & "Height {6}" & _
                                       Constants.vbLf & "Group {7}" & Constants.vbLf & "Duplicate Index {8}" & Constants.vbLf, i, data.Type.ToString(), _
                                       data.Unit.ToString(), data.Location.X.ToString(), data.Location.Y.ToString(), data.Location.Width.ToString(), _
                                       data.Location.Height.ToString(), data.Group.ToString(), data.IndexDuplicate.ToString())

            Console.WriteLine(barcodeMsg)
         Next data
      End If

      client.Close()
   End Sub

Public NotInheritable Class LEAD_VARS
   Public Const ImagesDir As String = "C:\Users\Public\Documents\LEADTOOLS Images"
End Class
public void ReadExample()
{
   BarcodeServiceClient client = new BarcodeServiceClient();
   RawBinaryData sourceBinaryData = new RawBinaryData();
   sourceBinaryData.Data = File.ReadAllBytes(LeadtoolsExamples.Common.ImagesPath.Path + "barcode2.tif");

   LeadRectangle searchRectangle = new LeadRectangle();
   searchRectangle.X = 0;
   searchRectangle.Y = 0;
   searchRectangle.Width = 0;
   searchRectangle.Height = 0;

   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 barPDF = new BarcodeReadPdf();
   barPDF.Direction = BarcodeDirectionFlags.LeftToRight;

   BarcodeColor barColor = new BarcodeColor();
   barColor.BarColor = "Black";
   barColor.SpaceColor = "White";

   ReadOptions options = new ReadOptions();

   ReadBarcode1d4State barcode1d4State = new ReadBarcode1d4State();
   barcode1d4State.Flags = ReadBarcode1d4StateFlags.AustralianPost;
   options.Add(barcode1d4State);

   ReadBarcode1dStandard barcode1dStandard = new ReadBarcode1dStandard();
   barcode1dStandard.Flags = ReadBarcodeStandardFlags.All;
   options.Add(barcode1dStandard);

   ReadBarcode2DQr barcode2DQr = new ReadBarcode2DQr();
   barcode2DQr.Flags = ReadBarcode2DQrFlags.QrCode;
   options.Add(barcode2DQr);

   ReadBarcode2DPdf417 barcode2DPdf417 = new ReadBarcode2DPdf417();
   barcode2DPdf417.Flags = ReadBarcode2DPdf417Flags.Pdf417;
   options.Add(barcode2DPdf417);

   ReadBarcode2DMicroPdf417 barcode2DMicroPdf417 = new ReadBarcode2DMicroPdf417();
   barcode2DMicroPdf417.Flags = ReadBarcode2DMicroPdf417Flags.MicroPdf417;
   options.Add(barcode2DMicroPdf417);


   ReadRequest request = new ReadRequest();

   request.Code1d = bar1d;
   request.CodeColor = barColor;
   request.CodePdf = barPDF;
   request.MultipleMaxCount = 0;
   request.Options = options;
   request.ReadFlags = BarcodeReadFlags.BlockSearch | BarcodeReadFlags.Markers;
   request.SearchRectangle = searchRectangle;
   request.Source = sourceBinaryData;
   request.TypeFlags = BarcodeMajorTypeFlags.Barcodes1d | BarcodeMajorTypeFlags.Barcodes2dRead | BarcodeMajorTypeFlags.BarcodesQrRead;
   request.Unit  = BarcodeUnit.ScanlinesPerPixels;


   ReadResponse response = client.Read(request);

   if (response.Barcodes != null)
   {
      string barcodeMsg = string.Format("Total Bar Code Symbols Found = {0}", response.Barcodes.Count);
      Console.WriteLine(barcodeMsg);

      int i = 0;
      foreach (BarcodeData data in response.Barcodes)
      {
         i++;
         barcodeMsg = string.Format("No. {0}\nType {1}\nUnits {2}\nPosX {3}\nPosY {4}\nWidth {5}\nHeight {6}\nGroup {7}\nDuplicate Index {8}\n",
            i,
            data.Type.ToString(),
            data.Unit.ToString(),
            data.Location.X.ToString(),
            data.Location.Y.ToString(),
            data.Location.Width.ToString(),
            data.Location.Height.ToString(),
            data.Group.ToString(),
            data.IndexDuplicate.ToString());

         Console.WriteLine(barcodeMsg);
      } 
   }

   client.Close();
}
Requirements

Target Platforms: Windows 7, Windows Vista SP1 or later, Windows XP SP3, Windows Server 2008 (Server Core not supported), Windows Server 2008 R2 (Server Core supported with SP1 or later), Windows Server 2003 SP2

See Also

Reference

ReadResponse Members
Leadtools.Services.Barcode.DataContracts Namespace

 

 


Products | Support | Contact Us | Copyright Notices

© 2006-2012 All Rights Reserved. LEAD Technologies, Inc.

Applications developed with LEADTOOLS WCF components require runtime licenses. Server licensing is required for applications on a server. For more information, refer to: LEADTOOLS Toolkit Features