Entwickler-Ecke

Sonstiges (Delphi) - Exception Handling


Fabian - Mi 17.07.02 13:56
Titel: Exception Handling
Wie kann ich, wenn der Anwender in ein Eingabefeld, dessen Inhalt in eine numerische Variable umgewandelt wird, verhindern das es zu einem Convertierungsfehler kommt, wenn der Anwender etwas anderes als eine Zahl eingibt ?


wwerner - Mi 17.07.02 14:27

einen Maskedit benutzen und dort nur Zahlen zulassen


Murdock1 - Mi 17.07.02 15:50

oder so


Quelltext
1:
2:
3:
4:
5:
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
  if not (key in ['0'..'9',#8]) then
    key:=#0;
end;


... fängt alle Tastendrücke ausser Zahlen ab...


mfg Peter

Code-Tag eingefügt. Marc