Array Strings zusammnezählen

[GericasS]

Zitat von DeddyH:

sieht ein bissel komisch aus. Versuch mal so:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
km : array [1..5] of integer;
index,summe : Integer ;
begin
  for index := 1 to 5 do begin
    km[index] := TryStrToInt(Edit1.Text,0);
  end;
  summe := km[1]+km[2]+km[3]+km[4]+km[5] ;
end;

[edit] Was soll das eigentlich werden? So, wie es im Moment aussieht, könnte man auch die Zahl, die im Edit steht, mit 5 multiplizieren. [/edit]

Bei der TryStrToInt Anweisung kommt immer wieder das ich die falschen Parameter einsetze ?
Ich hab es einfach mal mit StrToInt versucht nur dann rechnet er mir recht seltsame Sachen aus

Edit : Er soll die fünf eingebenen Zahlen zusammenrechnen =)