LayerManager
Verfasst: Mi, 15.10.2014 16:42
Helft mir doch bitte mal wieder:
Ich versuche auf der Drawpage meines Tabellendokuments eine Ebene einzufügen und habe den Code (aus dem Thomas Krummbein Buch):
... das funktioniert nicht. Irgendwie klappt das mit "LayerManger" nicht.
Danke Pit
Ich versuche auf der Drawpage meines Tabellendokuments eine Ebene einzufügen und habe den Code (aus dem Thomas Krummbein Buch):
Code: Alles auswählen
dim oEbenen as object, oEbene as object,
dim oName as string
oName = "Ebene1"
oEbenen = ThisComponent.getLayerManager()
if oEbenen.hasByName(oName) then
oEbene = oEbenen.getByName(oName)
else
oEbenen.insertNewByIndex(oEbenen.getCount())
oEbene = oEbenen.getByIndex(oEbenen.count-1)
oEbene.name=oName
end ifDanke Pit