LastPos                                                       StrngTTT



Purpose   To find the last occurence of a character in a string.

Returns   byte;

Declaration    LastPos(C:char; Str:string):byte;

          C is the character to search for.
          Str is the string to search

Uses StrngTTT.


Remarks   If the character is not found in the string, the function
          returns 0.

          The search is case sensitive.

          Also note "pos" Turbo internal Function
Example


               USES STRNGTTT;
               VAR B : BYTE;
               BEGIN
                 B := LASTPOS('J','TECHNOJOCK SOFTWARE!');
               END.


The variable B is assigned the value 12