Error: Is not a valid integer value

[darkmaster360]

Saludos.

Tengo un SpinEdit y al borrar el texto me salta el error: Is not a valid integer value.

Estuve mirando en google, en algunos temas de este foro pero nada, y de otras páginas en inglés y probando los códigos que mencionaban pero no me sirvió ninguno. Le puse este:

Código Delphi [-]
procedure TForm1.SpinEdit1Change(Sender: TObject);
begin
    Timer1.Interval := SpinEdit1.Value;
     try
    A := StrToIntDef(SpinEdit1.Text, 0)
  except
    on Exception : EConvertError do
      ShowMessage(Exception.Message);
  end;
  end;

Pero nada me sigue apareciendo. ¿Alguna solución?