PosWord                                                       StrngTTT



Purpose   To determine the starting character position of a word.

Returns   byte;

Declaration    PosWord(WordNo:byte; Str:string):byte;

          WordNo is the number of the word to check
          Str is the string to be analyzed

Uses StrngTTT.



Remarks   The function returns zero if the string is a null or if
          there are less than WordNo words in the string.

Example


               USES STRNGTTT;
               VAR B : BYTE;
               BEGIN
                 B := POSWORD(3,'THE QUICK BROWN LINEMAN');
               END.


The variable B is assigned the value 11.