David

VB looks like this.

Dim TopLeftX As Long
Dim TopLeftY As Long
Dim BottomRightX As Long
Dim BottomRightY As Long
Dim PageNo As Integer
Dim strBarcode As String

PageNo = SoftekBarcode1.GetBarStringPos(1, TopLeftX, TopLeftY, BottomRightX, BottomRightY)

My implementation in VFP (I have tried several variations) is as follows:

PUBLIC TopLeftX, TopLeftY, BottomRightX, BottomRightY as Long


lcPage = thisform.OLEreader.GetBarStringPos (1, TopLeftX, TopLeftY, BottomRightX, BottomRightY)

Larry