Comme Vous voyez ; je veux calculer la somme de dbgrid dans un edit , le problème c'est que
la somme n'a pas le format currency (00.00), , avec un edit mask c'est la meme chose donc , aidez moi svp
Pièce jointe 207461
Version imprimable
Comme Vous voyez ; je veux calculer la somme de dbgrid dans un edit , le problème c'est que
la somme n'a pas le format currency (00.00), , avec un edit mask c'est la meme chose donc , aidez moi svp
Pièce jointe 207461
Bonjour,
Avez vous essayé ça?
Code:
1
2
3
4 procedure TForm1.SumClick(Sender: TObject); begin Edit1.Text:=FloatTostrF(Somme,ffFixed,12,2); end;
ohhhhhhh:lol: ...ça marche oui....... je vous remercie beaucoup voila mon code :
Code:
1
2
3
4
5
6
7
8
9
10
11
12 var T:real; begin T:=0; DBGrid2.datasource.DataSet.First; while not DBGrid2.datasource.DataSet.Eof do try T := T + DBGrid2.datasource.DataSet.FieldByName( 'qte_entree' ).AsFloat ; finally DBGrid2.datasource.DataSet.Next; end; Edit2.Text:=FloatTostrF(T,ffFixed,12,2); end;