(N)umerisches Feld akzeptiert keinen Punkt

[marabu]

Hallo Lombi,

gut, dass du nicht über meinen Schreibfehler gestolpert bist - nachdem ich die Variable vorher so oft richtig geschrieben hatte.

Zitat von LOMBI:

Zusätzlich habe ich in der Systemsteuerung die Ländereinstellung für Zahlen verändert

Warum das? Und hast du die Einstellung programm- oder systemweit verändert?

Delphi-Quellcode:

procedure TDemoForm.EditEKpreisKeyPress(Sender: TObject; var Key: Char);
begin
  if Key = ',' then Key := '.';
end;

Damit möchtest du wohl das Komma im Ziffernblock für die Eingabe des "Dezimal-Punkt" nutzbar machen. Willst du denn Kommazahlen im amerikanischen Format eingeben?

Zitat von LOMBI:

Problem ist noch, wenn EditEKpreis, EditVknetto oder EditVKbrutto leer ohne Eintrag bleiben, dann kommt die Meldung: '' kein gültiger Fließkommawert.

Vermutlich hast du versucht den leeren String mit StrToFloat() zu konvertieren. Du solltest eine Abfrage einbauen.

Zitat von LOMBI:

Wie kann ich denn bei den Edits noch die Stellen vor und nach dem Komma festlegen, z.B. 6 Stellen vor und 4 nach dem ,

Macht ja nur für die Ausgabe Sinn - so geht es: Format('%10.4f', [e])

Freundliche Grüße

marabu