[gabrielkc]

Algo tienes mal, porque LastDelimiter se definiie como:

function LastDelimiter(const Delimiters, S: string): Integer;


te devuelve la posición del último caracter que indiques en la constante Delimiters