Probleme beim programmieren eines Kapitalwertrechners

[Klaus01]

Hallo,

versuche mal diesen Passus:

Delphi-Quellcode:

n:=i;  
while n>0 do
  begin
    zahlungen:=zahlungen+strtofloat(memo1.Lines.Strings[n]);
    n:=n-1;
  end;

durch diesen auszutauschen.

Delphi-Quellcode:

zahlungen:=0;
for n:=0 to memo1.lines.count -1 do
  if memo1.Lines.Strings[n] <> '' then
    zahlungen:=zahlungen + strToFloat(memo1.lines.Strings[n]);

Vielleicht kannst Du noch schreiben, was an Deiner Vorgehensweise nicht funktionert.

Im Memo sind da pro Zeile die Einzahlungen eines Jahres eingetragen.
Dann würde ja auch noch ein Zinseszins Effekt eintreten.

Grüße
Klaus