Diese Variante ist schon korrekt
Delphi-Quellcode:
begin
try
time:=StrToInt(Edit1.Text);
except
Showmessage('Bitte eine Zahl eingeben ohne Leer- oder Sonderzeichen.');
end;
end;
ABER: Solange Du unter Delphi arbeitest siehst Du die Info trotzdem
Wenn Du die App ausserhalb von Delphi startest erscheint die Meldung nicht mehr.
Lösung: Unter Delphi im Menü (meins ist English
) Tools -> Debugger Options -> (Reiter) Language Exceptions -> (Checkbox) Stop On Delphi
Exception den Haken entfernen.
...
...