In Delphi ein Kapital mit einer ListBox berechnen

[Funnygirly]

Hallo,

ich komme mal wieder nicht weiter.

In einem programm soll der Zinssatz und das Kapital eingegeben werden.Das Kapital nach einem Jahr soll ausgegeben werden. Für die Ausgabe soll ich eine ListBox-Komponente verwenden, mit der man z.B mit der Anweisung ListBox1.Items.Add(FloatToStr(A)) Zeilen hinzufügen kann.

Bis jetzt sieht es bei mir so aus:

Delphi-Quellcode:

unit uKapital;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;

type
  TForm1 = class(TForm)
    EdtKapital: TEdit;
    EdtZinssatz: TEdit;
    LstBox: TListBox;
    BtnBerechnen: TButton;
    Label1: TLabel;
    Label2: TLabel;
    Label3: TLabel;
    EdtErgebnis: TEdit;
    procedure BtnBerechnenClick(Sender: TObject);
    procedure LstBoxClick(Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.BtnBerechnenClick(Sender: TObject);
var kapital,zinssatz:extended;
begin
  Kapital:=StrToFloat(edtkapital.text);
  Zinssatz:=StrToFloat(edtzinssatz.text);

  Zinssatz:= ((zinssatz/100)+1);

   LstBox.Items.Add(FloatToStr(edtKapital));



end;

Allerdings kommt bei dieser Zeile =>LstBox.Items.Add(FloatToStr(edtKapital));...imme r diese Fehlermeldung:[Fehler] uKapital.pas(42): Es gibt keine überladene Version von 'FloatToStr', die man mit diesen Argumenten aufrufen kann

Was ist denn falsch?

[DeddyH]

Du willst ja nicht das Edit selbst eintragen, sondern dessen Text ;)

[soulies]

Zitat:

Du willst ja nicht das Edit selbst eintragen, sondern dessen Text

glaub ich nicht

ich glaub eher die lokale variable 'kapital' soll hinzugefügt werden ^^

cya

[Funnygirly]

ah...ok...und was soll ich da jetzt ändern?

[Mithrandir]

"edt" vom Kapital wegnehmen.

[DeddyH]

Oder .Text dahinterschreiben und das FloatToStr weglassen (kommt ja auf' s Selbe raus).

[Mithrandir]

Zitat:

Zitat von DeddyH

(kommt ja auf' s Selbe raus).

Wer weiß, vielleicht kommt da ja noch ne Berechnung zwischen. :mrgreen:

[Funnygirly]

dann kommt das hier: [Fehler] uKapital.pas(51): Deklaration erwartet, aber Dateiende gefunden

hm joa...iwie hab ich keinen plan, wie ich des zustande bringen soll :gruebel:

[DeddyH]

Wie sieht der Quälkot denn jetzt aus?

[Funnygirly]

zurzeit siehts so aus...das edt habe ich jetzt weg gemacht

Delphi-Quellcode:

procedure TForm1.BtnBerechnenClick(Sender: TObject);
var kapital,zinssatz:extended;
begin
  Kapital:=StrToFloat(edtkapital.text);
  Zinssatz:=StrToFloat(edtzinssatz.text);

  Zinssatz:= ((zinssatz/100)+1);

   LstBox.Items.Add(FloatToStr(Kapital));



end;