EXLISTVIEW- LISTVIEW PERSONNALISÉ

PROTEUS91 Messages postés 156 Date d'inscription mardi 4 novembre 2003 Statut Membre Dernière intervention 28 décembre 2010 - 27 mai 2009 à 10:30
cs_xav2303 Messages postés 5 Date d'inscription lundi 17 mars 2008 Statut Membre Dernière intervention 21 octobre 2009 - 16 nov. 2009 à 21:13
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/50069-exlistview-listview-personnalise

cs_xav2303 Messages postés 5 Date d'inscription lundi 17 mars 2008 Statut Membre Dernière intervention 21 octobre 2009
16 nov. 2009 à 21:13
Bonjour
Un autre bug aussi : En mode Tile pour View ça répète 2 fois le nom de l'item... Quelqu'un voie d'où ça vient ?
bouv Messages postés 1411 Date d'inscription mercredi 6 août 2003 Statut Membre Dernière intervention 3 mars 2019 1
12 août 2009 à 10:26
Ils disparaissent... puis réapparaissent... c'est ça ?

Je ne sais plus comment mais j'avais trouvé comment résoudre le problème.
De plus cela semble se produire de manière aléatoire.
Mayzz Messages postés 2813 Date d'inscription mardi 15 avril 2003 Statut Membre Dernière intervention 2 juin 2020 28
12 août 2009 à 08:28
Merci :)

Dès que j'ai un moment je met à jour !

Il y a un autre bug, mais qui vient du listview lui même, lors ce que l'on met en détails, que l'on ajoute des éléments puis que l'on survole ceux-ci avec le pointeur.
bouv Messages postés 1411 Date d'inscription mercredi 6 août 2003 Statut Membre Dernière intervention 3 mars 2019 1
11 août 2009 à 23:08
Autre bug ou plutot inconvenient. En mode ExViewMode, les item dessinés ne sont pas transparents. Donc lorsque l'on utilise une image de fond, celle-ci se trouve cachée par items.

Pour reproduire le comportement original de la LV (item transparents, sauf s'ils sont selectionnés), j'ai du adapté le code de la procédure OnDrawItem qui commence désormais ainsi :

If e.Item.Index < 0 Then
Exit Sub
ElseIf Me.Items(e.Item.Index).Selected = False Then
MyBase.OnDrawItem(e)
ElseIf _ExViewMode Then

Mais peut-etre existe-t-il une autre solution...
bouv Messages postés 1411 Date d'inscription mercredi 6 août 2003 Statut Membre Dernière intervention 3 mars 2019 1
11 août 2009 à 20:41
Super code. Juste un petit bug. Lorsqu'une colonne est masquée les premières lettre du SubItem s'affichent quand même et se superposent avec le SubItem suivant.

Pour résoudre le problème il suffit d'ajouter cette ligne au début de la procédure OnDrawSubItem :

If Me.Columns(e.ColumnIndex).Width = 0 Then Exit Sub
Mayzz Messages postés 2813 Date d'inscription mardi 15 avril 2003 Statut Membre Dernière intervention 2 juin 2020 28
2 juin 2009 à 13:29
Oui c'est exacte, je l'ai traduite en vb, j'ai spécifié le nom de l'auteur et le lien vers la source dans mon code :)
cs_eldim Messages postés 956 Date d'inscription lundi 30 mai 2005 Statut Membre Dernière intervention 21 août 2014 1
2 juin 2009 à 08:45
Salut,
pas regardé non plus mais je reconnais un source lol : roundedrectangle
PROTEUS91 Messages postés 156 Date d'inscription mardi 4 novembre 2003 Statut Membre Dernière intervention 28 décembre 2010
27 mai 2009 à 10:30
Je n'ai pas encore regardé le code mais le screen a l'air pas mal :)
Rejoignez-nous