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]