Same as StrToken but searches from the end of S string.

function StrTokenEnd(var S: string; 
                     Sep: Char): string;

ImagingUtility (at line 160)