limiter les décimales à deux chiffres

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

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 à virgule fixe (pour d'autre format voir l'aide)
10 = la précision
2= le nombre de decimales affichées
bonne prog

uses math;
procedure TForm1.FormCreate(Sender: TObject);
begin
  edit1.Text:=FloatToStrF(RoundTo(9.948877777777777,-2),ffFixed,3,2);
end;

floatToStrF renvoi une string c'est plus simple ainsi, mais comme notre valeur de décimal après le point
varie selon le cas, vaut mieux arrondir selon nos normes : car si on dépasse la précision ici 3 on arrondis et on perd le 9.94 en 10.00 ,

ensuite 2 spécifie que l'on veut 2 chiffre après la virgule ça ne pose aucun problème...
donc ici avec 9.948... on obtiens 9,95 ,c'est probablement acceptable pour tes besoins...
yve

salut jlen100  lol

yve

nota:
pour  la pré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 à afficher
   

Salut,

Tu peux également utiliser Format
Ex :
      Edit1.Text := Format('%.2f', [value]);

@+

Oui, ou encore :

Edti1.Text := FormatFloat("#,###,##0.00", Value);

Ghislain "Sokoban" Martin
http://perso.wanadoo.fr/sokoban