Ver Mensaje Individual
  #4  
Antiguo 19-04-2004
Avatar de delphi.com.ar
delphi.com.ar delphi.com.ar is online now
Federico Firenze
 
Registrado: may 2003
Ubicación: Buenos Aires, Argentina *
Posts: 5.932
Reputación: 27
delphi.com.ar Va por buen camino
Cita:
Empezado por jachguate
podes intentar convertirlo a un número, y si la conversión falla, asumir que hay algun otro caracter...[/code]
Con la respuesta de jachguate me haces dudar... Si quieres saber si es un número válido, puedes utilizar algo como esto:
Código:
function IsInteger(Valor : String) : Boolean;
var 
  iRes, iErr : Integer;
begin
  Val(Valor, iRes, iErr);
  Result := iErr = 0;
end;

function IsNumber(Value: string): Boolean;
var 
  fRes: Extended;
begin
  Result := TextToFloat(PChar(Value), fRes, fvExtended);
end;
Esto evitará que se produzca una excepción, si quieres saber si la cadena contiene algún número, sin importar si es solo un número, puedes usar la solución que te pase en el hilo anterior.

Saludos!
__________________
delphi.com.ar

Dedique el tiempo suficiente para formular su pregunta si pretende que alguien dedique su tiempo en contestarla.
Responder Con Cita