Mit Komma addieren

[XPLOSIV]

Ich habe zwar per Suche diesen Thread gefunden aber da werd ich nicht richtig schlau draus.

Ich würde gerne den Inhalt eines Edit Feldes mit dem eines anderen Edit Feldes addieren, leider spuckt es eine Fehlermeldung aus wenn ich Kommazahlen addieren will, liegt wohl daran dass es kein String ist.

So schaut das ganze aus:

Delphi-Quellcode:

  a := StrToInt(Edit6.Text); b := StrToInt(Edit7.Text);
  s := a + b;
  Edit7.Text := IntToStr(s);

Ich bin für jede Hilfe dankbar :zwinker:

[taaktaak]

Moin, Moin.
Nee, liegt daran, dass du mit StrToInt() den String in einen Integer, also eine Ganzzahl konvertierst :roll:

[DeddyH]

Versuch es mal mit StrToFloat statt StrToInt. a und b müssen dann natürlich auch Gleitkommatypen sein.

[XPLOSIV]

Nun hab ich es so:

Delphi-Quellcode:

  a := StrToFloat(Edit6.Text); b := StrToFloat(Edit7.Text);
  s := a + b;
  Edit7.Text := StrToFloat(s);

Wenn ich es nun compilieren will kommt: "Inkompatible Typen: 'Integer' und 'Extended'"

[taaktaak]

Wie sind s, a und b deklariert?

[mkinzler]

Delphi-Quellcode:

a,b: Extended;
...
a := StrToFloatDef(Edit6.Text, 0); b := StrToFloatDef(Edit7.Text, 0);
  s := a + b;
  Edit7.Text := FloatToStr(s);

[DeddyH]

Zitat:

Zitat von DeddyH

a und b müssen dann natürlich auch Gleitkommatypen sein.

Wozu tippe ich hier eigentlich, wenn es dann doch niemand liest? :evil:

[XPLOSIV]

Zitat:

Zitat von DeddyH

Zitat:

Zitat von DeddyH

a und b müssen dann natürlich auch Gleitkommatypen sein.

Wozu tippe ich hier eigentlich, wenn es dann doch niemand liest? :evil:

Sorry ^^

Vielen vielen Dank, klappt suuper :dp: