Hi,
Ich hab noch ein kleinen Schönheitsfehler
Funktioniert auch alles wunderbar, doch leider zeigt das Label das Ergebnis unschön an.
Ich habe per
Ergebnis.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';