Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Word.Application [Delphi, Windows]

kblc © (2005-03-17 16:04:00)
Уважаемые мастера, у меня к вам вопрос:
-Я использую объект Word.Application но, когда я пытаюсь распечатать текст из этого докумкента MSWord.ActiveDocument.PrintOut;и слудующей строчкой закрываю этот документ
if not VarIsEmpty(MSWord) then begin MSWord.Quit; MSWord:=unAssigned; end;
то получаю сообщение с кнопкой "прекратить печать", что мол отвалите - я печатаю , хотя нифига не печатаеться.
Но когда я его не закрываю, т.е. не выполняю Quit, а жду трассируя программу, то ВСЁ РАБОТАЕТ ОТЛИЧНО!
А вот и вопрос: Есть ли возможность определить "свободность" OLE объекта (MSWord) или как-то его самого заставить ждать окончания печати документа?

kblc (2005-03-21 08:01:00) [1]
Я проверяю каждый день... в независимости от погоды :)
Но эТА штука не работает! Почему?

GanibalLector (2005-03-18 23:36:00) [2]
2 kblc © (18.03.05 15:23) [3]
Странно.Не замечал такого.

kblc (2005-03-18 15:23:00) [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 02:29:00) [4]
Это я про параметр ф-ции PrintOut.
Также есть замечательная ф-ция BackgroundPrintingStatus.По идее должна помочь...не проверял.
Принтера у меня нет! Нищий,мля :(

GanibalLector (2005-03-18 02:25:00) [5]
Background:=Falseдолжен помочь

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »