function RPos(SubStr, S: String): Integer;
Выполняет поиск подстроки SubStr в строке S и возвращает позицию последнего вхождения SubStr в S (отсчёт начинается с 1). Если подстрока SubStr не найдена, функция возвращает ноль. Функция RPos чувствительна к регистру символов.