formatage d'un text dans une cellule stringgrid en float

bonjour tout le monde et merci d'avance pour toute votre attention sur les problèmes que rencontre les autres développeurs,
j'ai un compostant stringgrid dans lequel je saisi des valeurs et que je veux les inserer dans ma table après la saisie, j'ai des champs de type float (des montants) comment les formater après leurs saisie de tel façon qu'ils s'affichent comme des montants (des réels regrouppés en trois et deux décimal après la virgule) est ce qu'il existe une fonction qui fait le formatage d'un texte en un format personnalisé?

Utlise FormatFloat

Ex :

Code:

---

1 2	StringGrid1.Cells[0,1] := FormatFloat('0.00',UnevaleurFloat);

---

j'ai déja utilsé cette fonction FormatFloat et ça n'a pas marché, delphi n'a pas connu cette fonction, est ce que je dois la déclarer?

Tu as juste à faire le uses suivant :

Code:

---

1 2	uses SysUtils;

---

En réponse a ton MP (pour des trucs comme ça ecrit sur le forum ca pourrait interesser d'autres personnes.

Citation:

---

Envoyé par iam

j'utilise formatfloat d'accord, mais je veux quand j'ecris dans une cellule il formate sa valeur en montant(dans la meme cellule)
dans ton expression t'as ecris :
stringgrid.cells[0,1]:=formatfloat('0.00',unevaleurfloat) qu'est ce je mets dans : unevaleurfloat?

---

A tester

Soit au niveau du OnGetText de ta grid

Code:

---

1 2 3 4 5 6 7

procedure TfrmMain.StringGrid1GetEditText(Sender: TObject; ACol, ARow: Integer; var Value: string); begin With StringGrid1 do Value := FormatFloat('0.00', StrToFloatF(Cells[ACol,ARow],0.00)); end;

---

Ou soit au niveau du OnDrawCell

Code:

---

1 2 3 4 5 6 7 8

procedure TfrmMain.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer; Rect: TRect; State: TGridDrawState); begin if ACol = 3 then // le 3 est un exemple , faut voir le numéro de ta colonne With TStringGrid(Sender) do Cells[ACol,ARow] := FormatFloat('0.00', StrToFloatF(Cells[ACol,ARow],0.00)); end;

---

A tester les deux possibilités.