Mit den PagePrintSettings und der Methode printPages kann man bei Textdokumenten
mehrere Seiten auf eine Seite drucken. Im Programm geht das nur über die Seitenvoransicht.
Eigentlich gibt es zusätzlich noch die Methoden getPagePrintSettings und
setPagePrintsettings. Die Erste geht, da man aber die zweite Methode anscheinend nicht
geht, lassen sich nur die Standardwerte auslesen. Um die Einstellungen zu ändern muß man
die PageSettings als Parameter bei dem Druckbefehl übergeben.
Eine Wirkung der Einstellungen für die Seitenränder konnte ich nicht feststellen.
sub mytest
odoc=thiscomponent
Dim props(8) as new com.sun.star.beans.PropertyValue
props(0).Name="PageRows"
props(0).Value=0
props(1).Name="PageColumns"
props(1).Value=0
props(2).Name="LeftMargin"
props(2).Value=2
props(3).Name="RightMargin"
props(3).Value=2
props(4).Name="TopMargin"
props(4).Value=2
props(5).Name="BottomMargin"
props(5).Value=2
props(6).Name="HoriMargin"
props(6).Value=2
props(7).Name="VeriMargin"
props(7).Value=2
props(8).Name="IsLandscape"
props(8).Value=False
odoc.printpages(props())
end sub