Minuszeichen abfangen?

[SirThornberry]

@ripper8472: strtofloatdef hat aber doch den Nachteil das man nicht weiß ob es geklappt hat oder nicht da man ja im Fehlerfall den Defaultwert bekommt. Aber es kann ja auch sein das man den Defaultwert bekommt wenn alles klappt. Ich finde es nicht ganz so toll wenn man einfach dann mit einem Defaultwert rechnet und der User sich über das Ergebnis wundert, es ist einfach besser wenn man den user auf seine Fehleingabe hinweisen kann. Und wie schon jemand vor mir geschrieben hat kann man auch einfach vor dem StrToFloat prüfen ob das Edit aus mehr als einem Minuszeischen besteht.

Delphi-Quellcode:

if TEdit(Sender) <> '-' then
  Variable := StrToFloat(TEdit(Sender).Text);

[runger]

Hallo,

du darfst das "-" Zeichen sowieso nur einmal zulassen und das am Anfang.
Schau nach ob das "-" das einzige Zeichen ist, wenn das so ist lässt du die Umwandlung und tust einfach so als stände nichts im Edit-Feld.

Rainer

[runger]

Sorry,

aber Thornberry hatte gleichzeitig mit mir die gleiche Idee.

Rainer

[Grishnak]

@Tau: 'try...finally' war Quatsch, ich meinte 'try...except'! Außerdem kann ich lesen, aber wenn es mit dem Kopf durch die Wand nicht geht, muss man halt auch mal einen anderen Weg beschreiten! Kein Grund unfreundlich zu werden!

[tigerman33]

Zitat:

Zitat von SirThornberry

if TEdit(Sender) <> '-'

Da bin ich aber mal gespannt... :wink:

[Hawky]

das Abfragen beim ersten Zeichen ungleich - bringt doch nix, wenn jemand zwischendurch nen Buchstaben eingibt oder zwischendrin nen - krachts trotzdem.

also ich wuerde trystrtofloat nehmen, da wiesst du ob alles ok war und wenn nicht kannst du reagieren

[Tau]

Hallo zusammen

@ SirThornberry

das ist genau der richtige Ansatz für mich.

D A N K E :witch: :witch: :witch:

auch den anderen besten danke für die Interessanten Ansätze.

Tau
:hi:

[yankee]

Generell hat auch jvcl schon was passendes dafür: TJvFloatEdit. Unter Jv Convert. (Kann sein, dass das in JVCL 3 anders heißt...). Damit kann man sich das alles sparen und man hat neben .text noch .value, was gleich der Floatwert ist...
Selbst was von TCostumEdit ableiten ist auch nicht wirklich schwer...