string a Integer

[Juanito-Kun]

Hola que tal estoy utilizando Delphi 7 con firebird..


Tengo el siguiente problemilla, tenge que convertir un String a Integer..

pero la Cadena serian 'D6', 'D8'.. lo que quiero hacer es sacar el solo el 6 y el 8.
como puedo hacer esto, trate con esta funcion:

 L:=StrTOInt('D6')

siendo L Integer, me marca que no puedo convertirlo...

saludos y gracias...

[vtdeleon]

Saludos
Creo que con:

Código Delphi [-]
StrToInt(Copy('D6',2,1));

Suerte

[*Caro*]

Hola podrias hacerlo asi:

Código Delphi [-]
      cadena_nueva:=copy(cadena,2,length(cadena)-1);
      L:=strtoint(cadena_nueva);

Saludos

[Juanito-Kun]

GRACIAS !! vtdeleon,Caro...

se me habia olviado el Copy, jejeje..

saludos y gracias.

[[Lepe]]

Pues propongo otra modificación con vuestro permiso:

Código Delphi [-]
    cadena_nueva:=copy(cadena,2,length(cadena)-1);
    L:=StrtoIntDef(cadena_nueva,-1);
    if L = -1 then
      raise Exception.Create('No se ha podido detectar la version de delphi');

Antes se producía una excepción si no se podía convertir un String a Entero, cosa que al usuario final no lo entiende ni le importa. Ahora el mensaje de error queda más claro, y si le tiene que importar .

Saludos