[de-users] Draw Ebene per Makro sperren

Hi ich versuche gerade in Draw per Makro eine Ebene zu sperren

------------8<----------------
Sub EbeneSperren(sName As string)
Dim oDoc as Object, oEbenen as Object
Dim oEbene as Object

oDoc = ThisComponent
oEbenen = oDoc.getLayerManager()
        if oEbenen.hasByName(sName) then
          oEbene = oEbenen.getByName(sName)
          oEbene.IsPrintable("IsLocked", true)
          'oEbene.IsLocked = true 'geht auch nicht
          'Mri oEbene
        End if
End Sub
-------8<------------

Das funktioniert nicht, keine Statusänderung. Es gibt keine Fehlermeldung.
Was ist da los? Ist IsLocked evtl. readonly? Ich habe dazu keinen Hinweis
gefunden (SDK und Websuche)

Gerade hab ich noch festgestellt, dass die anderen Properties Isvisible und
IsPrintable auch nicht änderbar sind.
Den Namen der Ebene kann man mit setPropertyValue ändern.

Bitte um Hilfe :)

-- 
Gruss
  Bernd


-- 
Liste abmelden mit E-Mail an: users+unsubscribe@de.libreoffice.org
Probleme? https://de.libreoffice.org/hilfe-kontakt/mailing-listen/abmeldung-liste/
Tipps zu Listenmails: https://wiki.documentfoundation.org/Netiquette/de
Listenarchiv: https://listarchives.libreoffice.org/de/users/
Datenschutzerklärung: https://www.documentfoundation.org/privacy