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

Word.Application   Найти похожие ветки 

 
kblc ©   (2005-03-17 16:04) [0]

Уважаемые мастера, у меня к вам вопрос:
 -Я использую объект Word.Application но, когда я пытаюсь распечатать текст из этого докумкента MSWord.ActiveDocument.PrintOut; и слудующей строчкой закрываю этот документ
 if not VarIsEmpty(MSWord) then
 begin
   MSWord.Quit;
   MSWord:=unAssigned;
 end;

то получаю сообщение с кнопкой "прекратить печать", что мол отвалите - я печатаю , хотя нифига не печатаеться.
 Но когда я его не закрываю, т.е. не выполняю Quit, а жду трассируя программу, то ВСЁ РАБОТАЕТ ОТЛИЧНО!
 А вот и вопрос: Есть ли возможность определить "свободность" OLE объекта (MSWord) или как-то его самого заставить ждать окончания печати документа?


 
GanibalLector ©   (2005-03-18 02:25) [1]

Background:=False должен помочь


 
GanibalLector ©   (2005-03-18 02:29) [2]

Это я про параметр ф-ции PrintOut.
Также есть замечательная ф-ция BackgroundPrintingStatus.По идее должна помочь...не проверял.
Принтера у меня нет! Нищий,мля :(


 
kblc ©   (2005-03-18 15:23) [3]

Действительно помогло! :)
while MSWord.BackgroundPrintingStatus<>0 do
!!!
Но! У меня к вам езё один вопрос:
Конвертирую файл:

   MSWord.Documents.Open(FileName,false);
   MSWord.ActiveDocument.SaveAs(FileName,$00000006); // AS *.RTF
   MSWord.ActiveDocument.Close; <<- exception: ошибка на сервере

Почему у меня получается "ошибка на сервере"? Из-за чего это вообще??? Причём, ошибку выдаёт не всегда.
помогите плз.


 
GanibalLector ©   (2005-03-18 23:36) [4]

2 kblc ©   (18.03.05 15:23) [3]
Странно.Не замечал такого.


 
kblc ©   (2005-03-21 08:01) [5]

Я проверяю каждый день... в независимости от погоды :)
Но эТА штука не работает! Почему?



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

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



Память: 0.46 MB
Время: 0.029 c
14-1135156839
Empleado
2005-12-21 12:20
2006.01.15
В Саранске создается цифровое телевещание


3-1131546332
Mitrofan
2005-11-09 17:25
2006.01.15
Записать объект в поле Blob (Firebird)


14-1134751968
KvORubin
2005-12-16 19:52
2006.01.15
Ув. Знатоки !!! подскажите коротким словом


8-1122288108
Adler
2005-07-25 14:41
2006.01.15
_ Delphi и AVI


2-1135494885
LexxX
2005-12-25 10:14
2006.01.15
Получение сообщения об ошибке




   Наверх