Solamente el Ultimo digito

[ContraVeneno]

que bueno que ya quedó, solo como comentario, si revisas la ayuda de delphi presionando F1 para consultar la función RigthStr, ahí mismo te dice que unidad es la que debes de incluir en el uses.

Empezado por F1_Ayuda_Delphi

RightStr Routine Returns the substring of a specified length that appears at the end of a string.

Unit StrUtils

Syntax
function RightStr(const AText: string; const ACount: Integer): string; overload;

Recuerda que la ayuda de delphi debe de ser tu primer lugar consulta.

[Camilo]

Gracias Contraveneno tienes razon.

Gracias