funcion que reemplace el Val de Clipper

[[BlueSteel]]

Hola a todos...

Tengo una consulta... existe alguna funcion o comando que reemplace al VAL que se utilizaba en Clipper

dicha funcion permitia convertir un caracter (string) a numero... pero con la salvedad de que si el string era una letra, palabra o estaba vacio, lo convertia en cero. (0) y no daba error... lo que hace el StrToInt...

[[seoane]]

¿que te parece la funcion StrToIntDef

Código Delphi [-]
var
  i: integer;
  s: string;
begin
  i:= StrToIntDef(S,0);
end;

[[Caral]]

Seoane y Roman
Se que la pregunta es tonta pero me muero de curiosidad
Conozco

Código Delphi [-]
StrToInt

paso de str a int Bueno pero que es esto

Código Delphi [-]
StrToIntDef

que est Def para que sirve? que hace?
Lamento la ignorancia pero tengo que pregunar.
Saludos

[[seoane]]

Empezado por Caral

que est Def para que sirve? que hace?
Lamento la ignorancia pero tengo que pregunar.

StrToIntDef no es mas que una función parecida a StrToInt, solamente que cuando la cadena no es un numero en vez de generar una excepción se limita a devolver el numero por defecto, el que nosotros le pasamos como segundo parámetro.

Solo hay que ver la implementación de cada una de ellas para entender como funcionan:

Código Delphi [-]
function StrToInt(const S: string): Integer;
var
  E: Integer;
begin
  Val(S, Result, E);
  if E <> 0 then ConvertErrorFmt(@SInvalidInteger, [S]);
end;

function StrToIntDef(const S: string; Default: Integer): Integer;
var
  E: Integer;
begin
  Val(S, Result, E);
  if E <> 0 then Result := Default;
end;

[[Caral]]

Muchas Gracias
Copiado y anotado Maestro
Def= por Defecto
y pasa segundo parametro asignado.
No me canso de aprender.
Saludos

[[BlueSteel]]

gracias... funciono Ok...