Seite 1 von 1
Textrahmen ohne Rahmen
Verfasst: Fr, 16.07.2010 22:24
von Akkuschrauber
Hört sich vielleicht nen bischen merkwürdig an, ist aber genau das Problem das ich habe.
Ich habe ein Makro mit Star Basic geschrieben, welches Daten aus einer Datenbank ausliest und in eine Vorlage einfügt.
Jetzt habe ich allerdings das Problem das der Textrahmen in den ich den Text einfüge standardmäßig einen 0,05pt breiten, schwarzen Rahmen hat,
was ich aber nicht will.
Im Programmierhandbuch habe ich nichts dazu gefunden wie ich den wegbekomme, deshalb frage ich hiermit euch um Hilfe.
Greetz
Akkuschrauber
Re: Textrahmen ohne Rahmen
Verfasst: Sa, 17.07.2010 15:42
von DPunch
Aloha
Das hört sich an, als würdest Du den Textrahmen auch per Makro ins Dokument einfügen - in diesem Fall kannst Du mal folgenden Codeausschnitt probieren:
Code: Alles auswählen
oTextFrame = oDoc.createInstance("com.sun.star.text.TextFrame")
oBorder = oTextFrame.BottomBorder
With oBorder
.Color = 0
.InnerLineWidth = 0
.OuterLineWidth = 0
.LineDistance = 0
End With
With oTextFrame
.BottomBorder = oBorder
.TopBorder = oBorder
.RightBorder = oBorder
.LeftBorder = oBorder
End With
Re: Textrahmen ohne Rahmen
Verfasst: So, 18.07.2010 11:03
von Akkuschrauber
Ok, das Problem hab ich jetzt gelöst.
Allerdings folgt das Nächste auch gleich
Wie kann ich den Text, den ich in den Textrahmen einfüge formatieren, also Schriftart ändern, Fett, Schriftgröße?
Danke für die Hilfe.
Akkuschrauber
Re: Textrahmen ohne Rahmen
Verfasst: So, 18.07.2010 13:15
von turtle47
Hallo,
Akkuschrauber hat geschrieben:Wie kann ich den Text, den ich in den Textrahmen einfüge formatieren, also Schriftart ändern, Fett, Schriftgröße?
Code: Alles auswählen
oFrames=odocument.getTextFrames()
oFrame=oFrames.getByIndex(0)
oFrameCursor=oFrame.createTextCursor()
oFrameCursor.gotoEnd(true)
oFrameCursor.CharHeight="20"
oFrameCursor.charcolor=&H000000
oFrameCursor.CharUnderline=com.sun.star.awt.FontUnderline.SINGLE
oFrameCursor.CharWeight=com.sun.star.awt.FontWeight.BOLD
oFrameCursor.CharPosture=com.sun.star.awt.FontSlant.ITALIC
Viel Erfolg.
Jürgen