Ver Mensaje Individual
  #4  
Antiguo 24-06-2004
Avatar de roman
roman roman is offline
Moderador
 
Registrado: may 2003
Ubicación: Ciudad de México
Posts: 20.269
Reputación: 10
roman Es un diamante en brutoroman Es un diamante en brutoroman Es un diamante en bruto
Cita:
Empezado por ctronx
Este procedimiento ya existe en delphi como funcion o algo asi?
Sí, disculpa, en efecto no quedaba claro. La función Val es una función incluida en Delphi y sólo te explicaba como se usa.

Se podría implementar una función isnumber usando Val, por ejemplo:

Código Delphi [-]
function IsNumber(S: String): Boolean;
var
  Number, Code: Integer;

begin
  Val(S, Number, Code);
  Result := (Code = 0);
end;

// Saludos
Responder Con Cita