Saber la unidad de un número

[[Luis M.]]

Me funciona perfecto.
Muchas gracias.
Ya me había armado algo, lo pongo igualmente aquí.

Código Delphi [-]
Label1.Caption := Copy((IntToStr(14752343240)),Length(IntToStr(14752343240)),1);

tu código muchisimo mejor.
Un saludo.

[Casimiro Noteví]

Empezado por Luis M.

tu código muchisimo mejor.

[ecfisa]

Hola Luis.

Sin embargo, tu función puede ser útil en casos especiales en que sería imposible usar la otra, por ejemplo:

Código Delphi [-]
var
  numStr: string;
  ultDig: Integer;
begin
  numStr:= '99147529999343245987123598199952245933587';
  ultDig:= StrToInt(Copy(numStr, Length(numStr), 1));
  ...

Saludos

[Casimiro Noteví]

También es cierto

[[Luis M.]]

Empezado por ecfisa

Sin embargo, tu función puede ser útil en casos especiales en que sería imposible usar la otra

Saludos

Vaya...
Me alegra poder aportar algo útil.

Muchas gracias y un saludo.