Формирование отчёта в Word

[oasis]

Здравствуйте, люди добрые и отзывчивые!
Помогите пожалуйста!
Имеется код:

procedure TForm5.Button4Click(Sender: TObject);
begin
  doc:= CreateOleObject('Word.Basic');
  doc.FileNew(Template:='E:\Гульнара\Практика\octchet.doc',NewTemplate:=0);
  doc.EditGoTo('name');
  doc.Insert('название');
 doc.AppShow;
end;

По нажатию кнопки должен открыться Word-документ с уже заранее созданными закладками. И в место закладки нужно записать текст.
В итоге: документ открывается, но текст записывается в самом начале документа, как будто закладки там никакой нет. Что у меня не правильно? и как исправить? Подскажите пожалуйста, очень-очень надо

[ov_lab]

Сообщение от oasis

Здравствуйте, люди добрые и отзывчивые!
Помогите пожалуйста!
Имеется код:

procedure TForm5.Button4Click(Sender: TObject);
begin
  doc:= CreateOleObject('Word.Basic');
  doc.FileNew(Template:='E:\Гульнара\Практика\octchet.doc',NewTemplate:=0);
  doc.EditGoTo('name');
  doc.Insert('название');
 doc.AppShow;
end;

По нажатию кнопки должен открыться Word-документ с уже заранее созданными закладками. И в место закладки нужно записать текст.
В итоге: документ открывается, но текст записывается в самом начале документа, как будто закладки там никакой нет. Что у меня не правильно? и как исправить? Подскажите пожалуйста, очень-очень надо

У меня работает так:
WF:=CreateOleObject('Word.Applicati on');
WF.DisplayAlerts:=wdAlertsNone;
WF.Documents.Open('E:\Гульнара\Прак тика\octchet.doc',False,True);
WF.ActiveDocument.Bookmarks.Item('n ame').Range.Text:='название';
//при необходимости можно выполнить макрос из документа
WF.Run('MacroName');
WF.ScreenUpdating:=True;
WF.Visible:=True;

WF:=Unassigned; //если необходимо оставить документ открытым

//или, если надо закрыть Word
WF.Quit;
WF:=Unassigned;

[oasis]

Сообщение от ov_lab

У меня работает так:
WF:=CreateOleObject('Word.Applicati on');
WF.DisplayAlerts:=wdAlertsNone;
WF.Documents.Open('E:\Гульнара\Прак тика\octchet.doc',False,True);
WF.ActiveDocument.Bookmarks.Item('n ame').Range.Text:='название';
//при необходимости можно выполнить макрос из документа
WF.Run('MacroName');
WF.ScreenUpdating:=True;
WF.Visible:=True;

WF:=Unassigned; //если необходимо оставить документ открытым

//или, если надо закрыть Word
WF.Quit;
WF:=Unassigned;

Попробовала так, документ не открывается, и выдается ошибка:

Проект effecienty.exe вызвыл исключение класса EOleError с сообщением 'Недопустимая строка с указанием класса'. Процесс остановлен. Используйте Шаг или Запуск для продолжения.

[ov_lab]

Сообщение от oasis

Попробовала так, документ не открывается, и выдается ошибка:

Проект effecienty.exe вызвыл исключение класса EOleError с сообщением 'Недопустимая строка с указанием класса'. Процесс остановлен. Используйте Шаг или Запуск для продолжения.

почему-то в слове Application форум вставил пробел. Вот он класс и не находит. и "name", "практика" почему-то с пробелами...
И еще я не написал: WF должна быть типа OleVariant.
Если снова будет ошибка, выясняйте в отладчике в какой строке ошибка, т.к. приведенный код работает уже не один год

[Sanprof]

Проект effecienty.exe вызвыл исключение класса EOleError с сообщением 'Недопустимая строка с указанием класса'. Процесс остановлен.

Это ошибка OLE при создании позднего связывания, если в реестре на зарегистрировани интерфейс с таким КоКлассом

WF:=CreateOleObject('Word.Applicati on');

Ошибка в этой строке

[oasis]

Сообщение от ov_lab

почему-то в слове Application форум вставил пробел. Вот он класс и не находит. и "name", "практика" почему-то с пробелами...
И еще я не написал: WF должна быть типа OleVariant.
Если снова будет ошибка, выясняйте в отладчике в какой строке ошибка, т.к. приведенный код работает уже не один год

Лишние пробелы-то я убрала. а сообщение всё равно выходит..
не понимаю

[Sanprof]

Сообщение от oasis

Лишние пробелы-то я убрала. а сообщение всё равно выходит..
не понимаю

попробуйте поставить брекпоинт на строке "WF:=CreateOleObject('Word.Applicat ion');" и потом пошагово просмотреть, где именно выдает ошибку (впринципе должно работать, а то складывается впечатление как будто Word не установлен, но я думаю это не так).