FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Buscar | Temas de Hoy | Marcar Foros Como Leídos |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
||||
|
||||
Covertir float int str
Hola amigos
Estoy contruyendo un programilla y me he encontrado un problemilla no vi por ningun lado un StrToFloat . El programilla debe manejar valores de tipo float pero tengo que almacenarlos como string, asi mismo me pasa con los int y es casi una locura Código:
DBEdit1->Text = FloatToStr(variable + StrToInt(DBEdit2->Text)); Como puedo convertirlo ??????? Gracias de antemano
__________________
Nunca esta de más volver a ver la "Guia de Estilo" o "La Otra Guia de Estilo". Recuerda siempre usar los "Tags" para una mejor legibilidad de tu código. Cuando miras fijamente al abismo, este te devuelve la mirada oo______ooo_____ooo_ooooooo_____ooo____oooooo____ooooooo______oooo____ooo____oo_ oo______oooo___oooo_oo____oo__oo___oo__oo____oo__oo____oo___oo____oo__oooo___oo_ oo______oo_oo_oo_oo_oo____oo_oo_____oo_oo_____oo_oo____oo__oo______oo_oo_oo__oo_ oo______oo__ooo__oo_oooooo___ooooooooo_oo_____oo_ooooooo___oo______oo_oo__oo_oo_ oo______oo_______oo_oo_______oo_____oo_oo____oo__oo____oo___oo____oo__oo___oooo_ ooooooo_oo_______oo_oo_______oo_____oo_oooooo____oo_____oo____oooo____oo____ooo_ ________________________________________________________________________________ |
#2
|
||||
|
||||
En la unidad SysUtils existe una función llamada "StrToFloat".
Deberías comentarnos la versión de Delphi que estás usando, ya que sí deberías poder realizar dicha conversión. Un saludo.
__________________
"La recompensa de una buena acción está en haberla hecho" |
#3
|
||||
|
||||
Hola Impadrón.
Lo que te sugiere DarkMan es totalmente correcto, aún en Builder C++. Ejemplo: Código:
... /* Almacenar en DBEDit1 el valor de DBEdit2 + 100 */ double variable = 100; DBEdit1->Text = FloatToStr(variable + StrToFloat(DBEdit2->Text));
__________________
Daniel Didriksen Guía de estilo - Uso de las etiquetas - La otra guía de estilo .... |
#4
|
|||
|
|||
La verdadera pregunta aquí es, porque tienes que almacenar los datos en string? Tal vez si nos explicas el porqué de esto podríamos darte una solución, que te evitara tanta conversión.
Pd. No es natural que un dato se almacene como lo que no es (y ojo porque digo natural, no que este mal). |
#5
|
||||
|
||||
Cita:
Lo que sucede es que a veces son imposiciones sobre ejercicios para practicar el uso de ... Pero tenes toda la razón, es más simple y eficiente trabajar en forma directa: Código:
... DBEdit1->Field->AsFloat = variable + DBEdit2->Field->AsFloat; ...
__________________
Daniel Didriksen Guía de estilo - Uso de las etiquetas - La otra guía de estilo .... |
#6
|
||||
|
||||
Hola amigos, gracias por su ayuda
Cita:
Gracias de todas formas Usando el ejemplo que me postearon (sin convertir tanto por gusto) me devuelve este error Código:
if (DBEdit1->Text == "" || DBEdit2->Text == "" || DBEdit3->Text == "" || DBComboBox1->ItemIndex == -1){} else { DBEdit4->Field->AsFloat = DBEdit15->Field->AsFloat + DBEdit16->Field->AsFloat + DBEdit21->Field->AsFloat; } Código:
--------------------------- Debugger Exception Notification --------------------------- Project PROYECTO.exe raised exception class EConvertError with message ''' is not a valid floating point value'. Process stopped. Use Step or Run to continue. --------------------------- OK Help --------------------------- Como nota agregar que los DBEdit están enlazados a un Query y los campos que este Query usa de la BD están definidos en el MySQL como VARCHAR o sea texto. Alguna Idea ??? por otra parte en lo referente a la convertidera de un lado para otro encontré un error, al principio creba unas variables de tipo Float despues convertia de String a Float (el valor de los DBEdit a las variables) realizaba el calculo y después convertia el resultado de FLoat a String y se lo asignaba al DBEdit que debía contener el valor final. En algún lugar en todo este reguero algo esta pasando mal. El resultado que regresaba al DBEdit final era visiblemente diferente del resultado que debiera llegar por ejemplo: Usando los siguientes valores: DBEdit1 = 225.00 DBEdit2 = 5.4 DBEdit3 = 75.00 y con este codigo Código:
float a,b,c; if (DBEdit1->Text == ""){a = 0;}else{a = StrToFloat(DBEdit1->Text);} if (DBEdit2->Text == ""){b = 0;}else{b = StrToFloat(DBEdit2->Text);} if (DBEdit3->Text == ""){c = 0;}else{c = StrToFloat(DBEdit3->Text);} DBEdit4->Text = FloatToStr(a + b + c); DBEdit4 = 305.400000095 Esto es correcto ?? Una última pregunta hay alguna forma de definir cuantos numero decimales (o sea después de la ,) puedo usar en el Float. O sea alguna forma de definir que mi variable de tipo Float solo use 6 lugares después de la coma Gracias de antemano
__________________
Nunca esta de más volver a ver la "Guia de Estilo" o "La Otra Guia de Estilo". Recuerda siempre usar los "Tags" para una mejor legibilidad de tu código. Cuando miras fijamente al abismo, este te devuelve la mirada oo______ooo_____ooo_ooooooo_____ooo____oooooo____ooooooo______oooo____ooo____oo_ oo______oooo___oooo_oo____oo__oo___oo__oo____oo__oo____oo___oo____oo__oooo___oo_ oo______oo_oo_oo_oo_oo____oo_oo_____oo_oo_____oo_oo____oo__oo______oo_oo_oo__oo_ oo______oo__ooo__oo_oooooo___ooooooooo_oo_____oo_ooooooo___oo______oo_oo__oo_oo_ oo______oo_______oo_oo_______oo_____oo_oo____oo__oo____oo___oo____oo__oo___oooo_ ooooooo_oo_______oo_oo_______oo_____oo_oooooo____oo_____oo____oooo____oo____ooo_ ________________________________________________________________________________ Última edición por lmpadron fecha: 10-08-2011 a las 22:32:08. |
#7
|
||||
|
||||
Hola impadrón.
Aunque no tiene que ver con el error ,pero para no complicar tanto la sintáxis, probá el condicional de este modo: Código:
if (DBEdit1->Text != "" && DBEdit2->Text != "" && DBEdit3->Text != "" && DBComboBox1->ItemIndex != -1){ DBEdit4->Field->AsFloat = DBEdit15->Field->AsFloat + DBEdit16->Field->AsFloat + DBEdit21->Field->AsFloat; } En cuanto a tu segunda consulta como está relacionada con lo anterior, te sugiero que verifiques el contenido de los DBEdits. Por ejemplo: Código:
double d; if(TryStrToFloat(DBEdit1->Text,d) == TRUE ) DBEdit1->Field->AsFloat = d; else ShowMessage("Error no es un número decimal"); .... Saludos.
__________________
Daniel Didriksen Guía de estilo - Uso de las etiquetas - La otra guía de estilo .... Última edición por ecfisa fecha: 10-08-2011 a las 23:15:22. |
#8
|
||||
|
||||
Cita:
EL operador logico && (AND) en el ejemplo que me das hace lo mismo que el || (OR) que uso yo, en tu ejemplo escribes dentro del if y yo en el mio dejo el if en blanco y escribo dentro del else (me gusta mas la forma en que tu lo escribiste !!!) Código:
if (a == "" || b == ""){} else { cualquier cosa } if (a != "" && b != "") { cualquier cosa } Lo que sucede es que para evitar las conversiones estamos llamando a FIELD, si aun no se ha guardado nada en la BD entonces nos dara error porque FIELD que pertenece a la BD esta en blanco (o al menos eso creo). Código:
DBEdit1->Field->AsFloat Asi que voy a tener que regresar a las conversiones !!!! por lo que me preocupa el hecho de que no se efectuaran correctamente como explique en mi post anterior Ahora voy a revisar el segudo codigo que me posteo el amigo ecfisa a ver si con el TRY se resuelve el problema. Gracias por tu ayuda hermano
__________________
Nunca esta de más volver a ver la "Guia de Estilo" o "La Otra Guia de Estilo". Recuerda siempre usar los "Tags" para una mejor legibilidad de tu código. Cuando miras fijamente al abismo, este te devuelve la mirada oo______ooo_____ooo_ooooooo_____ooo____oooooo____ooooooo______oooo____ooo____oo_ oo______oooo___oooo_oo____oo__oo___oo__oo____oo__oo____oo___oo____oo__oooo___oo_ oo______oo_oo_oo_oo_oo____oo_oo_____oo_oo_____oo_oo____oo__oo______oo_oo_oo__oo_ oo______oo__ooo__oo_oooooo___ooooooooo_oo_____oo_ooooooo___oo______oo_oo__oo_oo_ oo______oo_______oo_oo_______oo_____oo_oo____oo__oo____oo___oo____oo__oo___oooo_ ooooooo_oo_______oo_oo_______oo_____oo_oooooo____oo_____oo____oooo____oo____ooo_ ________________________________________________________________________________ Última edición por lmpadron fecha: 11-08-2011 a las 14:52:40. |
#9
|
||||
|
||||
Hola amigos
Finalmente creo que ya tengo la solucion gracias a todos y en especial a ecfisa Código:
void __fastcall TForm4::DBNavigator2BeforeAction(TObject *Sender, TNavigateBtn Button) { double a,b,c; if(TryStrToFloat(DBEdit1->Text,a) == TRUE && TryStrToFloat(DBEdit2->Text,b) == TRUE && TryStrToFloat(DBEdit3->Text,c) == TRUE ) { DBEdit4->Text = FloatToStr(a + b + c); } }
__________________
Nunca esta de más volver a ver la "Guia de Estilo" o "La Otra Guia de Estilo". Recuerda siempre usar los "Tags" para una mejor legibilidad de tu código. Cuando miras fijamente al abismo, este te devuelve la mirada oo______ooo_____ooo_ooooooo_____ooo____oooooo____ooooooo______oooo____ooo____oo_ oo______oooo___oooo_oo____oo__oo___oo__oo____oo__oo____oo___oo____oo__oooo___oo_ oo______oo_oo_oo_oo_oo____oo_oo_____oo_oo_____oo_oo____oo__oo______oo_oo_oo__oo_ oo______oo__ooo__oo_oooooo___ooooooooo_oo_____oo_ooooooo___oo______oo_oo__oo_oo_ oo______oo_______oo_oo_______oo_____oo_oo____oo__oo____oo___oo____oo__oo___oooo_ ooooooo_oo_______oo_oo_______oo_____oo_oooooo____oo_____oo____oooo____oo____ooo_ ________________________________________________________________________________ |
Herramientas | Buscar en Tema |
Desplegado | |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
edit Str a float | Kamael | OOP | 7 | 21-03-2010 22:29:53 |
FLOAT de los ... no va! | vivamotos | C++ Builder | 7 | 05-01-2009 23:15:15 |
Redondeo de Float | Nomad | Varios | 8 | 11-09-2008 19:20:05 |
format float() | rastafa1 | DelphiPACK | 1 | 04-03-2005 07:18:29 |
Float | marianaf | Varios | 1 | 24-11-2003 19:44:47 |
|