Zinsrechner

[FURT]

he
es fubktioniert dann aber immer noch nicht.......kp was ich falsch mach
hier ist mal mein code:

implementation
uses
math;

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
var
startkapital, zinssatz, laufzeit : Extended;
kapital : Integer;
begin
startkapital:= StrToFloat (Edit1.Text);
zinssatz:= StrToFloat (Edit2.Text);
laufzeit:= StrToFloat (Edit3.Text);
kapital:=startkapital*power(1+zinssatz/100 ,laufzeit);
Edit4.Text:= FloatToStrF (kapital, ffNumber, 15, 2);
ListBox1.Items.add('Jahr ' + #9 + ' Kapital ');
for
kapital := 1 to laufzeit do
ListBox1.AddItem(kapital);
das prog. soll den kontostand nach jedem jahr in der listbox anzeigen

auch wenn das für euch leicht und nervig is.........für mich is es neuland und ich komm net weiter