delphi - Find the last occurrence of char in a string -

does there exist rtl delphi function determine position of last occurrence of char in string?

try lastdelimiter function part of sysutils unit.