[toni.vi]

Si lo que quieres es utilizar un try, debería de funcionar tal como te lo dicen.
Yo utilizo lo siguiente:

Código Delphi [-]
i:= StrToIntDef(lpstrText, -1);
if i = -1 then nonota:=true;