открыть документ редактора Word, в конец документа добавить таблицу 10*10,

[goldlider]

Напишите программу на Дельфи, которая использует MS Office для решения следующей задачи:
открыть документ редактора Word, в конец документа добавить таблицу 10*10, где в каждую ячейку вставить ее индексы, разделенные запятой. В конце сохранить документ.

Вот код:
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, ShellAPI, ComObj, WordXP, OleServer;
procedure TForm1.Button4Click(Sender: TObject);
var
t,y,word:variant;
i,j:integer;
begin
word:=CreateOLEObject('Word.Documen t');
word.documents.open('C:\000.doc');
y:=word.range(0,0);
t:=word.tables.add(y,3,4);
for i:=1 to 3 do
for j:=1 to 4 do
t.cell(i,j).range.insertBefore(IntT oStr(i)+':'+IntToStr(j));

word.document.saveAs('C:\mow.doc');
word.close;

Вроде бы раньше работало. Сейчас ошибку выдает http://savepic.ru/1342166.jpg на вот эту строку http://savepic.ru/1329878.jpg.
Когда заносишь в комментарий строку
word:=CreateOLEObject('Word.Documen t');
и вместо нее пишешь
word:=CreateOLEObject('Word.Applica tions');
то при компиляции выходит вот такая http://savepic.ru/1321686.jpg ошибка. На вот эту http://savepic.ru/1322710.jpg строчку

У меня у самого Word 2007. Мне нужна работающая прога с компонентами
OLE, а не самими значка с вкладки Servers.