arrondir un real

mon probleme, une somme d'une colonne que cette derniere
sont des montants (champs calculé)
donc quand je calcule la somme ,les montants ne sont pas reelement à deux chiffres alors il calcule à des chiffres infini aprés la virgule malgres que ces montants sont formatés à 2 ch apres la virgule.
merci!

po très explicite tout ça ...

Si le problème consiste à arrondir à 2 chiffres après la virgule, tu peux utiliser la fonction "Format" ainsi :

var Montant: String; Flt: Real // (ou tout autre type réel) Flt := 3.1451; Montant := Format('%.2f', [Flt]);

(tu obtiens Montant = 3,15)

Pour plus de précisions, voir "Chaînes de format" dans l'aide en ligne de Delphi.

N'oubliez pas de valider "Réponse acceptée" si ça vous convient, de toute manière vous ne pouvez pas valider autre chose !

sinon, pour arrondir simplement un reel comme cest si bien dit dans le titre, tu peux utiliser la fonction Trunc(real)= integer;

Si tu veux afficher un résultat arrondi à 2décimales, tu fais comme dit Japee.
Si tu veux que les réels soient réelement arrondis à deux décimales, utilise une fonction du genre :

uses Math; {$R *.DFM} function Precision(Value : real; Decimales : integer) : real; var n : Extended; begin n := round(intPower(10,Decimales)); Result := Round(Value * n) / n; end;

Avec la solution Japee :
3.506666 (affiché 3.51) + 2.426666 (affiché 2.43) = 5.933332 sera affiché 5.93
Avec la fonction
Precision(3.506666,2)+Precision( 2.426666,2) = 5.94

Ken@vo
____________________
Code, Code, Codec !

4ème possibilité:

var s : string; begin Str(ExtendedValue:0:2,s); result:=s; end;

Pour convertir le point en virgule, on met:

Str(ExtendedValue:0:2,s); if Pos('.',s)<>0 then s[Pos('.',s)]:=','; result:=s;

=============
Validez les réponses si ok...

ViewVite : HTML - ZIP

ou alors :2:2 pour deux decimale ...

comme je suis debutant en prog(delphi),expliquez moi avec precision.
donc j"ai un champs calculé"M"(un produit de2 autres champs),
le resultat est formaté à 2 chiffres aprés la virgule.
le prob: la somme de ce champs(resultats) de tout les enregistts
est faux malgres qu'il est a deux chiffres apres la virgule.
exp:
2,34 +1,33 +1,55 me donne 5,24 au lieu de 5,22.

merci!

Tu dis :"j"ai un champs calculé"M"(un produit de2 autres champs),le resultat est formaté à 2 chiffres aprés la virgule."

Formaté en valeur ou pour l'affichage ?

Le fait de formater un réel avec deux chiffres après la virgule pour l'afficher (conversion reel->chaine) ne modifie en rien la valeur du réel.

Tu n'additionnes pas un réel qui vaut 2,34 mais un réel qui s'écrit 2,34 quand on le représente avec deux chiffres après la virgule. Tout ce que tu peux dire , c'est que 2,335 <= X < 2,345

Par contre formate M avec une fonction comme Precision(X,n) et la plus de problème, le réel n'a plus que deux chiffres après la virgule et ça ce calcule comme à l'école primaire.

Ken@vo
____________________
Code, Code, Codec !

Alors, momohbj, ça répond à ta question ?

Le sujet est intéressant, tout n'est pas forcément dit...
J'ai personnellement "planché" là-dessus un petit moment.
J'ai d'autres approches qui pourraient se révéler intéressantes pour nous tous.
Mais si l'intérêt retombe...

Il y a pas mal de possibilités selon ce qu'on veut faire exactement.
Un sujet de source, quoi... mais sûr, sûr !

Kenavo > Merci à toi, je ne connaissais pas IntPower()... très utile à l'usage (ah, math.pas)

Bonne prog', faut pas mollir

N'oubliez pas de valider "Réponse acceptée" si ça vous convient, de toute manière vous ne pouvez pas valider autre chose !