Re: [de-discuss] Re: SUCCESS

Hallo Andreas, hallo Liste
das hier gehört eigentlich zur Diskussion "Schreibgeschützte externe 
Formulare"
Ich habe das Makro getestet, es funktioniert. Das gelbe Popup verschwindet.
herzlichen Dank, Andreas
viele Grüße
Gottfried Kunze

Am 01.12.2016 um 02:09 schrieb Andreas Säger:
> Hier ist etwas funktionierendes in Basic. Krieg ich in Python nicht hin.
> Das richtige Event ist "Ansicht wurde erzeugt"
>
> Sub hidePanelWindows(e)
> Dim CompWin, acRole, cHeight, wins, i, w, ac
> wait(1000)
> CompWin = e.Source.CurrentController.Frame.ComponentWindow
> acRole = com.sun.star.accessibility.AccessibleRole.PANEL
> cHeight = com.sun.star.awt.PosSize.HEIGHT
> wins() = CompWin.getWindows()
> for i = 1 to uBound(wins())
>         w = wins(i)
>         ac = w.AccessibleContext
>         if ac.AccessibleRole = acRole then
>                 w.setPosSize(0,0,0,0,15)
>         endif
> next
> End Sub


--
Liste abmelden mit E-Mail an: discuss+unsubscribe@de.libreoffice.org
Probleme? http://de.libreoffice.org/hilfe-kontakt/mailing-listen/abmeldung-liste/
Tipps zu Listenmails: http://wiki.documentfoundation.org/Netiquette/de
Listenarchiv: http://listarchives.libreoffice.org/de/discuss/
Alle E-Mails an diese Liste werden unlöschbar öffentlich archiviert