Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > OOP
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 28-12-2022
esublim esublim is offline
Miembro
 
Registrado: dic 2022
Posts: 40
Poder: 0
esublim Va por buen camino
Question Hacer operación matemática con un Label con formatfloat

tengo una consulta espero me puedan ayudar.


tengo un label donde los totales se muestran de la siguiente manea:
Código Delphi [-]
Principal.sub_t.Text:= FloatToStrF( total_fdesc, ffNumber, 8, 2 );
eso me arroja por ejemplo el numero 1.214,15
necesito que se muestre asi tan cual esta con las comas (,) y puntos (.). hasta aqui todo excelente.

el problema esta que cuando quiero tomar el label y usarlo para una operacion me dice que no es un valor float.
quiero poder usar el label en una operacion o simplemente mostra el contenido de ese lavel solo con la coma(,) en otro label sin dejar de mostrarlo asi como esta.

en otras palabras necesito tomar esto 1.214,15 y convertirlo en 1214,15 para usarlo en una operacion. tomandolo del label

Última edición por Neftali [Germán.Estévez] fecha: 28-12-2022 a las 09:18:24. Razón: Añadir TAG's al código Delphi
Responder Con Cita
  #2  
Antiguo 28-12-2022
Avatar de pgranados
pgranados pgranados is offline
Miembro
 
Registrado: sep 2022
Ubicación: México
Posts: 264
Poder: 2
pgranados Va por buen camino
Cita:
Empezado por esublim Ver Mensaje
tengo una consulta espero me puedan ayudar.
el problema esta que cuando quiero tomar el label y usarlo para una operacion me dice que no es un valor float.
l
Ok, esta parte esta fallándote porque estas tomando un valor string para realizar operaciones matemáticas.


Código Delphi [-]
Principal.sub_t.Text:= FloatToStrF( total_fdesc, ffNumber, 8, 2 );

Deberías de utilizar
Código Delphi [-]
StrToFloat()

http://www.delphibasics.co.uk/RTL.php?Name=strtofloat

Saludos
Responder Con Cita
  #3  
Antiguo 28-12-2022
esublim esublim is offline
Miembro
 
Registrado: dic 2022
Posts: 40
Poder: 0
esublim Va por buen camino
hola este codigo lo necesito:
Código Delphi [-]
Principal.sub_t.Text:= FloatToStrF( total_fdesc, ffNumber, 8, 2 );

para mostrar los valores de la siguiente manera 12.315,10


el problema no es ese. por que SI necesito mostrarlo de esa manera con el punto y la coma.

el problema es que despues no encuentro la manera de volverlo a usar convirtiendolo es 12315,10 y podelo usar en una operacion matematica.
en eso es que necesito ayuda.

Última edición por Neftali [Germán.Estévez] fecha: 28-12-2022 a las 09:18:04. Razón: Añadir TAG's al código Delphi
Responder Con Cita
  #4  
Antiguo 28-12-2022
Avatar de pgranados
pgranados pgranados is offline
Miembro
 
Registrado: sep 2022
Ubicación: México
Posts: 264
Poder: 2
pgranados Va por buen camino
Para quitarle el formato debes de tener tu valor en float y utilizar TFloatFormat.

Revisa la siguiente info:
http://www.delphibasics.co.uk/RTL.php?Name=TFloatFormat
Responder Con Cita
  #5  
Antiguo 28-12-2022
esublim esublim is offline
Miembro
 
Registrado: dic 2022
Posts: 40
Poder: 0
esublim Va por buen camino
quedo igual con el mismo error
Código Delphi [-]
Principal.sub_t.Text:= FloatToStrF( total_fdesc, ffNumber, 8, 2 );

como hago para poner a Principal.sub_t.Text como float?

Código Delphi [-]
resultadobs:=strtofloat(Principal.sub_t.Text);
ShowMessage('Number 6,0 = '+FloatToStrF(resultadobs, ffNumber, 6, 0));
me sigue diciendo que Principal.sub_t.Text no es un numero float

Última edición por Neftali [Germán.Estévez] fecha: 28-12-2022 a las 09:17:50. Razón: Añadir TAG's al código Delphi
Responder Con Cita
  #6  
Antiguo 28-12-2022
esublim esublim is offline
Miembro
 
Registrado: dic 2022
Posts: 40
Poder: 0
esublim Va por buen camino
bueno no se sie es la manera correcta pero solucione asi:
Código Delphi [-]
str:= StringReplace(totalbs.Text, '.', '', [rfReplaceAll, rfIgnoreCase]);
resultadobs:= strtofloat(str);
rest_bs.Text:= floattostr(resultadobs-f)

Última edición por Neftali [Germán.Estévez] fecha: 28-12-2022 a las 09:17:35. Razón: Añadir TAG's al código Delphi
Responder Con Cita
Respuesta



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
FormatFloat mjjj Varios 3 10-06-2008 20:35:39
Hacer titilar un label eyscom Varios 22 18-01-2007 21:18:21
Problema con operacion matematica y duda jandres Varios 1 04-07-2006 19:35:23
en que evento del dbgrid puedo hacer un operacion matematica . . . Shidalis Varios 13 26-08-2005 22:25:06


La franja horaria es GMT +2. Ahora son las 23:20:41.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi