Backcolor dans treeview

Soyez le premier à donner votre avis sur cette source.

Snippet vu 4 740 fois - Téléchargée 40 fois

Contenu du snippet

Microsoft et cie n'auraient-ils pas oublié la propriété BACKCOLOR sur son objet ???!!!
Enfin problème résolu grace aux API.
En fait la réponse se trouvait dans le code de Steve McMahon dans "Comment ajouter une picture en fond dans un TreeView" sur ce site.
Bien évidemment, cela marche avec tous les objets qui comporte un Handle...

@+

Source / Exemple :


Private Declare Function SendMessageLong Lib "user32" _
        Alias "SendMessageA" (ByVal hwnd As Long, _
                              ByVal wMsg As Long, _
                              ByVal wParam As Long, _
                              ByVal lParam As Long) As Long

Private Const TV_FIRST As Long = &H1100
Private Const TVM_SETBKCOLOR As Long = (TV_FIRST + 29)

Sub TreeViewBackColor(byval myColor as long)
    SendMessageLong monTreeView.hwnd, TVM_SETBKCOLOR, 0, myColor
End sub

A voir également

Ajouter un commentaire

Commentaires

Messages postés
3
Date d'inscription
samedi 5 mars 2005
Statut
Membre
Dernière intervention
26 août 2007

C'est excellent.

Cependant je ccherche une solution pour VBA. Dans ce cas il est nécessaire de récupérer le Hwnd du contrôle qui n'est pas accessible dans MSACCESS et plus généralement dans VBA.

Comment retrouver le handle de tout contrôle au sein de VBA et notamment sous MSACCESS. Je suppose que l'on peut le faire via des API et VBE. J'ai cherché sans triuver.

Merci
Messages postés
75
Date d'inscription
samedi 30 août 2003
Statut
Membre
Dernière intervention
7 janvier 2008

En utilisant le code + haut :

Pour changer couleur de fond, envoyer le message suivant :

Private Const TVM_SETBKCOLOR = (TV_FIRST + 29)

Pour changer couleur de ligne, envoyer le message suivant :

Private Const TVM_SETLINECOLOR = (TV_FIRST + 40)

Pour changer couleur de texte, envoyer le message suivant :

Private Const TVM_SETTEXTCOLOR = (TV_FIRST + 30)

Source :
http://www.vbaccelerator.com/home/VB/Code/Controls/TreeView/TreeView_Control/VB5_TreeView_Full_Source_zip_vbalTreeView_ctl.asp

bonne prog all
Messages postés
24
Date d'inscription
jeudi 27 mai 2004
Statut
Membre
Dernière intervention
8 janvier 2007

Ok, merci tout-de-même...
Messages postés
70
Date d'inscription
mercredi 24 avril 2002
Statut
Membre
Dernière intervention
17 septembre 2006

A première vue, ce n'est pas prévu.

J'ai pas la réponse.
Messages postés
24
Date d'inscription
jeudi 27 mai 2004
Statut
Membre
Dernière intervention
8 janvier 2007

Il a expliqué comment changer la couleur de FOND des noeuds. Moi je parle de la fine ligne à peine visible qui RELIE les noeuds entre eux et/ou à la racine. C'est pas la même chose...
Afficher les 18 commentaires

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.