Code: Select all
Imaging1.SetNativeImage (GdViewer1.GetNativeImage)
Imaging1.SetLicenseNumber1DBarcodeRecognition ("XXX") 'Replace XXX by a commercial or a demo key
Imaging1It.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.Barcode1DReaderClear
When I try to run it, the error I get is "Argument not Optional" And it is highlighting "Barcode1DReaderDoScan"
Any help would be greatly appreciated.