EditFeld nur bestimmte Werte zulassen

[netmario]

Hallo,
ich möchte dass man in dem EditFeld nur Zahlen und Kommas eingeben darf und keine Buchstaben. Vielen Dank.

[mkinzler]

TMaskEdit bzw. NumbersOnly Eigenschaft in neueren Delphiversionen oder im KeyDown-Event selber abprüfen.

[netmario]

Also ich besitze D7 und bin noch ein totaler Anfänger in Delphi, ich wüsste nicht einmal wie man eine Schleife macht die die ganze Zeit überprüft ob man nicht doch etwas anderes eingibt.

[mkinzler]

Dann nimm einen TMaskEdit, da kannst du eine Editmaske vorgeben

[netmario]

Ich kann das bei den Eigenschaften nicht sehen und ich wüßte nich wie ich das sonst anwenden können außer eine Schleife zu verwenden.

[mkinzler]

Das ist eine eigene Komponente. Die genannte Eigenschaft (NumbersOnly) ist von TEdit bei Delphi ab D11(?)

[netmario]

Wenns möglich ist würde ich gerne eine andere Möglichkeit in betracht ziehen, da ich AlphaLite verwende und dort diese Komponente nicht vorhanden ist.

[mkinzler]

Dann musst du wie gesagt, bei jedem Tastendruck ermittlen, ob die Eingabe angenommen werden soll oder nicht

[netmario]

Da bin ich überfragt, ich weiß weder wie man eine Schleife erstellt noch wie man einen Tastendruck erkennt. Aber ich lerne gerne dazu^^.

[Chris.R]

Hallo,

du kannst das Event OnKeyPress benutzen und falls das Zeichen nicht erlaubt ist, dann Key einfach auf #0 setzen.

Delphi-Quellcode:

procedure TForm1.DoOnEdit1KeyDown(Sender: TObject; var Key: Char);
begin
  if not (Key in ['0'..'9', ',', #8]) then // #8 ist die Backspace Taste
    Key := #0;
end;

Evtl musst du noch abprüfen, ob das Komma nur einmal im Text ist.

Ciao Chris