function Pos(SubStr, S: AnyString): Integer;
Searches for SubStr within S and returns the first index of SubStr within S, 1-based. If SubStr is not found, Pos returns zero. The Pos function is case-sensitive.
RPos