Discussion :

[kgb1917]

Bonjour,

J’aimerai savoir si qqun a trouvé une solution pour faire un items.clear de la MultiColumnComboBox d’Olsimare ?

J’ai :
-Soit

Impossible de modifier la collection d'éléments lorsque la propriété DataSource est définie.

si je ne mets pas

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Me.MultiColumnComboBox.DataSource = Nothing

-Soit si je mets la datasource à nothing, j’ai cette erreur

La référence d'objet n'est pas définie à une instance d'un objet

dans la class MultiColumnComboBoxDropDownListColumn sur cette ligne :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

If Me.DataManager.List.Count = 0 Then

[tomlev]

Dans le cas où la DataSource est définie, c'est normal qu'il fasse une erreur. Par contre ça devrait pas planter quand DataSource = null...

Signale le bug à l'auteur

[kgb1917]

Bonsoir Tomlev,

merci pour ta réponse mais je ne peux pas mettre la datasource à null, je ne l'ai pas dans la liste.

[tomlev]

je ne l'ai pas dans la liste.

C'est à dire ? Dans l'intellisense tu veux dire ? L'intellisense n'affiche pas toujours tout, certaines propriétés peuvent avoir été cachées volontairement. Mais tu peux tout à fait faire ça, même si la propriété n'apparait pas dans l'intellisense...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

leComboBox.DataSource = Nothing

[kgb1917]

Oui, c'est bien l'intellisense et je sais qu'il n'y a pas forcément tout mais si je mets ...datasource = Null, j'ai le message d'erreur suivant (en gros) : Null n'est plus déclaré, remplacé pas System.DbNull

Si je mets .datasource = System.DbNull, j'ai l'erreur :

"DataBinding complexe accepte IList ou IListSource comme source de données."

[tomlev]

Ah oui, j'ai dit "null" parce que j'ai plus l'habitude de C#
C'est Nothing en VB.NET

[kgb1917]

Ok, personnellement, je code en vb. Donc on revient à ce que j'ai écrit dans le 1er post.
Je cherche plutot du côté de la class MultiColumnComboBoxDropDownListColumn pour contourner le pb.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

If Me.DataManager.List.Count = 0 Then Exit Sub

mettre autre chose que exit sub. Mais là...

[olsimare]

Bonjour.

Je vais me pencher sur ce probléme...

Je reposte dés que j'ai une correction à proposer !

Cdt.

[olsimare]

Bonjour.

Effectivement, il y a bien un soucis !

Dans la sub LoadDropDownDataTable, il faut tester que le datamanager est bien existant.

Donc tu peux modifier comme cela :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
 
Private Sub LoadDropDownDataTable()
        ' Le chargement en datatable est un prérequis pour pouvoir 
        ' calculer la taille des différentes colonnes de la liste à l'affichage
 
        DropDownDataTable = New DataTable
 
        If IsNothing(Me.DataManager) Then Exit Sub

Et normalement ça doit le faire.

Désolé pour le bug, mais je n'utilise plus ce control, j'espére pouvoir mettre à dispo bientôt quelque chose de bien plus joli.

Cdt.

[kgb1917]

Bonsoir,

effectivement, ça marche. J'avais fait

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

If Me.DataSource is Nothing then Exit Sub

ce qui revient au même mais j'attendais encore un peu pour poster si jamais tu avais mieux.

je n'utilise plus ce control

Est-ce qu'il y a mieux ? Est-ce que tu as développé la partie IV-C ?

Encore merci pour ton aide.

[olsimare]

Bonjour.

Oui, j'ai bien un combo multi-colonnes plus sympa sous le coude, mais j'ai pas finalisé l'article sur le sujet, donc je ne l'ai pas encore partagé.

Désolé.

Cdt.

[kgb1917]

Bonsoir,

Ok, donc le post est résolu.