Ya mira no tengo mucho tiempo como para hacerlo en codigo, pero te dare una sugerencia:
1. Pide un valor numerico y almacena en una variable de tipo integer o byte (si solo quieres un valor numerico pequeño p.e. 250).
2. Ese valor numerico conviertelo a cadena usando STR() y almacenalo en otra variable.
3. Usando Length, sabras la longitud de la cadena... y cuantas son las cifras que utilizaras.
¿porque no almacene ese valor en una cadena desde el inicio? porque te pueden ingresar 102ABC3 y eso una variable cadena lo almacena perooo no ps.. necesitamos solo un valor numerico p.e. 153
4. Usando la funcion POS() nos ubicamos en el primer caracter de esa cadena y con la funcion Copy() copias el caracter ese a una variable digamos Temp de tipo char que utilizaremos para identificar el numero y como digitarlo.
5. Usando el CASE OF... vamos evaluando el contenido de la variable Temp : si es 1: se escribe "UNO" si es 2 : "DOS", 3: "TRES" y asi, solo tendrias que evaluar los valores posibles que serian del "0" al "9".
6 Repetimos el proceso hasta llegar al fin de la cadena donde almacenaste el valor convertido a cadena.
No tengo tiempo, pero tratare de hacerlo este fin de semana y si el trabajo me permite lo posteo aca.
Salu2
Daniel
