Imaging1.SetNativeImage (GdViewer1.GetNativeImage)
Imaging1.SetLicenseNumber1DBarcodeRecognition ("XXX") 'Replace XXX by a commercial or a demo key
Imaging1.Barcode1DReaderDoScan
For i = 1 To Imaging1.Barcode1DReaderGetBarcodeCount
MsgBox "Value: " + Imaging1.Barcode1DReaderGetBarcodeValue(i)
MsgBox "Type: " + Str(Imaging1.Barcode1DReaderGetBarcodeType(i))
MsgBox "Angle: " + Str(Imaging1.Barcode1DReaderGetBarcodeSkewAngle(i))
Next i
Imaging1.Barcode1DReaderClearReturn to Example requests & Code samples
Users browsing this forum: No registered users and 0 guests