Bonjour,Bonjour,Je souhaite modifier les propriété de remplissage de type 
gradient
    d'une formeJ'arrive à le faire pour des remplissages simple, mais pas pour 
un
    gradient.J'utilise XRay pour trouver les propriétés, ainsi, j'ai trouvé la
    propriété FillGradient de l'objet, qui est fait une structureCette 
structure comporte différentes propriétés dont StartColor et
    EndColor, ce qui correspond bien aux deux propriétés que je veux
    changerVoilà le petit bout de code que j'ai fait :Dim monDocument as 
object, maPage as
        object, lesPages as objectDim lesArrPlans as object, unArrPlan as 
object, bgArrPlan as
        objectDim maForme as objectDim Gradient as objectConst col1 as Long = 
082*65536 + 144 * 256 + 139 'TurquoiseConst col2 as Long = 229*65536 + 226 * 
256 + 202 'Cool grayConst col3 as Long = 071*65536 + 045 * 256 + 051 'Brownish
        purpuleConst col4 as Long = 231*65536 + 071 * 256 + 046 
'orange-redConst colBl as Long = 255*65536 + 255 * 256 + 255 'BlancmonDocument 
= thisComponentlesArrPlans = monDocument.MasterPagesunArrPlan = 
lesArrPlans(1)maForme = unArrPlan.GetByName("MD")Gradient = 
maForme.FillGradientGradient.StartColor = col2Gradient.EndColor = col4Mon 
problème vient peut-être du fait que j'accède à une structure et
    non à des propriétés, et que je le fais mal. Un peu comme la
    position d'un objetPierre
-- 
Envoyez un mail à [email protected] pour vous désinscrire
Les archives de la liste sont disponibles à 
https://listarchives.libreoffice.org/fr/users/
Privacy Policy: https://www.documentfoundation.org/privacy

Répondre à