Edit.Text -> Einzelnen Wert abarbeiten

[shmia]

Du hast grundsätzlich zwei verschiedene Möglichkeiten:
1.) jedes einzelne Zeichen im String in eine Zahlumwandeln (mit funktion Ord()) und die Einzelwerte addieren
2.) den String im Gesamten in eine Zahl umwandeln (mit Funktion StrToInt()) und
dann mit Mod 10 und Div 10 die Reste zusammenaddieren.

Methode 1.) ist einfacher aber du sollst ja die etwas schwerere Methode 2.) benützen.