Альбомная ориентация

Автор ishayahu, 22 мая 2011, 14:58

0 Пользователи и 1 гость просматривают эту тему.

ishayahu

Хочу выводить документ на печать в альбомной ориентациии, но даже если я ставлю
PrintProperties(0).Name = "PaperOrientation"
PrintProperties(0).Value = LANDSCAPE

результат ноль( У меня LibreOffice
WinXP - OO3.3/LibreOffice3.3

JohnSUN

PaperOrientation состоит из двух констант - PORTRAIT и LANDSCAPE (обычные 0 и 1 соответственно).
В коде они записываются так: com.sun.star.view.PaperOrientation.PORTRAIT или com.sun.star.view.PaperOrientation.LANDSCAPE

Длинно, конечно... Зато однозначно.

Я обычно тестирую их прямо из бэйсика приблизительно так:
Sub TestConst
Print "com.sun.star.view.PaperOrientation.PORTRAIT = " & com.sun.star.view.PaperOrientation.PORTRAIT
Print "com.sun.star.view.PaperOrientation.LANDSCAPE = " & com.sun.star.view.PaperOrientation.LANDSCAPE
End Sub
Владислав Орлов aka JohnSUN
Благодарить-не зазорно.
Подарить благо создателям офиса, нашему ресурсу, мне

ishayahu

При указании любого из параметров печатается все равно в книжной ориентации  :(

REM массив параметров для открытия документа
Dim DocProperties(0) as new com.sun.star.beans.PropertyValue
PrintProperties(0).Name = "Wait"
PrintProperties(0).Value = True
PrintProperties(1).Name = "PaperOrientation"
PrintProperties(1).Value = com.sun.star.view.PaperOrientation.LANDSCAPE
Doc.print(PrintProperties())


[вложение удалено Администратором]
WinXP - OO3.3/LibreOffice3.3

bormant

А если
Dim DocProperties(1) as new com.sun.star.beans.PropertyValue
?
Автору на яд. Поддержать форум.

ishayahu

Я эту проблему уже решил, как точно - не помню, но могу поискать, если кому-нибудь надо.
WinXP - OO3.3/LibreOffice3.3