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