ich wollte Euch kurz eine gerade zusammengebastelte Komponente vorstellen und Euch um Feedback ueber den Code bitten. Wie der Name TNumericEdit schon impliziert, handelt es sich um ein Edit-Feld ausschliesslich fuer numerische Werte. Andere Eingaben werden nicht akzeptiert.
Folgende neue Eigenschaften sind von Bedeutung:
- AllowNegative: Ist auch die Eingabe negativer Zahlen erlaubt?
- AllowFloatingPoint: Ist auch die Eingabe von Dezimalzahlen erlaubt?
- FloatFormat: Ein Formatstring fuer die initiale Ausgabe von Dezimalzahlen
- IntegerValue: Wert des Felds als Integer, gerundet wenn AllowFloatingPoint
- FloatValue: Wert des Felds als Dezimalzahl
Fuer eine entsprechende Exceptionbehandlung beim Aufruf von IntegerValue und FloatValue sollte der aufrufende Code sorgen.
Ungeloest ist bisher die Notwendigkeit, .Text bei jeder Aenderung zu ueberpruefen. Bestimmte Sabotageakte (z.B. Loeschen aller Zahlen mit <Del>) kann ich mit KeyPress() leider nicht abfangen ...
Ich bin neugierig auf Euren Input!