FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Números a letras
Hola,espero puedan ayudarme. Estoy haciendo un reporte de cantidades. Al final en la banda Summary tengo los totales, los cuales calculo mediante un QRExpression. Pero me interesa tambien tener estos totales en LETRA. No se como hacer esto. Espero puedan ayudarme. No se como acceder al resultado del QRExpr.
NOTA: He bajado el ATexto, pero no se como usarlo. Tambien habrá cantidades con punto decimal (dos decimales) Gracias Última edición por metroyd fecha: 18-09-2008 a las 19:37:14. |
#2
|
||||
|
||||
Hola
Pones el componente en el form. Pon esta funcion: Luego indicas de donde sacas el dato y donde lo quieres pones.
A ver como va la cosa. Saludos
__________________
Siempre Novato |
#3
|
||||
|
||||
__________________
|
#4
|
|||
|
|||
Error:
ME MARCA EL SIGUIENTE ERROR:
Project sistema.exe raised exception Class EConverter error with message "" is not a valid floating point value. Mi codigo es:
|
#5
|
|||
|
|||
Cita:
|
#7
|
|||
|
|||
Ya pude resolver el problema
Gracias a los que me ayudaron.
El problema lo resolvi mediante el evento OnPrint del QRExpression:
|
#8
|
||||
|
||||
La puedes incluir en cualquier formulario, le envías un valor tipo moneda y te regresa un texto
__________________
|
#9
|
|||
|
|||
a mi me sale el mismo error, pero solo con cantidades como de 3450.00 pero con las pequenias si funciona bien(250.00)!!!....ya le movi al onprint y nada!..alguein sugiere algo?
|
#10
|
||||
|
||||
Hola
Si el dato es obtenido de un campo se necesita ponerlo en el evento before del componente table o query que se use. NO el evento del reporte, el del query o table, segun sea el caso ya que necesita obtener el dato primero. Saludos
__________________
Siempre Novato |
#11
|
|||
|
|||
de hecho me guie en el procedimiento de @metroyd, el dato lo estoy sacando de un QRExpr, lo paso a un QRLabel y despues ese QRlabel lo convierto, y me funciona bien para cantidades pequenias, pero ya a cantidades como de 3540 me arroja el error!
|
#12
|
||||
|
||||
Hola
Podrias usar un qrlabel.Caption:=Formatfloat('#,##0.00',strtofloat(value)); Asi le das formato ya que el ATexto funciona con numeros y sacas el dato de un caption. Saludos
__________________
Siempre Novato |
#13
|
|||
|
|||
Se supone que asi lo hagio, Este es mi codigo:
procedure TVenta.QRExpr2Print(sender: TObject; var Value: String); function Deletrear(numero: real) : string; var letras: TLetras; begin letras := TLetras.Create(nil); try letras.Numero := Trunc(numero); Result := Format('%s CON %d/100 .-', [Letras.AsString, Trunc(100*Frac(Numero))]); *no se si el error me de por esta seccion?! finally letras.Free; end; end; var n:string; begin Ventas.qrlabel38.Caption:=FOrmatfloat('#,##0.00',strtofloat(value)); n:= Deletrear(StrToFloat(Value)); form17.QRLabel39.Caption:=uppercase('( '+n+')'); value:=Ventas.QRLabel38.Caption; end; |
#14
|
|||
|
|||
pues ya lo modifique y nada, me sigue dando el error cuando la cantidad es de 1000.00 para arriba solo me escribe bien cuando llega hasta 999.99...alguna sugerencia?
|
#15
|
|||
|
|||
Números a letras
hola que tal a todos, tengo un problemilla, uso este codigo:
function Deletrear(numero: real) : string; var letras: TLetras; begin letras := TLetras.Create(nil); try letras.Numero := Trunc(numero); Result := Format('%s CON %d/100 .-', [Letras.AsString, Trunc(100*Frac(Numero))]); *no se si el error me de por esta seccion?! finally letras.Free; end; end; var n:string; begin Ventas.qrlabel38.Caption:=FOrmatfloat('#,##0.00',strtofloat(value)); n:= Deletrear(StrToFloat(Value)); form17.QRLabel39.Caption:=uppercase('( '+n+')'); value:=Ventas.QRLabel38.Caption; end; me funciona bien, pero solo para numeros hasta el 999.99, cuando pasa a 1000 me pone el siguiente error: "raised exception Class EConverter error with message "1000.23" is not a valid floating point value.... ya modifique en el on print, en el before print, y nada...alguna recomendacion?!! |
#16
|
|||
|
|||
#25
Hace 1 Minuto benjineo Registrado Registrado: may 2012 Posts: 5 hola que tal a todos, tengo un problemilla, uso este codigo:
me funciona bien, pero solo para numeros hasta el 999.99, cuando pasa a 1000 me pone el siguiente error: "raised exception Class EConverter error with message "1000.23" is not a valid floating point value.... ya modifique en el on print, en el before print, y nada...alguna recomendacion?!! Última edición por Casimiro Notevi fecha: 01-06-2012 a las 16:47:20. |
#17
|
|||
|
|||
lo que no eh intentado y voy hacer es lo dela configuracion regional!
|
#18
|
||||
|
||||
Hola benjineo, creo que necesitas volver a leer nuestra guía de estilo, gracias por tu colaboración
Y recuerda poner los tags al código fuente, ejemplo: Gracias Resumiendo, pregunta nueva en hilo nuevo. Este es de hace 4 años y creo que no das ninguna solución al tema tratado, sino que tienes una duda similar, en todo caso. Saludos. |
#19
|
|||
|
|||
error de Punto Flotante
una diculpa, tengo una duda similar, uso este codigo:
me funciona bien, pero solo para numeros hasta el 999.99, cuando pasa a 1000 me pone el siguiente error: "raised exception Class EConverter error with message "1000.23" is not a valid floating point value.... ya modifique en el on print, en el before print, y nada...alguna recomendacion?!! |
#20
|
||||
|
||||
Bien, pero crear un hilo nuevo no es contestar a un hilo existente, tu pregunta no es una respuesta a este hilo en el que estamos.
Debes crear un hilo nuevo. Por ejemplo, en el mismo foro "Varios", botón "crear nuevo hilo", pones un título descriptivo y explicas lo que has puesto aquí. Son equivocaciones normales en los "novatos" que llegan a clubdelphi, tenlo en cuenta para la siguiente pregunta que quieras hacer, gracias. Tu error es simple: raised exception Class EConverter error with message "1000.23" is not a valid floating point value.... El problema es que estás usando las comas y los puntos al revés, o lo cambias en tu código o lo cambias en la "configuración regional" de windows. Allí debes decirle que usas las comas para separar millares y los puntos para los decimales... o viceversa. |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Convertir números en letras | c748a | Varios | 14 | 10-04-2015 20:52:18 |
Numeros a letras | citlalliDgp | Varios | 6 | 19-03-2009 07:14:54 |
Numeros y letras | Caral | Varios | 11 | 28-03-2008 18:22:53 |
Numeros En Letras | Cañones | Impresión | 2 | 11-06-2007 23:55:12 |
Numeros a Letras!! | jmedina | Varios | 26 | 20-10-2005 20:19:42 |
|