работа с WordApplication

← →
mari © (2003-12-10 16:55) [0]

Код для вызова Word следующий (работает, но не так)

var FileName:OleVariant

begin
FileName:=" ";
WordApplication1.Connect;
WordApplication1.Visible:=true;
WordApplication1.Documents.Open(FileName,EmpatyParam,...EmpatyParam);
WordApplication1.ActiveDocument.Application.Run("макрос",EmpatyParam,....EmpatyParam);

вот собственно и все

← →
panov © (2003-12-10 16:58) [1]

Не так - это как?

← →
mari © (2003-12-10 16:59) [2]

выдает ошибку не найден RPC сервер, если ворд закрыть, а эту процедуру еще раз вызвать

← →
Radionov Alexey © (2003-12-10 17:00) [3]

WordApplication1 := NULL; надо добавить

var FileName:OleVariant

begin
FileName:=" ";
WordApplication1.Connect;
WordApplication1.Visible:=true;
WordApplication1.Documents.Open(FileName,EmpatyParam,...EmpatyParam);
WordApplication1.ActiveDocument.Application.Run("макрос",EmpatyParam,....EmpatyParam);
WordApplication1 := NULL;

← →
mari © (2003-12-10 17:05) [4]

не всегда доступны основные команды (сохранить, распечатать и т.п.) раз запустится нормально, раз с глюками

← →
Radionov Alexey © (2003-12-10 17:08) [5]

Ой, я нагнал. Сорри. Вечер, голова не та и не это :)))

WordApplication1.Disconnect

Вместо WordApplication1 := NULL;
нужно
WordApplication1.Disconnect

работа с WordApplication Найти похожие ветки