Seite 1 von 1

[gelöst] Ausschalten der Symbolleisten per Makro

Verfasst: Mi, 07.09.2011 11:49
von tomgom
Hallo allesamt,

wie kann ich per Makro die im Formular vorangewählten Symbolleisten ausschalten ?

Ich möchte für eine Datenbank diverse Eingabeformulare erstellen, bei denen alle Symbolleisten ausgeschaltet sind.

Re: Ausschalten der Symbolleisten per Makro

Verfasst: Mi, 07.09.2011 12:25
von komma4
Probiere es mit folgender Zeile...

Code: Alles auswählen

sub hideAll()
ThisComponent.CurrentController.Frame.LayoutManager.setVisible(False)
end sub

Re: Ausschalten der Symbolleisten per Makro

Verfasst: Do, 08.09.2011 21:44
von tomgom
Hallo komma4,

danke für die Hilfe, vor allem mit der detailierteren Lösung (Posting "Welches Objectmodell für Base") kann ich gut leben. Gibt es aber auch eine Möglichkeit, einezele Symbolleisten zu oder wegzuschalten ?

Re: Ausschalten der Symbolleisten per Makro

Verfasst: Fr, 09.09.2011 06:55
von komma4
tomgom hat geschrieben:Gibt es aber auch eine Möglichkeit, einezele Symbolleisten zu oder wegzuschalten ?
Wie im angesprochenen Thread viewtopic.php?f=18&t=50153 gezeigt... oder, was meinst Du?

Re: [gelöst] Ausschalten der Symbolleisten per Makro

Verfasst: Fr, 09.09.2011 08:45
von tomgom
Ich meinte damit, einzelne Symbolleisten, wie z.B die Symbolleiste "Standard", an- und auszuschalten. Ich habe aber die Lösung bei Schardingers "OOButler" gefunden:

Code: Alles auswählen

sub HideBars(optional n as integer) 'Symbolleisten ausblenden
	'Option aus: 1=Menü , 2=Statusleise. 4=Formsnavigationbar 
    dim lmgr as object, i as integer, o as object
    
    oDoc = ThisComponent
    if oDoc.CurrentController.isFormDesignMode() then exit sub
    lmgr = oDoc.CurrentController.Frame.LayoutManager
    if ismissing(n) then n=0
         
    if n and &H01 then lmgr.hideElement("private:resource/menubar/menubar") 'Menü  
	if n and &H02 then lmgr.hideElement("private:resource/statusbar/statusbar") 
	if n and &H04 then lmgr.hideElement("private:resource/toolbar/formsnavigationbar")
	lmgr.hideElement("private:resource/toolbar/standardbar")
	lmgr.hideElement("private:resource/toolbar/formdesign")
	lmgr.hideElement("private:resource/toolbar/formcontrols")
end sub 
Man/frau muß nur die englischen Bezeichnungen der einzelnen Symbolleisten kennen, dann klappt´s so, wie ich mir vorstellte.

Re: [gelöst] Ausschalten der Symbolleisten per Makro

Verfasst: Fr, 09.09.2011 10:41
von komma4
tomgom hat geschrieben:wie z.B die Symbolleiste "Standard", an- und auszuschalten. Ich habe aber die Lösung bei Schardingers "OOButler" gefunden
Und was ist da anders dran, als im oben angesprochenen Thread viewtopic.php?f=18&t=50153#p185182 ?

Re: [gelöst] Ausschalten der Symbolleisten per Makro

Verfasst: So, 11.09.2011 17:05
von tomgom
Du hast natürlich recht - ich hatte irgendwie Tomaten auf den Augen. oder aber einfach nicht weit genug nach unten gescrollt.