Format float probleme

Bonsoir, bonjour à tous.

J'ai un problème de format dans un calcul de cellule de StrinGrid
voici le code qui rempli l'information issu d'une requette

Code:

---

1 2	GridSemaineTemps.Cells[x,n] := FormatFloat('#0.00',(Fields.Fields[2].AsInteger / 12));

---

La pas de souci cela m'affiche correctement les nombres décimale
Enfin j'ai 22,50 au lieu de 22.50 (. et ,) je sais pas si cela joue.
Bref

Maintenant j'essai de faire la somme de chaque colonne comme ceci :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

// Calul des totaux For x:= 1 to (GridSemaineTemps.ColCount-1) do Begin TotalCategorie := 0; For n:= 1 to (GridSemaineTemps.RowCount-2) do // pas la dernière ligne Begin if (GridSemaineTemps.Cells[x,n] <> '') then TotalCategorie := TotalCategorie + StrToInt(GridSemaineTemps.Cells[x,n]); end; GridSemaineTemps.Cells[x,(GridSemaineTemps.RowCount-1)] := FormatFloat('#0.00',TotalCategorie); end;

---

La variable TotalCatégorie est en Extended.

à chaque execution de ce code je me prends :
"........class EConvertError with message "4,00' is not a valid integer value'.......

je pense que cela viens de
TotalCategorie := TotalCategorie + StrToInt(GridSemaineTemps.Cells[x,n]);

Je comprend tout à fait le message mais je vois pas comment faire.

MErci de votre aide.

Bonjour,

Utilise StrToFloat a la place de StrToInt puisque tu veux convertir un nombre avec decimales.
bien sûr TotalCategorie ne doit pas être de type integer dans ce cas.
@++
Dany

+1 pour ce qui est du 'StrToFloat a la place de StrToInt'

Citation:

---

Enfin j'ai 22,50 au lieu de 22.50 (. et ,)

---

ça c'est tout à fait normal , puisque cela dépend de paramètres régionaux, nous :france: tenons a notre virgule décimale

Je suis une vrai burne sur le coup... Mort de rire..

Merci. sa fonction.