Помощь - Поиск - Пользователи - Календарь
Полная версия: печать определенной страницы
Форум «Всё о Паскале» > Delphi, Assembler и другие языки. > Delphi
marwell
доброго времени суток
для печати документа пользовался функцией Application.ActiveDocument.Printout;
появилась необходимость печати только определенных страниц, а не всего документа.
Application.ActiveDocument.Printout(From:=n, To:=m);
не работает. Буду очень благодарен совету
IUnknown
Application.ActiveDocument.PrintOut(Pages:=IntToStr(n) + '-' + IntToStr(m));
не пробовал? Или
Application.ActiveDocument.PrintOut(Pages:=Format('%d-%d', [n, m]));
, что, в принципе, одно и то же, но второй вариант мне как-то ближе, лучше читается.
marwell
Цитата(IUnknown @ 13.10.2012 17:30) *

Application.ActiveDocument.PrintOut(Pages:=IntToStr(n) + '-' + IntToStr(m));
не пробовал? Или
Application.ActiveDocument.PrintOut(Pages:=Format('%d-%d', [n, m]));
, что, в принципе, одно и то же, но второй вариант мне как-то ближе, лучше читается.

к сожалению, в обоих случаях печатает весь документ
IUnknown
const wdPrintRangeOfPages = 4;
// ...
App.ActiveDocument.PrintOut(Pages:=Format('%d-%d', [n, m]), Range:=wdPrintRangeOfPages);
Только что проверено, напечатало страницы с 3 по 5-ю, как заказывал.
Гость
Цитата(IUnknown @ 13.10.2012 18:33) *

const wdPrintRangeOfPages = 4;
// ...
App.ActiveDocument.PrintOut(Pages:=Format('%d-%d', [n, m]), Range:=wdPrintRangeOfPages);
Только что проверено, напечатало страницы с 3 по 5-ю, как заказывал.

теперь да, работает. И в который раз уже огромное спасибо за помощь smile.gif
Гость
Цитата(Гость @ 13.10.2012 19:12) *

теперь да, работает. И в который раз уже огромное спасибо за помощь smile.gif

ой, зайти забыл)
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.