In Delphi ein Kapital mit einer ListBox berechnen

[Funnygirly]

zurzeit siehts so aus...das edt habe ich jetzt weg gemacht

Delphi-Quellcode:

procedure TForm1.BtnBerechnenClick(Sender: TObject);
var kapital,zinssatz:extended;
begin
  Kapital:=StrToFloat(edtkapital.text);
  Zinssatz:=StrToFloat(edtzinssatz.text);

  Zinssatz:= ((zinssatz/100)+1);

   LstBox.Items.Add(FloatToStr(Kapital));



end;