GetRecognizedWords Example for C++ 5.0 and later

Private Sub TestGetRecognizedWords ()
   Dim strBuffer As String
   Dim wordsCount As Integer
   Dim i As Integer
   
   RasterDoc.GetRecognizedWords 0
   wordsCount = RasterDoc.RecognizedWordsCount
   For i = 0 To wordsCount - 1
      strBuffer = "Word = " + RasterDoc.RecognizedWord(i) + Chr(13) + _
                  "Zone Index = " + CStr(RasterDoc.RecognizedWordZone(i)) + Chr(13) + _
                  "Area {" + CStr(RasterDoc.RecognizedWordLeft(i)) + _
                  ", " + CStr(RasterDoc.RecognizedWordTop(i)) + _
                  ", " + CStr(RasterDoc.RecognizedWordWidth(i) + RasterDoc.RecognizedWordLeft(i)) + _
                  ", " + CStr(RasterDoc.RecognizedWordHeight(i) + RasterDoc.RecognizedWordTop(i)) + "}"
      MsgBox strBuffer
   Next
End Sub