UserControl et ReadProperties

Question

Hello !
Je reviens à la charge avec une nouvelle question...

Voilà j'ai créé un objet UserControl. J'appelle la procédure UserControl_ReadProperties(PropBag As PropertyBag). J'ai un message d'erreur qui me dit "Type incompatible" sur le code suivant : m_bColor = PropBag.ReadProperty("BackColor", vbButtonFace).
La variable m_bColor est déclarée en OLE_COLOR. La propriété "BackColor" utilise bien un paramètre OLE_COLOR... je ne comprends pas d'où vient l'incompatibilité de type...
Quelqu'un pourrait-il éclairer ma lanterne ? Est-ce dû au fait que j'attribue une valeur à cette variable dans UserControl_InitProperties() ?

Merci d'avance pour votre aide

cs_DARKSIDIOUS · Answer

non ca devrait marcher ! Mais vu la nomenclature de ta variable, t'es sûr qu'il s'agit d'un OLE_COLOR ? (pour moi, ca veut dire une variable Booléene le b !)

Myrddin772Li199 · Answer

En fait le "b" est là pour "back"...
Tu penses que cela peut jouer ?

cs_DARKSIDIOUS · Answer

non non, du tout, si c'est bien OLE_COLOR, y'a pas de soucis.

J'utilise ce code depuis belle lurette (le readproperties pour des variables de type OLE_COLOR), et j'ai jamais eu de problème de type ! Je vois pas du tout d'où ca peux venir.

Myrddin772Li199 · Answer

bon ben je vais faire une recherche sur m_bColor... peut être qu'elle est redéfinie quelque part...

Renfield · Answer

a voir ce que tu as ecrit dans ton propertyBag....

PCPT · Answer

j'sens bien l'appel qui serait faux..
genre Call UserControl_ReadProperties("BackColor")   ?

++
<hr size="2" width="100%" />Prenez un instant pour répondre à [infomsg_SONDAGE-POP3-POUR-CS_769706.aspx ce sondage] svp

cs_lermite222 · Answer

bonjour,
la variable vbButtonFace n'est probablement pas compatible avec Color
en effet, le deuxième élément étant une donnée par défaut.
m_bColor = PropBag.ReadProperty("BackColor", &H8000000F&).Blanc par exemple 
si Backcolor est initialisé mettre 0


A+


louis

cs_lermite222 · Answer

correction, si vbButtonFace est un contrôle accessible ce serait alors
m_bColor = PropBag.ReadProperty("BackColor", vbButtonFace.backcolor).
A+

cs_DARKSIDIOUS · Answer

non non, vbButtonFace est une constante vb qui est compatible avec OLE_COLOR, pas de soucis avec cà, je l'utilise depuis pas mal de temps !

Myrddin772Li199 · Answer

Voilà le code qui gêne...
Private Sub UserControl_ReadProperties(PropBag As PropertyBag)
    m_bColor = PropBag.ReadProperty("BackColor", vbButtonFace)
End Sub

Mais quand j'écris ça :
Private Sub UserControl_ReadProperties(PropBag As PropertyBag)
    m_bColor = vbButtonFace
End Sub

Ca n'est donc pas un problème de type de ma variable... Est ce que j'utilise mal la fonction PropBag.ReadProperty ?

Renfield · Answer

et le writeProperty, comment est il, se demande le poor lonesome cow-boy....

Renfield
Admin CodeS-SourceS- MVP Visual Basic

Myrddin772Li199 · Answer

Ben... il est comme ça :

Private Sub UserControl_WriteProperties(PropBag As PropertyBag)
    PropBag.WriteProperty "BackColor", m_bColor, vbButtonFace
End Sub

Il est bon ?

UserControl et ReadProperties

12 réponses

Votre réponse

Discussions similaires