FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
|
#1
|
||||
|
||||
tal vez te falta convertir el punto a coma
Seguramente te marca error porque en tu edit estas capturando 123.50 en vez de 123,50 por eso te marca el error si capturas una cantidad manualmente como 123,50 veras que la función de contraveneno funciona y eso te lo aseguro porque yo tambien use su función pero no me acordaba que hay que convertir el punto decimal a coma para que muestre los centavos si no quieres hacer uso de la funcion strFormatDecimal validar que solo te permita capturar coma en vez de punto decimal
esta función lo que hece es convertir el punto decimal a coma
asi la llamas
y luego llamar la función CantidadEnLetra
o tu problema es ese o estas haciendo mal uso de los datos porque si es eso deberias analizar lo que hace el codigo... saludos!!!
__________________
el cielo me dio un cariño sin merecerlo... chimikuilo!!! |
#2
|
|||
|
|||
Gracias amigos ya quedo listo.
|
#3
|
||||
|
||||
pregunta!
por pura curiosidad que era lo que estabas haciendo mal que no te arrojaba el resultado?
saludos.
__________________
el cielo me dio un cariño sin merecerlo... chimikuilo!!! |
#4
|
|||
|
|||
ok amigos les voy aponer mi codigo ya funcionando del cual les agradesco mucho sus contestaciones.
Código:
procedure TAlta_factura.Button1Click(Sender: TObject); var no1,no2:double; no3,no4:real; begin if (edit4.text='')then edit4.Text:='0'; if edit6.text='' then edit6.Text:='0'; no1:=strtofloat(edit4.Text); no2:=strtofloat(edit6.Text); edit7.Text:=formatfloat('0.00',no1+no2); no3:=strtofloat(edit10.Text); edit8.text:=formatfloat('0.00',no3/1.15); no4:=strtofloat(edit8.Text); edit9.Text:=formatfloat('0.00',no4*0.15); label5.Caption:=CantidadEnLetra(StrtoFloat(edit10.Text),1); end; |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
45 Centavos | enecumene | Humor | 5 | 23-10-2008 17:51:23 |
Como convertir numero entero en letra | kurono | Varios | 2 | 23-01-2008 05:10:39 |
Convertir numero en cadena | rex | JAVA | 7 | 25-10-2007 03:28:11 |
Convertir Numero a Letras... en frances | jcarteagaf | Varios | 4 | 11-09-2007 19:23:45 |
De número a letra | samame | Varios | 1 | 10-03-2004 17:31:41 |
|