Einzelnen Beitrag anzeigen

GericasS

Registriert seit: 13. Feb 2008
27 Beiträge
 
#1

Variable von Int nach Float umwandeln

  Alt 13. Feb 2008, 10:59
Ich hab folgendes Problem :

Ich gebe die Werte die ausgeben möchte alle in der Variable i aus !
Nun möchte ich nach der Ausgabe im StringGrid, i auch in 4 Panels ausgeben.
Da in meinem Programm auch die Kreditlaufzeit in Jahren ausgegeben werden soll,
muss ich die Variable i notgedrungen durch 12 teilen, da sie ein Integertyp ist
geht dies leider nicht. Momentan bin ich leider sehr ratlos...
Deswegen meine Frage kann ich die Var. i iwie nach float umwandeln ?




Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
  i : Integer ;
  temp : String ;
  kredit,zinsen,zinssatz,rate,ende : real ;
begin
  kredit := StrToFloat(edit1.Text);
  rate := StrToFloat(edit2.Text);
  zinssatz := StrToFloat(edit3.Text)/100;
  i := 0 ;
  while kredit > 0 do
    begin
      inc(i);
    StringGrid1.RowCount:=(i+1);
  zinsen := kredit*zinssatz/12 ;
  ende := kredit-rate+zinsen ;
    StringGrid1.Cells[0,i]:=IntToStr(i);
    StringGrid1.Cells[1,i]:=FloatToStrF(kredit,ffFixed,10,2);
    StringGrid1.Cells[2,i]:=FloatToStrF(zinsen,ffFixed,10,2);
    StringGrid1.Cells[3,i]:=FloatToStrF(ende,ffFixed,10,2);
  kredit:=ende ;
      if ende < 0 then break ;
     Panel1.Caption := IntToStr(i);
    //Panel2.Caption := IntToStr(i)/12 ; da bekomme ich dann die Fehlermeldung !
    //hier wäre die Ausgabe für die Anzahl der Jahre !!
    Panel4.Caption := FloatToStrF(ende,ffFixed,10,2);

LG GericasS
  Mit Zitat antworten Zitat