[[oscarac]]

quiza esto te pueda Servir

es una funcion que te detecta si un digito es un numero

function IsNumeric(s: String) : Boolean;
var
  Code: Integer;
  Value: Double;
begin
  val(s, Value, Code);
  Result := (Code = 0)
end;

Si es true entonces es un numero si no es un caracter

saludos