Mostrar una cifra numérica en texto

Leí una repuesta que le diste a ravenn con el tema convertir numero a letra, y realmente estoy interesado, nada más que no me quedo claro. Mira hice el programa .pgr introduci toda la programacion tuya, luego hice un form, en el init del form introduje Set procedure to "c:\sistema \prg\numero.prg"
pero donde se introduce x=literal(Thisform.text1.value,0), ok mira a ver si estamos en el mismo pensamiento
tengo 2 text box, en uno introduzco la cantidad en letras y quiero que en el text2 me aparezca la cantidad introducida en numero, pero en letras, donde tenque que llamar al .prg, yo supongo que el text1 y poniendolo en el lostfocus para asi obtenerlo automaticamente al perder el foco y mostrarlo en el text2. Pero no me sale. Los dos texbox la propiedad value los tengo como 0.
Espero tu aclaración y así ayudarnos... Gracias de antemano

1 respuesta

Respuesta
1
en el texbox2 el value no debe ser 0 debe ser thisform.textbox2.value='' bueno en el keypress del text1 podrias poner lo siguiente
if nkeycode=13 &&enter
  thisform.textbox2.value=literal(this.value,1)
Endif
Allí deberá funcionar perfectamente.
Avisame y si resolviste tu problem finaliza tu pregunta
Cheque muy bien, mira me funciona, pero le cambien algo, a text1, donde escribo la cantidad en números le puse como input mask 999,999,999.00
Para tener en cuenta las (, ) y también, me funciona, pero te quiero preguntar algo, al escribir los centavos, osea si escribo 1510.45 me tendría que salir mil quinientos diez con 45/100, no recuerdo realmente pero me parece haberlo visto en una respuesta tuya a otra persona que te pregunto sobre lo mismo que me estas ayudando.
Gracias...
Si busca por que al pasarle el valor 0 o 1 hace eso.

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas