Def. de constantes - Casting

Mariana · #1 21-10-2005

Hola a todos, mi pregunta esta vez es la siguiente:
Tengo una unidad donde se definen constantes de la forma:
type
StyleConst = TOleEnum;
const
Vertical = $00000002;
desde otra unidad tengo el valor 'vertical' (como string) en una variable, lo que necesito es poder obtener el valor 2, alguien me puede ayudar en esto, muchas gracias.

*Caro* · #2 21-10-2005

Hola nose si es esto lo que buscas

cad:='$00000002'
copy(cad,length(cad),1);

OzzyzzO · #3 21-10-2005

Tal vez lo que buscas son las funciones IntToStr y StrToInt, que convierten de integer a string y de string a integer. Si ademas la cadena comienza con el signo $ el valor es considerado en base hexadecimal.

Saludos

Mariana · #4 21-10-2005

Hola, gracias por la ayuda pero lo que me sugieren ya lo he probado y no me funciona, creo que el problema está en la definición de la constante como TOleEnum, y que ese nombre lo tengo como un string, probé también haciendo casting con el nombre del type pero me da cualquier numero menos 2 o $00002.