STORE 0 TO TopLeftX, TopLeftY, BottomRightX, BottomRightY>I am trying to get a Visual Basic Active X to work in Foxpro. I do not know VB very well. The Command I am trying to get to work is as follows in VB:
> Dim TopLeftX As Long > Dim TopLeftY As Long > Dim BottomRightX As Long > Dim BottomRightY As Long > Dim PageNo As Integer > Dim strBarcode As String > > strBarcode = SoftekBarcode1.GetBarString(i) > 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)>