Mehre Edit Felder auf Inhalt prüfen?

[Johnny Bravo]

Hi,
Ich hab noch ein kleinen Schönheitsfehler

Funktioniert auch alles wunderbar, doch leider zeigt das Label das Ergebnis unschön an.
Ich habe perErgebnis.Constraints.MaxWidth := 125; die max. größe eingestellt.

Ausserdem hab ich den Editfeldern eine max. Länge von 4 Zeichen gegeben, und den Code von Hawkeye219 hab ich folgendermaßen ergänzt:
Ergebnis.Caption := FloatToStr(Spannung / Widerstand) + ' A' Damit wird dem Ergebnis automatisch die Maßeinheit angehangen.

Wenn ich jetzt große werte eingebe, wird das Ergebnis inkorrekt dargestellt. In den eigenschaften des Labels hab ich Autosize und WordWrap deaktivert.

Mit Ergebnis.Caption := FloatToStr(Round(Spannung / Widerstand)) + ' A' hab ich es auch schon versucht,das klappt halbwegs, allerdings brauch ich mindestens 3 nachkomma stellen.

Was kann ich da machen?
Würde mich über Hilfe freuen

mfg


EDIT:
Habs jetzt folgendermaßen gelöst:
Ergebnis.Caption := FloatToStr((Round((Spannung / Widerstand)*1000))/1000) + ' A';