OpenOffice.info

Verfasst: **Mo, 03.11.2008 22:40**

gary hat geschrieben:das habe ich soweit selbst geschafft.

Zeigen!

Du kennst XRay, um die Eigenschaften und Methoden Deiner Objekte zu untersuchen?

Verfasst: **Di, 04.11.2008 12:59**

Hallo,

eigentlich kann man einen Rahmen als neues Objekt in den Texteinfügen und dabei alle Parameter setzen.

odocument=thiscomponent
oText = oDocument.Text
oCursor = oText.createTextCursor()
'Den neune Textrahmen als Objekt erstellen.
oFrame = oDocument.createInstance("com.sun.star.text.TextFrame")
'Weite und Höhe des Rahmen festlegen
oframe.width = 2000
oframe.height = 2000
'Position des Rahmen festlegen in 100/mm
oframe.HoriOrientPosition =2000
oFrame.VertOrientPosition = 2000
'Name festlegen
oframe.setname("RahmenName")
'Positionsvorgaben ausschalten ( siehe unten)
oFrame.HoriOrient = com.sun.star.text.HoriOrientation.NONE
oFrame.VertOrient = com.sun.star.text.VertOrientation.NONE
'Rahmentyp festlegen
Dim myLine As New com.sun.star.table.BorderLine
myLine.Color=RGB (255,0,0)
myLine.InnerLineWidth=0
myLine.OuterLineWidth=100
oFrame.Bottomborder=Myline
oFrame.Topborder=Myline
oFrame.Leftborder=Myline
oFrame.Rightborder=Myline
'Rahmen einfügen
oText.insertTextContent(oCursor, oFrame, FALSE)

Wenn man jetzt "xray oFrame" verwendet sieht man die Eigenschaften des Rahmenobjektes mit xray.

mfg
Michael

Verfasst: **Di, 04.11.2008 14:19**

Danke, Michael,
das ersparte mir einige Tipparbeit ...

@gary: aufgezeichneter dispatcher Code lässt sich schwer anpassen, da (zumindest bei mir unbekannt) die möglichen Parameter der UNO calls nicht dokumentiert sind. Versuche Dich mal an Michaels Beispiel...

OpenOffice.info

Makro für Rahmen

Re: Makro für Rahmen

Re: Makro für Rahmen

Re: Makro für Rahmen