PDA

Ver la Versión Completa : Validar que sean numeros


senpiterno
22-11-2004, 19:57:49
Hola Amigos

Bueno, como dice el titulo, existe alguna funcion en Delphi que permita reconocer si una cadena de caracteres es un numero, algo asi como un IsNumeric de VB....

Cualquier ayuda se agradece
Saludos....

marcoszorrilla
22-11-2004, 20:04:53
Si los número son enteros, símplemente conviértelos a enteros y sino da error es que son números validos.


Try
nVariableEntera:=StrToInt(MiCadena);
Except
ShowMessage('El número no es válido);
end;


Un Saludo.

senpiterno
22-11-2004, 20:14:55
...símplemente conviértelos a enteros Es presisamente eso lo que estoy haciendo ahora, convirtieno las cadenas en numeros con StrToInt, pero queria eviar el poner una estructura Try...Except. Por lo que puedo deducir de tu respuesta no existe una funcion en Delphi que valide devolviendo un True o Flase, cuando es un numero o no...
Saludos...

roman
22-11-2004, 20:18:56
Otras formas de hacerlo


var
V: Integer;

begin
if TryStrToInt(Edit1.Text, V) then
ShowMessage('Esto es un número')
else
ShowMessage('Esto no es un número');
end;



var
V: Integer;
Code: Integer;

begin
Val(Edit1.Text, V, Code);

if Code = 0 then
ShowMessage('Esto es un número')
else
ShowMessage('Esto no es un número');
end;


La segunda forma tiene la ventaja de servir para tipos reales también sustituyendo V por un tipo real.

// Saludos

senpiterno
22-11-2004, 20:37:48
Gracias Roman y a ti tambien marcoszorrilla, ya solucione mi problema gracias a su ayuda

Saludos...

ruina
23-11-2004, 16:19:04
jul, que recuerdos, el Val(), es una de esas cosas que uno nunca se acuerda que está ahi desde el principio,