Zinsberechnung

[Kladios]

Hallo...

ich möchte gerne ein Programm über die Zinsrechnung schreiben!

Hier mein Ansatz

Delphi-Quellcode:

type
  TForm1 = class(TForm)
    Label1: TLabel;
    Startkapital: TEdit;
    Kontoauszug: TMemo;
    Jahre: TEdit;
    Zinsen: TEdit;
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
var Einzahlung,zv,Zinssatz,AnzahlJahre,Kapital:Integer;
begin
        Einzahlung:=strtoint(Startkapital.Text);
        Zinssatz:=strtoint(Zinsen.Text);
        AnzahlJahre:=strtoint(Jahre.Text);
        for zv:= 1 to AnzahlJahre do
        Kapital:=Kapital*(1+Zinssatz/100);
        Kontoauszug.Text:=inttostr


end;

end.

http://www.250kb.de/u/061013/j/t/66bbc266.jpg http://www.250kb.de/u/061013/j/t/b725a3dc.jpg

http://www.file-upload.net/download_...pywv8.rar.html
Die Projektdatei als RAR.
Ab Kapital weiß ich nicht mehr weiter HILfeeee
Danke

[edit=Sharky]Delphi-Tags eingefügt. Mfg, Sharky[/edit]