Ergebnis der Suchanfrage

• Forum: GUI-Design mit VCL / FireMonkey / Common Controls

  Re: Kommazahlen in TEdit

    Delphi
    by mannewolff, 4. Mär 2010
  Erst googeln, dann fragen. Hier eine von vielen Möglichkeiten
  
  
  procedure TMainForm.Edit1KeyPress(Sender: TObject; var Key: char);
  begin
  // Nur Punkt, Komma, Zahlen und Backspace zulassen
  if NOT (Key in ) then
  Key := #0;
  
  // , bzw. . nur einmal eingeben
• Forum: GUI-Design mit VCL / FireMonkey / Common Controls

  Kommazahlen in TEdit

    Delphi
    by mannewolff, 4. Mär 2010
  Moin.
  
  Ich möchte, dass die User im TEdit Kommazahlen (12,12, 13.29) eingeben. Die Möglichkeiten, die ich bisher ausprobiert habe sind irgendwie suboptimal:
  
  - Mit dem OnExit Event ein StrToFloat aufführen, wenn auf eine Exception gelaufen wird den Benutzer zu informieren, dass die Eingabe keine gültige Kommazahl ist.
  
  - Mit MaskEdit arbeiten. Das hat den Nachteil, dass man sehr genau...