Вниз
Скачать: CL | DM;

работа с 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]

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


 
Radionov Alexey ©   (2003-12-10 17:13) [6]

WordApplication1.Disconnect


 
Radionov Alexey ©   (2003-12-10 17:15) [7]

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



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.014 c
1-75153
bavc
2003-12-10 07:39
2003.12.23
TTable + ComboBox


1-75214
scorpi
2003-12-11 07:33
2003.12.23
Перевод строки в код


14-75394
alex134
2003-11-28 00:16
2003.12.23
Форум ВебМастеров


7-75423
Eagle Owl
2003-10-15 19:00
2003.12.23
Service Application


1-75252
Biji
2003-12-10 14:30
2003.12.23
Обновление окна программы




   Наверх