NAchkommastellen

[mola]

Hi
HAb noch ein kleines Problem. ICh möchte das KApital1 auf 2 NAchkommastellen beschränken, weiß auch das das z.B.mit kapital1:10:2 gemacht wird aber ich weiß nicht wo ich das einfüge muss oder wo das überhaupt hinkommt. Würde mich sehr über eure Hilfe freuen.
DAnke

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var Eintritt,Austritt,Rate,
Verwaltung,Todesfall,Jahre,Beitrag,
Kapital1:real;
hoch:extended;

begin
Eintritt:=strtofloat (edit1.Text);
Austritt:=strtofloat(Edit2.text);
Rate:=strtofloat(Edit3.text);


Verwaltung:=(Rate*4)/100;
Todesfall:=(Rate*10)/100;
Jahre:=Austritt-Eintritt;
Beitrag:=Rate-Verwaltung-Todesfall;
hoch:=Power(1.05,Jahre);
Kapital1:=Beitrag*1.05*(hoch-1)/0.05;
Edit4.Text:=floattostr (Kapital1);

end;
procedure TForm1.beendenClick(Sender: TObject);
begin
close;
end;

end.

[edit=Luckie]Delphi-Tags hinzugefügt. Mfg, Luckie[/edit]

[Luckie]

Kuck dir mal FloatToStrF oder Format an.

ach ja, etwas Quelltextfomatierung wäre auch nicht das Schlechteste. (http://www.luckie-online.de/artikel/opstyleguide.shtml)