Вниз
Скачать: 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.05 c
15-1328553855
Hgd1
2012-02-06 22:44
2013.03.22
iMacros в D7


2-1340949433
Виктор
2012-06-29 09:57
2013.03.22
Delphi - Excel, автоматическое создание гиперссылки


15-1345025317
Думкин
2012-08-15 14:08
2013.03.22
Гарри Гаррисон


2-1346616136
ankazh
2012-09-03 00:02
2013.03.22
Сводная таблица


3-1278051371
ford
2010-07-02 10:16
2013.03.22
плохой индекс в FireBird




   Наверх