Entwickler-Ecke

Delphi Language (Object-Pascal) / CLX - Kein gültiger Integer Wert


Zack - Mi 01.01.03 14:59
Titel: Kein gültiger Integer Wert
Morgen !

Vieleicht stehe ich jetzt etwas auf dem Schlauch... aber wieso klappt das hier nicht :


Quelltext
1:
2:
3:
4:
5:
6:
7:
    If TarifBox1.ItemIndex = 6 then Kosten.Text := '11.00';

    if ZeitraumBox1.Text = 'Halbjährlich' then
      begin
       // iBuffer := strtoint(Kosten.Text) * 6;  Geht auch feiner ...
        Jahreskosten.Text := IntToStr(6 * StrToInt(Kosten.Text));
      end


Der Deb. fliegt mir immer wieder mit der Meldung 5.00 oder oder auch 11.00 ist kein Gültiger Integer Wert. Ich meine aber das es mit dem Punkt richtig ist oder ?


Anonymous - Mi 01.01.03 15:04

Integerzahlen haben keine Nachkommastellen. "11.00" ist also kein Integerwert. "11" ist ein Integerwert.

Um mit richtigen Zahlen zu arbeiten solltest du dir die "Realen Zahlen" bzw. "Reelle Typen" angucken:

Real, Single, Double, Extended, Comp und Currency sind Reelle Typen.


hitstec - Mi 01.01.03 15:07

Salute.

11.00 ist aber kein Integer, sondern ein Current.
versuch doch mal statt


Quelltext
1:
strtoint(X)                    


mal das


Quelltext
1:
Round(strtocurr(X))                    


Zack - Mi 01.01.03 15:23

Ja es klappt Prima vielen Dank !!!