¿Hay alguna función ya hecha para comprobar si un texto se puede convertir a número?

[noob]

Tengo que coger datos de un TEdit y he pensado en hacer una función que lea el texto caracter a caracter y vaya comprobando si cada caracter es un número pero tal vez exista alguna función que ya haga esto.

[*Caro*]

Hola, tienes la función TryStrToInt que te puede servir.

Código Delphi [-]
var
  entero : Integer;
begin
 if TryStrToInt(Edit1.Text, entero) then
  showmessage('Si es entero')
 else
  showmessage('No es entero');

Saluditos

[[coso]]

Hola, esto tambien te funcionaria :

Código Delphi [-]
function IsNumber(s : string) : boolean;
var
        i : integer;
begin
        result := true;
        for i := 0 to Length(s)-1 do
        result := result and (s[i] in ['0'..'9','+','-','.',',']);
end;

[noob]

Muchísimas gracias.

[Casimiro Noteví]

Cambia esto:

for i := 0 to Length(s)-1 do

por esto otro:

for i := 1 to Length(s) do

[[coso]]

Ahiva, es verdad, siempre pensando en C

[Casimiro Noteví]

Empezado por coso

Ahiva, es verdad, siempre pensando en C

Yo también necesité mucho tiempo para quitarme esa costumbre

[[egostar]]

Empezado por Casimiro Notevi

Yo también necesité mucho tiempo para quitarme esa costumbre

Como no se te quite esta costumbre

Salud OS