Entwickler-Ecke
Delphi Language (Object-Pascal) / CLX - Zahlen sperren
Acehigh - Do 03.06.10 09:18
Titel: Zahlen sperren
Guten Morgen!
Ich habe mir schon einiges zu diesem thema im forum gelesen, hab jedoch nichts zum laufen kriegen können. Wenn in eines meiner drein Edit Felder etwas anderes als eine Zahl eingetippt wird soll sofort eine Meldung erscheinen.
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
| procedure TFormPalette.FormKeyDown(Sender: TObject; var Key: Char);
begin
if not (key in ['0'..'9',#8]) then
begin
ShowMessage('Bitte nur Zahlen eingeben');
end;
end; |
Die ganze Datei ist im Anhang!
Gruß Acehigh
Gausi - Do 03.06.10 09:32
Du musst diese Methode dem OnKeyDown-Event der Edits zuweisen, nicht dem der Form.
Wenn du ein neueres Delphi benutzt (Delphi 2009 hat es), dann kannst du auch die Eigenschaft NumbersOnly des Edits benutzen.
Acehigh - Do 03.06.10 13:18
Danke für die Tipps! Hat sehr gut funktioniert
Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2025 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!