OVH Cloud OVH Cloud

ListBox et checkbox

26 réponses
Avatar
scraper
bonjour à tous !

un petit souci sur le quel je sèche :

dans un listbox, j'aimerais afficher plusieurs colonnes, définir moi même
les tabulations (mise en page) et aussi avoir la possibilité d'afficher des
checkbox

or il semble qu'avec SendMessage, la redéfinition de la largeur de colonnes
ne fonctionne pas si le style du listbox est à 1 - checkbox)

y aurait il une solution pour ce faire, ou dois je m'orienter définitivement
vers un autre type de contrôle ?

(et si oui, lequel ?)


merci de votre aide



--

Attention ! Adresse mail invalide ...
Pour me contacter, cliquez sur le lien ci-dessous:
http://scraper.chez.tiscali.fr/contact.htm

scraper

6 réponses

1 2 3
Avatar
Jacques93
Bonsoir,
scraper wrote:
Bonjour Jacques93, dans le message
news:%
tu disais :



[...]

Me.Picture1.AutoRedraw = True
et
Me.Picture1.Picture = Me.Picture1.Image

et là, ça roule !!



J'ai indiqué la première ligne parce que les propriétés ne sont pas
visible dans un post. Donc je penses que c'est la 2eme ligne qui fait l
a différence.


juste un petit bémol : malgré le Me.Picture1.Cls, les icones s'empilent
dans le picturebox !
je sais pas trop que faire pour nettoyer ça ...

j'ajoute que j'ai préféré opter pour ExtractIconEx et DrawIconEx, qui me
permettent d'extraire une icone de petite taille (sinon, c'est bcp moins
propre ...)
=> je vois que tu l'avais mentionné dans ton code ci dessous ;-)

me reste donc plus que ce problème de superposition d'images dans le
picturebox :-)

si tu as une idée ?



Oui, remplace :

Me.Picture1.Cls

par

Set Me.Picture1.Picture1 = Nothing

ça devrait être OK.


--
Cordialement,

Jacques.
Avatar
scraper
Bonjour Jacques93, dans le message
news:
tu disais :


Me.Picture1.AutoRedraw = True
et
Me.Picture1.Picture = Me.Picture1.Image

et là, ça roule !!



J'ai indiqué la première ligne parce que les propriétés ne sont pas
visible dans un post. Donc je penses que c'est la 2eme ligne qui fait
l a différence.



oui, mais là non (en tout cas pas chez moi !)
euh ... je crois que c'est encore de ma faute, désolé ! je t'ai pas précisé
que je chargeais plusieurs images à la suite (en fait, j'ai une liste de
noms, et pour chaque nom, je charge une icone dans le contrôle ImageList ...

(je suis vraiment pas performant ce soir !)

quoi qu'il en soit, en mettant la propriété AutoRedraw à True lors de chaque
passage dans ma boucle, ça baigne !>

me reste donc plus que ce problème de superposition d'images dans le
picturebox :-)

si tu as une idée ?



Oui, remplace :

Me.Picture1.Cls

par

Set Me.Picture1.Picture1 = Nothing

ça devrait être OK.



alors là, respect ! :o)

superbe, magnifique !!!

si tu veux bien m'éclairer encore (un détail, je chipote) :
dans mon ListView, maintenant, j'ai bien ma liste comme je le voulais, avec
sur chaque ligne :
checkbox, icon, et ensuite 2 colonnes (nom du fichier et état)

y a t il un moyen pour "décoller" un peu l'icone de la checkbox ?

j'ai regardé un peu dans les propriétés de ListView, et j'ai pas trouvé
...(propriété Left de Column en elcture seule ... je dois pas chercher la
bonne propriété ...)


en tout cas, un super grand merci pour ton aide ;-)




--

Attention ! Adresse mail invalide ...
Pour me contacter, cliquez sur le lien ci-dessous:
http://scraper.chez.tiscali.fr/contact.htm

scraper
Avatar
Jacques93
scraper wrote:
Bonjour Jacques93, dans le message
news:
tu disais :





[...]


(je suis vraiment pas performant ce soir !)



Ca arrive aux meilleurs ;-)

[...]


y a t il un moyen pour "décoller" un peu l'icone de la checkbox ?

j'ai regardé un peu dans les propriétés de ListView, et j'ai pas trouvé
....(propriété Left de Column en elcture seule ... je dois pas chercher
la bonne propriété ...)




Oui, dans DrawIcon, change le paramètre xLeft (ici 3, mais pas trop pour
ne pas tronquer l'icône sur le côté droit.

return2& = DrawIcon(Me.Picture1.hdc, 3, 0, return1)


en tout cas, un super grand merci pour ton aide ;-)




De rien, bonne nuit :-)

--
Cordialement,

Jacques.
Avatar
scraper
Bonjour Jacques93, dans le message
news:
tu disais :

y a t il un moyen pour "décoller" un peu l'icone de la checkbox ?

j'ai regardé un peu dans les propriétés de ListView, et j'ai pas
trouvé ....(propriété Left de Column en elcture seule ... je dois
pas chercher la bonne propriété ...)




Oui, dans DrawIcon, change le paramètre xLeft (ici 3, mais pas trop
pour ne pas tronquer l'icône sur le côté droit.

return2& = DrawIcon(Me.Picture1.hdc, 3, 0, return1)



oui, effectivement, ça fonctionne !

mais le gain est peu sensible ... et l'icone est rognée immédiatement !

tant pis, ça ira comme ça

merci encore

bonne soirée/nuit


--

Attention ! Adresse mail invalide ...
Pour me contacter, cliquez sur le lien ci-dessous:
http://scraper.chez.tiscali.fr/contact.htm

scraper
Avatar
Patrice Henrio
Je ne sais pas si tu as réussi à te débarrasser du problème des images qui
s'empilent et je vais peut-être dire une connerie, mais tant pis : pour
supprimer réellement l'image, ne faut-il pas utiliser la méthode unload ?

"scraper" a écrit dans le message de news:
u%
Bonjour Jacques93, dans le message
news:
tu disais :

y a t il un moyen pour "décoller" un peu l'icone de la checkbox ?

j'ai regardé un peu dans les propriétés de ListView, et j'ai pas
trouvé ....(propriété Left de Column en elcture seule ... je dois
pas chercher la bonne propriété ...)




Oui, dans DrawIcon, change le paramètre xLeft (ici 3, mais pas trop
pour ne pas tronquer l'icône sur le côté droit.

return2& = DrawIcon(Me.Picture1.hdc, 3, 0, return1)



oui, effectivement, ça fonctionne !

mais le gain est peu sensible ... et l'icone est rognée immédiatement !

tant pis, ça ira comme ça

merci encore

bonne soirée/nuit


--

Attention ! Adresse mail invalide ...
Pour me contacter, cliquez sur le lien ci-dessous:
http://scraper.chez.tiscali.fr/contact.htm

scraper


Avatar
scraper
Bonjour Patrice Henrio, dans le message
news:
tu disais :


Je ne sais pas si tu as réussi à te débarrasser du problème des
images qui s'empilent



oui, Jacques93 m'a donné la soluce :
utiliser Set Me.Picture1.Picture1 = Nothing au lieu de Me.Picture1.Clear


merci quand même :-)


--

Attention ! Adresse mail invalide ...
Pour me contacter, cliquez sur le lien ci-dessous:
http://scraper.chez.tiscali.fr/contact.htm

scraper
1 2 3