~ StrToInt

[sakura]

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.

......