Listbox et taille d'Items

Version imprimable

06/02/2012, 11h47
Romain0

Listbox et taille d'Items

Bonjour,

J'ai un gros problème que je n'arrive pas à résoudre. Je remplis une listbox à l'aide d'une datatable et d'un sqldataadapter. J'ai donc un displaymember et un valuemember.

Mais je n'arrive absolument pas à changer la taille d'un item, en effet, je ne veux pas qu'ils soient tous "collés" les uns en dessous des autres. En effet je voudrait changer leur propriété item height, mais impossible. Quand je met en mode itemsOwnerDraw, les items ne s'affichent pas du tout.

Si quelqu'un a une solution...

Cordialement
06/02/2012, 11h53
tomlev

Si tu mets en mode OwnerDrawVariable, il faut dessiner toi-même les éléments, sinon ça n'affiche rien en effet... Il faut gérer les évènements DrawItem (pour dessiner un élément) et MeasureItem (pour déterminer la taille d'un élément).
06/02/2012, 11h58
Romain0

Citation:

Envoyé par tomlev

Il faut gérer les évènements DrawItem (pour dessiner un élément) et MeasureItem (pour déterminer la taille d'un élément).

D'accord merci, mais je ne vois justement pas comment utiliser DrawItem et Measure Item avec un remplissage des données via Ma DataTable.....

Code:

1
2
3
4
5
6
7
8
9
10
11
Sub listBox1_MeasureItem(ByVal sender As Object, ByVal e As MeasureItemEventArgs) Handles listBox1.MeasureItem
    Dim row = DirectCast(listBox1.Items(e.Index), DataRowView)
    e.ItemWidth = ... ' valeur calculée à partir de row
    e.ItemHeight = ... ' valeur calculée à partir de row
End Sub
 
Sub listBox1_DrawItem(ByVal sender As Object, ByVal e As DrawItemEventArgs ) Handles listBox1.DrawItem
    Dim row = DirectCast(listBox1.Items(e.Index), DataRowView)
    ' Utiliser e.Graphics pour dessiner l'élément
    ...
End Sub

Pour le dessin, je sais pas ce que tu veux faire exactement... Si tu veux juste dessiner le texte, utilise e.Graphics.DrawString

06/02/2012, 12h23
Romain0

Encore merci pour cette réponse rapide.

Pour la première partie du code, je pense comprendre que l'on définit la taille de chaque item pour la listbox (on définit une ligne et toutes les autres auront la même taille ?).

Pour ce qui est de la deuxième partie, je ne comprends absolument pas à quoi cela sert :? ni a quoi va me servir e.graphics (pas réussi à l'utiliser).

Car dans cette listbox je souhaite afficher une liste de noms en displaymember et leur id associé en Valuemember. J'y arrive très bien avec une listbox "normale'", mais là, je souhaite que la taille de chaque ligne en hauteur soit plus grande que celle d'origine...

Merci d'avance
06/02/2012, 13h44
tomlev

Citation:

Envoyé par Romain0

Pour la première partie du code, je pense comprendre que l'on définit la taille de chaque item pour la listbox (on définit une ligne et toutes les autres auront la même taille ?).

Non, cet évènement est déclenché pour chaque élément de la ListBox. Tu peux savoir de quel élément il s'agit grace à la propriété e.Index

Citation:

Envoyé par Romain0

Pour ce qui est de la deuxième partie, je ne comprends absolument pas à quoi cela sert :? ni a quoi va me servir e.graphics (pas réussi à l'utiliser).

Idem, l'évènement DrawItem est appelé pour chaque élément. e.Graphics renvoit un objet qui sert à dessiner (des lignes, des ellipses, des rectangles, du texte, etc). Il faut utiliser ça pour dessiner chaque élément de la liste.

En fait, si tu veux que tous les items aient la même taille, tu peux mettre DrawMode = OwnerDrawFixed et changer le ItemHeight. Dans ce cas tu n'as pas besoin de gérer l'évènement MeasureItem, mais tu dois quand même faire le dessin manuellement dans DrawItem...
06/02/2012, 13h59
Romain0

D'accord merci pour tes explications qui m'aident beaucoup.

Cependant, même après lecture du cours de Mr Laserre et du MSDN, je ne comprends toujours pas. J'ai bien assimilé le fait que c'est à moi de "dessiner" la listbox (en y ajoutant la scrollbar par exemple), et en définissant les propriétés, mais pour ce qui est de l'ajout de texte via ma DataTable, je ne trouve aucune information.....

Cordialement
06/02/2012, 14h20
tomlev

Citation:

Envoyé par Romain0

J'ai bien assimilé le fait que c'est à moi de "dessiner" la listbox (en y ajoutant la scrollbar par exemple)

Non, tu ne dois pas dessiner la ListBox, tu dois seulement dessiner chaque élément de la liste

Citation:

Envoyé par Romain0

mais pour ce qui est de l'ajout de texte via ma DataTable, je ne trouve aucune information.....

Bah je te l'ai dit, il faut dessiner le texte avec e.Graphics.DrawString

Exemple pour afficher le texte des colonnes Id et Name :

Code:

1
2
3
4
5
6
7
8
9
10
11
Private Sub listBox1_DrawItem(sender As Object, e As DrawItemEventArgs)
	Dim row As DataRowView = DirectCast(listBox1.Items(e.Index), DataRowView)
	e.DrawBackground()
	Using b = New SolidBrush(e.ForeColor)
		Dim text As String = String.Format("{0} - {1}", row("Id"), row("Name"))
		Dim sf As New StringFormat() With { _
			Key .LineAlignment = StringAlignment.Center _
		}
		e.Graphics.DrawString(text, e.Font, b, e.Bounds, sf)
	End Using
End Sub

06/02/2012, 14h40
Romain0

Un énorme merci à toi ! J'étais bloqué sur ce problème avec ma DataTable depuis plusieurs semaines !

:ccool::ccool::ccool: