try-except (strtoint) geht nicht

[Larky]

HALLO!

muss bis morgen früh ein Programm fertig bekommen, bin jetzt also nur noch dabei Kleinigkeiten zu machen, mein Problem liegt jetzt darin dass ich nur eine ganz einfache abfrage machen möchte ob in einem Edit-feld nur zahlen stehen!
Eigentlich ja nicht das Problem!
Jedoch bekomme ich TROTZ Try-Except-Block immer nur Delphi Fehler und nicht meine eigene Fehlermeldung!

Hier der Quellcode

Dauer :string
test :integer

Try test := strtoint (Dauer)
except Fehler :=false


Dann ruft der die Fehlermeldung auf! Soweit kommt der aber gar nicht, da immer die Meldung 'Dauer ist kein gültiger Integerwert' auftritt!

Bitte helft mir schnell! wie schon gesagt morgen früh um 11Uhr muss ich fertig sein!


Danke schonmal im Vorraus

Larky