Solamente el Ultimo digito

[[enecumene]]

Mira un pequeño ejemplo de la funcion RightStr por si acaso, y es como dice johhny que debes verificar que SysUtil este en el uses del proyecto:

Código Delphi [-]
var s : string;
begin
  
s := 'ABOUT DELPHI PROGRAMMING';
s := RightStr(s,5); //aqui en tu caso seria en vez de 5 es 1
// s = 'MMING' resultado
end;

espero que te aclare.

Saludos.