VPF::Параметры PrintOut - Форум программистов

SAVANE

Дата 22.4.2008, 16:25 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 118
Регистрация: 20.7.2006
Где: Украина, Полтава

Репутация: 1
Всего: 1

Здравствуйте!
Столкнулся с проблемой!
Нужно чтоб программа печатала указанные страницы по 2 страницы на листе.
Делаю так:

Код


Range:=wdPrintRangeOfPages;
Copies:=1;
Pages:='4, 1, 3, 2';
Item:=wdPrintDocumentContent;
PrintZoomColumn:=2;
WordApplication1.ActiveDocument.PrintOut(EmptyParam, Rangе, EmptyParam,
    EmptyParam, EmptyParam, EmptyParam, Item, Copies, Pages,
    EmptyParam,EmptyParam,EmptyParam,
EmptyParam,EmptyParam, PrintZoomColumn,EmptyParam,EmptyParam,EmptyParam);

Дебугер ругается:
---------------------------
Debugger Exception Notification
--------------------------
Project Project1.exe raised exception class EOleException with message 'Ошибка на сервере'. Process stopped. Use Step or Run to continue.
--------------------------
OK Help
--------------------------

Когда в PrintOut все параметры EmptyParam то пичатается просто весь документ.

Подскажите плиз!

--------------------

Be not afraid of growing slowly, be afraid only of standing still!

Albinos_x

Дата 16.5.2008, 16:51 (ссылка)

(нет голосов)

Загрузка ...

Evil Skynet

Профиль
Группа: Комодератор
Сообщений: 3288
Регистрация: 28.5.2004
Где: X-6120400 Y-1 4624650

Репутация: 15
Всего: 108

вероятно, что это происходит потому, что параметр Range указан не на своём месте:

Код


WordApplication1.ActiveDocument.PrintOut(Background,
                                         Append_,
                                         Range,
                                         OutputFileName,
                                         From,
                                         To_,
                                         Item,
                                         Copies,
                                         Pages,
                                         PageType,
                                         PrintToFile,
                                         Collate,
                                         ActivePrinterMacGX,
                                         ManualDuplexPrint,
                                         PrintZoomColumn,
                                         PrintZoomRow,
                                         PrintZoomPaperWidth,
                                         PrintZoomPaperHieght);

--------------------

"Кто владеет информацией, тот владеет миром"
Уинстон Черчилль

1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: ActiveX/СОМ/CORBA \| Следующая тема »