como comvertin numeros a letras

#11

05-02-2007

TrUnkS

Miembro

Registrado: dic 2005

Posts: 96

Poder: 21

Para convertirlo a mayúscula

Si queremos pasar directamente las palabras generadas a mayúsculas utilizando Atexto y pegarlo en un Edit o Memo hacemos:

Código Delphi [-] Memo1.Clear;
 Letras1.Numero := StrToFloat(FormatFloat('####',StrToFloat(Label1.Caption)));
Memo1.Text := UpperCase(Letras1.AsString)

Lo que hace FormatFloat('####',StrToFloat(Label1.Caption)) es convertir un flotante a entero. Me explico:
El número 2345,56 es equivalente a 2346 en entero, por lo tanto la cifra que va a convertir a palabras no será 2345,56 sino 2346. Saludos

« Tema Anterior | Próximo Tema »

Herramientas	Buscar en Tema
Mostrar Versión Imprimible Enviar por Correo	Buscar en Tema: Búsqueda Avanzada
Desplegado
Cambiar a Modo Lineal Cambiar a Modo Hibrido Modo Hilado

Normas de Publicación
no Puedes crear nuevos temas no Puedes responder a temas no Puedes adjuntar archivos no Puedes editar tus mensajes El código vB está habilitado Las caritas están habilitado Código [IMG] está habilitado Código HTML está deshabilitado

Saltar a Foro

Temas Similares
Tema	Autor	Foro	Respuestas	Último mensaje
Convertir números en letras	c748a	Varios	14	10-04-2015 20:52:18
Numeros y letras	Caral	Varios	11	28-03-2008 18:22:53
Numeros a Letras!!	jmedina	Varios	26	20-10-2005 20:19:42
trasformar numeros a letras	NestorN	Varios	1	17-09-2005 01:33:44
como validar numeros y letras	ealexmp	Impresión	0	29-12-2004 23:11:17

La franja horaria es GMT +2. Ahora son las 00:25:12.