Der Funktionsname ist etwas verwirrend. Du bastelst dynamisch einen String zusammen und sagst der Funktion dann, sie soll suchen, ob es eine Komponente mit diesem Namen gibt. So ungefähr geht's:
x := x + StrToFloat(TEdit(FindComponent('Edit' + IntToStr(i))).Text)
Aber nun genug zu dem Thema.
