Aktivierte Menüpunkte in eigenen Extension-Menüs

Programmierung unter AOO/LO (StarBasic, Python, Java, ...)

Moderator: Moderatoren

Stephan
********
Beiträge: 12369
Registriert: Mi, 30.06.2004 19:36
Wohnort: nahe Berlin

Aktivierte Menüpunkte in eigenen Extension-Menüs

Beitrag von Stephan »

Hallo,

die Überschrift ist vielleicht etwas unklar, aber es gibt in OO/LO an diversen Stellen von Menüs Einträge welche man altivieren kann und bei welchen dann diese Aktivierung per Häkchen visualisiert wird, z.B.:

AktivierterMenüpunkt.gif
AktivierterMenüpunkt.gif (40.99 KiB) 2031 mal betrachtet


Wie kann man dieses Verhalten bei eigenen Menüs erreichen, welche per Addon.xcu in Extensions weitergegeben werden?

Natürlich geht es dabei auch um eigenen Menüpunkte (mit welchen Makros gestartet werden sollen) und nicht um in OO/LO vorhandene Standard-Menü-Punkte die die 'Häkchen-Funktionalität' ohnehin beinhalten.
Z.B. soll einer einen Menüpunkt ein Makro gestartet werden, das der aktuellen Tabelle ein Ereignis zuordnet

Code: Alles auswählen

Sub activate_2()
	Dim mEventProps(1) as new com.sun.star.beans.PropertyValue
	mEventProps(0).Name = "EventType"
	mEventProps(0).Value = "Script"
	mEventProps(1).Name = "Script"
	mEventProps(1).Value = "vnd.sun.star.script:SpecialInput.work.Zwei_Nachkommastellen?language=Basic&location=application"
	ThisComponent.CurrentController.ActiveSheet.Events.ReplaceByName("OnChange", mEventProps())
End Sub
und dabei soll dann gleichzeitig dieser Menüpunkt das Häkchen bekommen um dem Anwender zu signalisieren, das das Ereignis, zum aktuellen Zeitpunkt, zugeordnet ist.



Gruß
Stephan
Antworten