Einzelnen Beitrag anzeigen

Medium

Registriert seit: 23. Jan 2008
3.685 Beiträge
 
Delphi 2007 Enterprise
 
#10

AW: If-Bedingung mit mehreren Combobox

  Alt 4. Jan 2014, 15:38
Anmerkung am Rande: Es gibt durchaus negative Temperaturen auf der Kelvinskala in der realen Welt. Die ergeben sich zwar eher nur rechnerisch und entstammen Quanteneffekten, aber man könnte durchaus motiviert sein negative Kelvin zu benutzen

Auch wenn es etliche Möglichkeiten gibt gültige Zahlen zu prüfen, und das Thema schon sehr oft hier war, hier zumindest ein Weg, das "-" nur vorne zuzulassen:
if Pos('-', MyEdit.Text) <= 1 then // Entweder kein Minus, oder es ist an 1. Stelle Das lässt zwar noch immer Dinge wie "-10,6-2" zu, aber mit Pos() und PosEx() hast du schon mal zwei sehr gute Funktionen um dies weiter zu spinnen.
"When one person suffers from a delusion, it is called insanity. When a million people suffer from a delusion, it is called religion." (Richard Dawkins)

Geändert von Medium ( 4. Jan 2014 um 15:41 Uhr)
  Mit Zitat antworten Zitat