[gelöst] Text für Schaltfläche fett, FontDiscriptor

[clag]

Hallo Kenner und Könner,

per Makro möchte ich den "Label" Text einer Schaltfläche auf fett setzen,
habe mich mit MRI bzw Xray bis zum "FontDescriptor" einer Schaltläche vorgetastet
aber scheinbar kann ich da nur lesen und nicht schreiben?

FontDescriptor.weight = 100 (normal)
FontDescriptor.weight = 150 (fett)

Die folgenden Zeilen zeigen jedenfalls hier keine Wirkung aber auch keinen Fehler

Code: Alles auswählen

dim FontDescriptor(0) as new com.sun.star.beans.PropertyValue
FontDescriptor(0).Name = "weight"
FontDescriptor(0).Value = "150"

oCalc.Sheets(0).Drawpage.Forms.getByIndex(0).getbyName("Schaltfläche 1").FontDescriptor

wie setze ich korrekterweise diese Werte für FontDescriptor?

FontDescriptor.png (7.94 KiB) 2198 mal betrachtet

[clag]

Hallo zusammen,

tschuldigung für meine Fragerei ..
habe gerade bei Herrn Dannenhöfer eine Antwort gefunden (warum habe ich nicht gleich den richtigen Suchbegriff eingegeben )

Code: Alles auswählen

dim xFont As New com.sun.star.awt.FontDescriptor
xFont.Weight = 100

oCalc.Sheets(0).Drawpage.Forms.getByIndex(0).getbyName("Schaltfläche 1").FontDescriptor=xFont

die Zeilen bewirken das gewünschte.

[balu]

Hallo clag,

schön das Du eine Lösung gefunden hast. Es geht aber auch anders (einfacher), und das ohne extra den FontDescriptor aufzurufen.

Code: Alles auswählen

Sub ButtonDrawpage
	vForm = ThisComponent.Sheets(0).DrawPage.Forms.getByIndex(0)

	StartButton = vForm.getByName("Schaltfläche 1")
	StartButton.Label = "Mein Name ist Hase."
	StartButton.BackgroundColor = &H7e0021
	StartButton.TextColor = &H000000
	StartButton.FontHeight = 20
	StartButton.FontName = "Verdana"

	StartButton.FontWeight = 150
End Sub

per Makro möchte ich den "Label" Text einer Schaltfläche auf fett setzen,
habe mich mit MRI bzw Xray bis zum "FontDescriptor" einer Schaltläche vorgetastet

Ich weiß nicht wie Du wo MRI bzw Xray angesetzt hast, aber hiermit

Code: Alles auswählen

xray ThisComponent.Sheets(0).DrawPage.Forms.getByIndex(0).getByName("Schaltfläche 1")

bekommst Du eigentlich alles was man braucht um eine Schaltfläche auf der Drawpage zu bearbeiten, oder zu manipulieren.

Ich weiß das das Suchen mit MRI bzw Xray nicht immer einfach ist, aber manschmal gehts doch recht leicht.



gruß
balu

[clag]

Hallo Balu,

ja manchmal ist man blind, man steht genau vor dem Scheunentor und sucht es immernoch, zuerst hatte ich genau da
wodu es jetzte zeigst gesucht aber möglichereweise war ich auf "bold" oder so etwas fixiert und habe "weight" nicht als fett erkannt?
Gut das du mir noch aufzeigst, das ich zu tief gebohrt habe und die Eigenschaft doch viel einfacher zu erreichen ist.

Besten Dank dadafür.