TEdit NumbersOnly, Meldung nicht anzeigen

[Jim Carrey]

Zitat:

und die Fehlermeldung ist dann auch wieder da!

Ich sehe das weniger als eine "Fehlermeldung" an sondern vielmehr als eine nützliche Information für den Menschen der das Programm bedient.

[Der schöne Günther]

Finde ich auch. Entweder lasse ich alles so drin wie es das Betriebssystem vorgibt, oder ich fummele gar nicht dazwischen und blende nur einen Indikator ein dass die momentane Eingabe entweder gültig oder nicht gültig ist. Bei einem Input-Popup wird dann entweder sogar das Ok ausgegraut oder wenn man draufpatscht wird der Edit rot eingefärbt. Das klappt ohne jegliche geschriebene Sprache.

[t.roller]

Oder so:

Delphi-Quellcode:

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
 if not (CharInSet(Key,['0'..'9',#8,#9])) then Abort;
end;

[himitsu]

Die Fehlermeldung ... nja, es kommt drauf an.

Entweder man implementiert es im Edit richtig, also nicht nur KeyDown, sondern ALLE wege, wo der Text rein geht.
Oder man mu es unbedingt auch nochmal beim Auslesen validieren.

Und wenn man die Eingabe direkt prüft, dann kommt es auch auf's "Wie" an.
Beim Eingeben selber darf niemals ein Fenster aufgehen, nur Hints oder z.B. die Edit-Farbe.
Und dann beim Verlassen/Auslesen mit Fehlermeldung/Exception prüfen.

[dummzeuch]

Zitat von himitsu:

Und wenn man die Eingabe direkt prüft, dann kommt es auch auf's "Wie" an.
Beim Eingeben selber darf niemals ein Fenster aufgehen, nur Hints oder z.B. die Edit-Farbe.
Und dann beim Verlassen/Auslesen mit Fehlermeldung/Exception prüfen.

Wenigstens einer, der das genauso sieht wie ich.

Falls es jemanden interessiert:

https://blog.dummzeuch.de/2015/04/15...tion-in-dzlib/