条码控件Barcode Xpress中如何获得条码检测结果

条码控件Barcode Xpress提供了条码检测和条码创建的的功能,使用Barcode Xpress将会更加轻松的添加优秀的条码功能到Windows应用程序中。Barcode Xpress支持一系列的1D和2D的条形码,并可以在图像中自动检测所有的条码,还会对检测的所有的条码返回一个详细的且完善的检测结果。

    每个条码结果包含以下的属性参数:

    Barcode value

    Barcode type

    Confidence

    Location

    Skew

    由于Barcode Xpress可以从一个单一的扫描中返回多个条码结果,检测的条码结果都可以按照下面的标准来进行存储,但是需要注意的是所有解决了的条码将会排在没有解决的条码之前。

  1. Confidence因素是决定条码结果排序的条件,一般是从高往低排列。Confidence属性将会获得已经识别过的条码的Confidence。
  2. 下面,对于有着相同的Confidence的任意条码,将会从上到下,然后从左往右的通过位置来进行排序。
    Sort the results top to bottom  
            Dim BarcodeArray() As BarcodeInfo  
            Redim BarcodeArray(0 To BarcodeXpress1.NumBarcodes - 1)  
            ' fill the user type array  
            For i = 0 To BarcodeXpress1.NumBarcodes - 1  
                BarcodeXpress1.GetBarcode i  
                BarcodeArray(i).CodeName = BarcodeXpress1.BarcodeCodeName  
                BarcodeArray(i).result = BarcodeXpress1.BarcodeResult  
                BarcodeArray(i).CheckSumOK = BarcodeXpress1.CheckSumOK  
                BarcodeArray(i).Confidence = BarcodeXpress1.Confidence  
                BarcodeArray(i).Length = BarcodeXpress1.ResultLen  
                BarcodeArray(i).X = BarcodeXpress1.BarcodeX  
                BarcodeArray(i).Y = BarcodeXpress1.BarcodeY  
                BarcodeArray(i).H = BarcodeXpress1.BarcodeH  
                BarcodeArray(i).W = BarcodeXpress1.BarcodeW  
            Next i  
            ' actual sort results top to bottom  
            Dim temp As BarcodeInfo  
            For i = Ubound(BarcodeArray) - 1 To 0 Step -1  
                For j = 0 To i  
                    If BarcodeArray(j).Y > BarcodeArray(j + 1).Y Then  
                        temp = BarcodeArray(j + 1)  
                        BarcodeArray(j + 1) = BarcodeArray(j)  
                        BarcodeArray(j) = temp  
                    End If  
                Next  
            Next  

猜你喜欢

转载自susanhoho.iteye.com/blog/1953766