LEADTOOLS WCF Barcode (Leadtools.Services.Barcode.DataContracts assembly)

ReadResponse Class

Show in webframe
Example 





Members 
The ReadResponse object provides options for the Leadtools.Services.Barcode.ServiceContracts.IBarcodeService.Read operation.
Object Model
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

            

            
[DataContractAttribute(Namespace="http://Leadtools.Services.Barcode.DataContracts/2009/01", Name="ReadResponse")]
public ref class ReadResponse 
Example
Copy Code  
Imports Leadtools.Services
Imports Leadtools.Services.Barcode.ServiceContracts
Imports Leadtools.Services.Barcode.ServiceImplementations
Imports leadtools.services.barcode.datacontracts._2009._01
Imports leadtools.services.datacontracts._2009._01
Imports leadtools.services.raster.datacontracts._2009._01

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
using Leadtools.Services;
using Leadtools.Services.Barcode.ServiceContracts;
using Leadtools.Services.Barcode.ServiceImplementations;
using leadtools.services.barcode.datacontracts._2009._01;
using leadtools.services.datacontracts._2009._01;
using leadtools.services.raster.datacontracts._2009._01;

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

See Also

Reference

ReadResponse Members
Leadtools.Services.Barcode.DataContracts Namespace

 

 


Products | Support | Contact Us | Copyright Notices
© 2006-2014 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