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

Помогите с запуском WordApplication и RPC сервер не доступен   Найти похожие ветки 

 
Wadimka   (2012-06-27 08:40) [0]

Ребят такой глюк, не пойму куда копать.
Когда была XP стоял 2007 офис, такого бага небыло
Сейчас 7-ка но офис тож 2007 но какой-то другой релиз.
Вообщем код такой:
WordApp - компонент на форме TWordApplication
with WordApp do
begin
Connect;
ConnectKind:=ckRunningOrNew;
AutoQuit:=false;
         
Options.CheckSpellingAsYouType:=true;//íå ïðîâåðÿåì ñèíòàêñèñ
Options.CheckGrammarAsYouType:=true; //íå ïðîâåðÿåì ãðàììàòèêó
Visible:=true; //âèäíî ëè Word
//=====Открываем файл doc из FileNm
Documents.Open(FileNm,EmptyParam,EmptyParam,EmptyParam,
EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,
EmptyParam,EmptyParam,EmptyParam,EmptyParam, EmptyParam,EmptyParam);

//========Сохраняем eго как html
  flFormat:=wdFormatHTML;//   ActiveDocument.SaveAs(FileNm,flFormat,EmptyParam,EmptyParam,EmptyParam,
  EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam, EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam);

Disconnect;
Quit;//
end;

Запустив программу, выбираю файл doc все нормально, не закрывая программы, выбираю следующий файл doc и вылетает ошибка, RPC сервер недоступен.
После перезагрузки проги, все гут до второго файла.
Кто подскажет как лечить?


 
Wadimka   (2012-06-27 08:58) [1]

Благодарю вопрос решен, видимо мои ручки шаловливые все-таки в код залезли и поменяли местами
Disconnect и Quit;



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

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



Память: 0.45 MB
Время: 0.048 c
15-1339068423
Zheksonz
2012-06-07 15:27
2013.03.22
Синтаксис языка Си


2-1347353473
jet_
2012-09-11 12:51
2013.03.22
Добавление многострочного текста в ячейку ADVStringGrid


15-1347309002
Юрий
2012-09-11 00:30
2013.03.22
С днем рождения ! 11 сентября 2012 вторник


15-1350906196
Лида
2012-10-22 15:43
2013.03.22
Обработка различных событий в Delphi


2-1340279896
начинающий41
2012-06-21 15:58
2013.03.22
DbGrid




   Наверх