GdPictureImaging.Barcode1DReaderGetBarcodeCount Method

Returns the number of barcode detected by the Barcode1DReaderDoScan function.

public int Barcode1DReaderGetBarcodeCount();

Visual Basic

Public Function Barcode1DReaderGetBarcodeCount() As Integer

Returns

The number of barcode detected.

Remarks

This function requires the optional GdPicture 1D Barcode Recognition Plugin. This Plugin must be unlocked with the SetLicenseNumber1DBarcodeRecognition() function.

Example

Detecting all barcode of an image

Copy Code

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
   Dim oGdPictureImaging As New GdPicture.GdPictureImaging
   Dim ImageID As Integer
 
   oGdPictureImaging.SetLicenseNumber("XXX") 'Unlocking GdPicture.NET -> Replace XXX by a valid license KEY
   oGdPictureImaging.SetLicenseNumber1DBarcodeRecognition("XXX") 'Unlocking the optional GdPicture 1D Barcode Recognition Plugin -> Replace XXX by a valid license KEY
 
   ImageID = oGdPictureImaging.CreateGdPictureImageFromFile("") 'Prompt the user to select an image
 
   If ImageID <> 0 Then
       If oGdPictureImaging.Barcode1DReaderDoScan(ImageID) = GdPictureStatus.OK Then 'Start barcode scanning process
           Dim BarcodeCount As Integer = oGdPictureImaging.Barcode1DReaderGetBarcodeCount
 
           If BarcodeCount > 0 Then
               For i As Integer = 1 To BarcodeCount
                   MsgBox("Barcode No: " & Str(i))
                   MsgBox("Type: " & oGdPictureImaging.Barcode1DReaderGetBarcodeType(i).ToString)
                   MsgBox("Value: " & oGdPictureImaging.Barcode1DReaderGetBarcodeValue(i))
                   MsgBox("Angle: " & Str(oGdPictureImaging.Barcode1DReaderGetBarcodeSkewAngle(i)))
               Next
           Else
               MsgBox("No barcode detected !")
           End If
 
           oGdPictureImaging.Barcode1DReaderClear() 'Release detection info from memory
       End If
       oGdPictureImaging.ReleaseGdPictureImage(ImageID)
   End If
End Sub