falsche Eingaben abfedern

[algo05]

Hallo ihr, hab ne absolute Anfängerfrage:

Ich möchte gern, dass bei Eingaben die nicht vom Typ Integer sind, eine Fehlerbehandlung durch Nochmaleingabe erfolgt:

try
a:=StrToInt(eingabe_a.text);
except
eingabe_a.text:=IntToStr(a);
eingabe_a.SetFocus
end;

Warum klappt das nicht?

Danke für die Mühe.

Algo