Lægge 6 tal sammen og få et gennemsnit

Edit7.text:=FloattoStr((strtofloat(Edit1.text)+strtofloat(edit2.text)+strtofloat(Edit3.text)+strtofloat(edit4.text)+strtofloat(Edit5.text)+strtofloat(edit6.text))/6);

måske

#1

Sammentællingen virker fint, men gennemsnittet giver et så langt tal efter komma at det ikke er en valid integer value...

Hvordan begrænser jeg den så den kun bruger værdier før kommaet?

eller i det mindste værdien før og efter komma med en decimal.

f.eks. giver sammentællingen 130,366666666666666666

Her vil jeg hellere have at der kommer til at stå:

130,3

søg på Format i delphi hjælp

Format('%3.2f', [((strtofloat(Edit1.text)+strtofloat(edit2.text)+strtofloat(Edit3.text)+strtofloat(edit4.text)+strtofloat(Edit5.text)+strtofloat(edit6.text))/6]);

den sætter 2 cifre efter ,