[Brain Fucker]

Здравствуйте!
Возник вопрос с алгоритмом проверки открытых документов Word, касающийся скорее всего вовсе не COM атрибутов, а моей неопытности.
Дело в следующем:

Код:

procedure TForm1.Timer1Timer(Sender: TObject);
var
  i: Integer;
  ind: OleVariant;
begin

  with WordApplication1 do
  try
    Connect;
    if Documents.Count = 0
     then
      Label1.Caption:='Íè îäèí äîêóìåíò íå îòêðûò'
      Button1.Enabled:=True;


    else
      for i := 1 to Documents.Count do
        begin
        ind := i;
        Label1.Caption:='Çàêðîéòå äîêóìåíò:'+(Documents.Item(ind).Name);
        Button1.Enabled:=False;
      end;
  except
    Label1.Caption:='Word íå çàïóùåí'
    Button1.Enabled:=True;

  end;

end; 

Эта не хитрая процедура должна в заданный интервал проводить проверку и делать активной/неактивной кнопку Button1, выводя соответствующие комментарии, но код выдаёт ошибку на строках

Код:

     Button1.Enabled:=True;

, причём строку

Код:

 Button1.Enabled:=False;

программа воспринимает нормально, переводя кнопку в неактивное состояние.
Помогите пожалуйста разобраться.