Emanuele ha scritto:
La notte ha portato consiglio?
Pare proprio di no.....mi spiace.
Intanto ho chiesto sulla lista [email protected] e pare che non sia
possibile scrivere lo stile d'un botto come volevo fare io, ma Stephan
Wunderlich suggeriva di creare prima un nuovo stile nel nuovo doc e poi
"loop over all properties in your original style and set them
accordingly in your new style".
Detta così (ma il mio inglese è scarso) sembra una operazione gravosa
tanto quella di sistemare 117 argomenti...
Ma la parola "loop" mi ha detto qualcosa...
Parallelamente ho cercato sul mio pc dove ho gli archivi (credo non
completi) della lista [email protected] dal 2000 ad oggi ed ho
trovato alcune discissioni inerenti...
Lo strano è che quelle discussioni non le ho trovate sugli archivi in
internet... quindi posto direttamente quel codice così come l'ho trovato.
Comunque funziona, ma è strutturato per fare copia di uno stile di
pagina all'interno dello stesso documento, ma cè qualcosa di poco chiaro.
Sto brigando per farlo funzionare tra due documenti diversi e nel caso
volessi divertirti anche tu...
ciao
Bart
------------------------------------------
Oggetto: Re: [api-dev] getting page styles
data: 26/02/2003 18:05
da: [EMAIL PROTECTED]
A : [email protected]
'*************************************
oDocument = ThisComponent
oSheet = oDocument.getSheets.getByIndex(0)
' get the pagestyle collection ....
oPstyle = oDocument.StyleFamilies.getByName("PageStyles")
' create a new pagestyle ...
oCpyStyle = oDocument.createInstance("com.sun.star.style.PageStyle")
' insert it into the collection ...
oPstyle.insertByName("temp", oCpyStyle)
' get the sheets pagestyle ...
oPstyle = oPstyle.getByName(oSheet.PageStyle)
' get the properties collection ...
aProperties = oPstyle.PropertySetInfo.Properties
' copy the properties ...
For i = LBound(aProperties) to UBound(aProperties)
sX = aProperties(i).Name
If oPstyle.getPropertyState(sX) =
com.sun.star.beans.PropertyState.DIRECT_VALUE Then
vTmp = oPstyle.getPropertyValue(sX)
oCpyStyle.setPropertyValue(sX, vTmp)
EndIf
Next i
'********************************************
Ciao!
Emanuele.
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
--
---------------------------------------------------
Bartolomeo Aimar architetto -
via Sant'Anselmo 27 - 10125 Torino (Italy)
tel: +39 011 6699308
cel: +39 347 2930643
fax: +39 1782769771
e-mail: [EMAIL PROTECTED]
---------------------------------------------------
--------------------------------------------------
P.S. Per diverse ragioni questo messaggio
potrebbe non prevedere una risposta ma
se mi RE-inviate (anche il solo titolo) avrò
la certezza che non è andato perso.
-------------------------------------------------
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
