У меня есть набор макросов libreoffice-basic, чтобы сделать печать нашего фирменного бланка быстрым в различных условиях. Недавно мы перешли от использования предварительно напечатанных бланков к печати всего документа, включая фон и логотипы. Я хотел бы оставить настройку принтера по умолчанию «печать в оттенках серого» и добавить в макрос, что письмо должно быть напечатано либо в полноцветном, либо в оттенках серого.
Я знаю, как установить параметры принтера:
REM Set the chosen printer
DIM mPrinterOpts(2) AS NEW com.sun.star.beans.PropertyValue
mPrinterOpts(0).Name = "Name"
mPrinterOpts(0).Value = sPrinter
mPrinterOpts(1).Name = "PaperFormat"
mPrinterOpts(1).Value = com.sun.star.view.PaperFormat.A4
mPrinterOpts(2).Name = "PaperOrientation"
mPrinterOpts(2).Value = com.sun.star.view.PaperOrientation.PORTRAIT
oDoc.Printer = mPrinterOpts()
... и параметры печати:
REM Set printOptions
DIM mPrintOpts(2) AS NEW com.sun.star.beans.PropertyValue
mPrintOpts(0).Name = "CopyCount"
mPrintOpts(0).Value = 1
mPrintOpts(1).Name = "Collate"
mPrintOpts(1).Value = True
mPrintOpts(2).Name = "Wait"
mPrintOpts(2).Value = True
REM Print
oDoc.Print(mPrintOpts())
... Но я не знаю, как получить / установить параметры в драйвере принтера. Кто-нибудь знает?