Forum: Sonstige Fragen zu Delphi
Delphi
by Klaus01,
15. Okt 2006
Habe die fehlerhafte Stelle mal auskommentiert.
Grüße
Klaus
Forum: Sonstige Fragen zu Delphi
Delphi
by Klaus01,
15. Okt 2006
Kapital sollte ein FloatType sein. z.B. Extended ( da kann Dein Kapital auch sehr groß sein)
Um den Wert in einen String zu wandeln kannst Du TryStrToFloat verwenden.
Eventuell solltest Du den FloatWert noch runden (round, roundx).
Grüße
Klaus
Forum: Sonstige Fragen zu Delphi
Delphi
by Klaus01,
13. Okt 2006
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);