EditFeld nur bestimmte Werte zulassen
Hallo,
ich möchte dass man in dem EditFeld nur Zahlen und Kommas eingeben darf und keine Buchstaben. Vielen Dank. |
Re: EditFeld nur bestimmte Werte zulassen
TMaskEdit bzw. NumbersOnly Eigenschaft in neueren Delphiversionen oder im KeyDown-Event selber abprüfen.
|
Re: EditFeld nur bestimmte Werte zulassen
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.
|
Re: EditFeld nur bestimmte Werte zulassen
Dann nimm einen TMaskEdit, da kannst du eine Editmaske vorgeben
|
Re: EditFeld nur bestimmte Werte zulassen
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.
|
Re: EditFeld nur bestimmte Werte zulassen
Das ist eine eigene Komponente. Die genannte Eigenschaft (NumbersOnly) ist von TEdit bei Delphi ab D11(?)
|
Re: EditFeld nur bestimmte Werte zulassen
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.
|
Re: EditFeld nur bestimmte Werte zulassen
Dann musst du wie gesagt, bei jedem Tastendruck ermittlen, ob die Eingabe angenommen werden soll oder nicht
|
Re: EditFeld nur bestimmte Werte zulassen
Da bin ich überfragt, ich weiß weder wie man eine Schleife erstellt noch wie man einen Tastendruck erkennt. Aber ich lerne gerne dazu^^.
|
Re: EditFeld nur bestimmte Werte zulassen
Hallo,
du kannst das Event OnKeyPress benutzen und falls das Zeichen nicht erlaubt ist, dann Key einfach auf #0 setzen.
Delphi-Quellcode:
Evtl musst du noch abprüfen, ob das Komma nur einmal im Text ist.
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; Ciao Chris |
Alle Zeitangaben in WEZ +1. Es ist jetzt 11:25 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz