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

IBarcodeService Interface

Example 





Members 
Represents the WCF Service contract for a barcode service.
Object Model
IBarcodeService Interface
Syntax
[ServiceContractAttribute(Name="IBarcodeService", Namespace="http://Leadtools.Services.Barcode.ServiceContracts/2009/01")]
public interface IBarcodeService 
'Declaration
 
<ServiceContractAttribute(Name="IBarcodeService", Namespace="http://Leadtools.Services.Barcode.ServiceContracts/2009/01")>
Public Interface IBarcodeService 
'Usage
 
Dim instance As IBarcodeService
[ServiceContractAttribute(Name="IBarcodeService", Namespace="http://Leadtools.Services.Barcode.ServiceContracts/2009/01")]
public interface IBarcodeService 
function Leadtools.Services.Barcode.ServiceContracts.IBarcodeService() 
[ServiceContractAttribute(Name="IBarcodeService", Namespace="http://Leadtools.Services.Barcode.ServiceContracts/2009/01")]
public interface class IBarcodeService 
Remarks

Use the Read operation to search for barcodes within the specified area, or the Write operation to write linear, PDF417, MicroPDF417, Data Matrix, and QR barcode symbols over the image.

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(Path.Combine(LEAD_VARS.ImagesDir, "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();
   }

static class LEAD_VARS
{
   public const string ImagesDir = @"C:\Users\Public\Documents\LEADTOOLS Images";
}
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

IBarcodeService Members
Leadtools.Services.Barcode.ServiceContracts Namespace

Represents the WCF Service contract for a barcode service.
Object Model
IBarcodeService Interface
Syntax
[ServiceContractAttribute(Name="IBarcodeService", Namespace="http://Leadtools.Services.Barcode.ServiceContracts/2009/01")]
public interface IBarcodeService 
'Declaration
 
<ServiceContractAttribute(Name="IBarcodeService", Namespace="http://Leadtools.Services.Barcode.ServiceContracts/2009/01")>
Public Interface IBarcodeService 
'Usage
 
Dim instance As IBarcodeService
[ServiceContractAttribute(Name="IBarcodeService", Namespace="http://Leadtools.Services.Barcode.ServiceContracts/2009/01")]
public interface IBarcodeService 
function Leadtools.Services.Barcode.ServiceContracts.IBarcodeService() 
[ServiceContractAttribute(Name="IBarcodeService", Namespace="http://Leadtools.Services.Barcode.ServiceContracts/2009/01")]
public interface class IBarcodeService 
Remarks

Use the Read operation to search for barcodes within the specified area, or the Write operation to write linear, PDF417, MicroPDF417, Data Matrix, and QR barcode symbols over the image.

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(Path.Combine(LEAD_VARS.ImagesDir, "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();
   }

static class LEAD_VARS
{
   public const string ImagesDir = @"C:\Users\Public\Documents\LEADTOOLS Images";
}
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

IBarcodeService Members
Leadtools.Services.Barcode.ServiceContracts 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