Posez votre question Signaler Répondre au sujet

Arrondir les float [Résolu]

cs_benumiit82 35 Messages postés mardi 23 mars 2004Date d'inscription 11 avril 2006 Dernière intervention - 19 avril 2005 à 12:03 - Dernière réponse : m_cyril1 59 Messages postés mercredi 30 mars 2005Date d'inscription 3 juin 2005 Dernière intervention
- 21 avril 2005 à 09:08
Delphi / Pascal Posez votre question Signaler Répondre au sujet
Question assez simple :



J'ai ceci :



edit20.Text := floattostr(strtofloat(edit29.Text)/caltva);



Avec caltva une variable. Ce qui me déplait c'est que le résultat donne par exemple : 49,87692846



Alors que je voudrais 49,87 a la limite 49,88.



Si vous pouviez m'aider sur ce petit problème.



Merci
Afficher la suite 

3 réponses

Répondre au sujet
Signaler Commenter la réponse de vincentstryckmans
vincentstryckmans 230 Messages postés lundi 5 avril 2004Date d'inscription 25 octobre 2006 Dernière intervention - 19 avril 2005 à 12:12
0
Utile
Essaie la function simpleroundto.



Voici ce que dit l'aide Delphi



Call SimpleRoundTo to round AValue to a specified power of ten.



AValue is the value to round.



ADigit indicates the power of ten to which you want AValue rounded. It can be any value from –37 to 37 (inclusive).



SimpleRoundTo uses asymmetric arithmetic rounding to determine how to
round values that are exactly midway between the two values that have
the desired number of significant digits. This method always rounds to
the larger value.



The following examples illustrate the use of SimpleRoundTo:



Expression Value



SimpleRoundTo(1234567, 3) 1234000

SimpleRoundTo(1.234, -2) 1.23

SimpleRoundTo(1.235, -2) 1.24

SimpleRoundTo(-1.235, -2) -1.23

Et comme disait ma grand-mère : il y a toujours du soleil derrière les nuages.

Vincent Stryckmans.
Commenter la réponse de vincentstryckmans
Signaler Commenter la réponse de cs_benumiit82
cs_benumiit82 35 Messages postés mardi 23 mars 2004Date d'inscription 11 avril 2006 Dernière intervention - 19 avril 2005 à 12:16
0
Utile
Merci Vincent.



J'ai aussi trouvé ceci qui me convient :



edit20.Text := formatfloat('0.00',(strtofloat(edit29.Text)/caltva));
Commenter la réponse de cs_benumiit82
Signaler Commenter la réponse de m_cyril1
m_cyril1 59 Messages postés mercredi 30 mars 2005Date d'inscription 3 juin 2005 Dernière intervention - 21 avril 2005 à 09:08
0
Utile
Merci benumiit82, grace à toi je sais enfin comment limiter mes décimales
Commenter la réponse de m_cyril1
Posez votre question
S'inscrire maintenant

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.