Hola querido amigo, antes que nada te cuento que cree una unit en Turbo Pascal en donde recibe como parametro un numero, ya sea real o entero y lo convierte a letras.
Es decir la unidad la cree para hacer un proyecto en donde simulaba ser un programa de un comercio en donde en el ticket debia figurar por ejemplo, veintitres pesos con cincuenta centavos, si recibia el numero 23,50. Comprendes?
Es decir entras al .pas que te envio, le modificas lo que necesites, es decir supongo que no quieres que diga "pesos", ni "centavos", es decir eso lo borras del .pas que te envio, luego te vas a memory sizes y e donde tiene el primer numero que empieza con un 1, lo cambias por un 2, esto hara que no te salte el error de desbordamiento de pila. Luego lo compilas a disco, y bueno no te quedara mas que invocar a la unidad para enviarle el numero desde tu programa principal...
Es decir asi:
Program XXXX;
USES
crt, u_num;
VAR
......etc.
Y cuando necesites el numero en letras solo lo invocas asi :
num_final(x); y listo! en Donde "x" es el numero a transformar.
Espero que te sirva y cualquier cosa que no te ande me mandas un mail a
[email protected].
Un abrazo.
Descarga la UNIT de aca:
http://www.mediafire.com/?nkm4jjjojjy
Bye!! y Bendiciones che!
