limiter les décimales à deux chiffres

Question

j'effectue un calcul automatique suite &#224; une formule et j'affiche le r&#233;sultat qui est de type float dans un tedit,le pb est comment limiter le nombre de chiffres apr&#233;s la virgule &#224; 2, je sais qu'il existe une fonction "floattodecimal" , mais j'ai pas pu l'utiliser, je ne comprend pas ses arguments.

jlen100 · Answer

salut

pour formater l'affichage tu peux faire:

var value:real;

begin

value:=123.2568;

  edit1.Text:=FloatToStrF(value,TFloatFormat(ffFixed),10,2);

end;

resultat= 123.26

ou TFloatFormat=Format &#224; virgule fixe (pour d'autre format voir l'aide)

10 = la pr&#233;cision

2= le nombre de decimales affich&#233;es

bonne prog

yvemoreau · Answer

uses math;
procedure TForm1.FormCreate(Sender: TObject);
begin
  edit1.Text:=FloatToStrF((9.948877777777777,-2),ffFixed,32);
end;

floatToStrF
 renvoi une string c'est plus simple ainsi, mais comme notre valeur de d&#233;cimal apr&#232;s le point
varie selon le cas, vaut mieux arrondir selon nos normes : car si on d&#233;passe la pr&#233;cision ici 3 on arrondis et on perd le 9.94 en 10.00 ,

ensuite 2 sp&#233;cifie que l'on veut 2 chiffre apr&#232;s la virgule &#231;a ne pose aucun probl&#232;me...
donc ici avec 9.948... on obtiens 9,95 ,c'est probablement acceptable pour tes besoins...
yve

yvemoreau · Answer

salut jlen100  lol

yve

jlen100 · Answer

nota:

pour  la pr&#233;cision  la valeur maxi depend du type choisi 15
pour les valeurs de type Double, et  18 pour les valeurs de type
Extended. 

precision = nombre de chiffres &#224; afficher

MDUSE · Answer

Salut,

Tu peux &#233;galement utiliser Format 
Ex :
      Edit1.Text := Format('%.2f', [value]);

@+

sokoban · Answer

Oui, ou encore :

Edti1.Text := FormatFloat("#,###,##0.00", Value);


Ghislain "Sokoban" Martin
http://perso.wanadoo.fr/sokoban

Limiter les décimales à deux chiffres

6 réponses

Votre réponse

Discussions similaires