Wunderbar!
Ich danke euch allen für eure wunderbare Hilfe!
Den Vorschlag von Gruber_Hans_12345 habe ich jetzt verwendet,
die anderen werde ich aber ebenfalls nochmals genau begutachten, vor allem das mit dem Delimiter.
Wenn ich Delimiter richtig verstanden habe, könnte ich theoretisch bei Sharky's Lösung auch diese Schleife weglassen:
Code:
for ndx := 0 to Pred (sl.Count) do
begin
summe := summe + StrToInt (sl.Strings[ndx]);
end;
und result an dieser Stelle so setzen:
Code:
result := StrToInt(sl.Strings[0]) StrToInt(sl.Strings[1]) StrToInt(sl.Strings[2]) StrToInt(sl.Strings[3]);
und das andere result halt noch entfernen.
Oder?
Bin am Dazulernen.
MfG