FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
|
#1
|
|||
|
|||
sumar los valores de un listbox
Hola amigos aqui con una pequeña espinita que traigo, resulta que quiero sumar los valores de un listbox y que me los muestre en un label pero me manda el siguiente error "Is not a valid floating point value" en el cual los valores que tengo en el listbox son valores separados con la coma y el punto es decir son cifras miles entonces ya viendo en el foro no encontre algo certero ya cambie mi configuracion regional y sigue el mismo error entonces queria ver si me echan una manita de favor, les anexo el codigo
Código:
procedure TREPORTES.Button9Click(Sender: TObject); var suma: Extended; v_conta:integer; begin suma := 0; for i := 0 to listbox14.Items.Count - 1 do suma := suma + strToFloat(listbox14.Items[i]); label28.Caption := floatToStrF(suma,ffNumber,20,2); v_conta:=v_conta+1; end; |
#2
|
||||
|
||||
Si he entendido bien, tienes los números con comas y puntos. Debes quitarlos.
|
#3
|
|||
|
|||
Gracias amigo por responder pero no quiero quitarlos ya que mi aplicacion me pide que tenga el resultado con comas y puntos.
|
#4
|
||||
|
||||
Hola rufo.
Lo que te sugiere Casimiro creo, es quitarlos para operar con ellos. No te altera para nada la muestra del resultado. Supongamos (no lo especificas), que tu separador de miles es la coma y de decimales el punto. Entonces sería: Fijate que la operación de borrado se hace sobre la variable auxiliar 'aux' y no afecta para nada el formato original. Saludos.
__________________
Daniel Didriksen Guía de estilo - Uso de las etiquetas - La otra guía de estilo .... Última edición por ecfisa fecha: 19-05-2011 a las 20:38:05. |
#5
|
|||
|
|||
Aaaah ya es cierto lo que me comentaron ya quedo resuelto el problemilla y mil gracias por responder y ayudarme, saludos.
|
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
sumar valores nulos con doubles sql. | ingabraham | Varios | 5 | 14-12-2010 23:27:10 |
Sumar en Delphi Con ListBox | Ray16 | OOP | 6 | 26-10-2010 04:56:45 |
Sumar valores con stringgrid | zero_dx | Varios | 2 | 16-10-2007 20:02:01 |
Sumar elementos de un ListBox | creus | Varios | 4 | 16-01-2007 19:34:05 |
Sumar valores en un Edit | dsa132132 | OOP | 2 | 02-08-2004 02:15:21 |
|