Discussion :

[Masamunai]

Bonjour

Je suis confronté actuellement à ce que je pense etre un probleme d'instanciation lorsque j'affecte une même liste (de type BindingSource) aux propriétés Datasource de 4 comboboxs.

La liste en question est la 1ère colonne (clé primaire) d'une DataTable importée d'Access, triée grâce à un BindingSource. Elle liste les différents "Jobs" existants sous la forme:

Code :

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

1
2
3
4
5
6
7
8
"Jobs" <--- en-tête de colonne
BLM
BLU
BRD
BST
COR
DNC
etc...

Ce qui donne dans Form1.Designer.vb (section MainWindow InitializeComponents), après avoir "lié" mes 4 comboxs via le designer (glisser-déposer depuis fenetre Source de données MaListe -> Comboboxs):

Code :

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

1
2
3
4
5
6
7
8
Combobox1.DataSource = Me.MaListeBindingSource
Combobox1.DisplayMember = "Jobs"
Combobox2.DataSource = Me.MaListeBindingSource
Combobox2.DisplayMember = "Jobs"
Combobox3.DataSource = Me.MaListeBindingSource
Combobox3.DisplayMember = "Jobs"
Combobox4.DataSource = Me.MaListeBindingSource
Combobox4.DisplayMember = "Jobs"

Résultat: quand je sélectionne une donnée dans une de ces 4 comboboxs, les 3 autres se mettent automatiquement à la même valeur... Je ne veux pas de ce comportement, d'autant plus que je compte rendre ces combobox mutuellement exclusives afin d'éviter que l'utilisateur ne sélectionne 2 fois le même job.

Solution: J'ai donc essayé, pour la 1ère combobox par exemple:

Code :

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

1
2
Combobox1.DataSource = New BindingSource Me.MaListeBindingSource
Combobox1.DisplayMember = "Jobs"

ou

Code :

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

1
2
Combobox1.DataSource = New Object Me.MaListeBindingSource
Combobox1.DisplayMember = "Jobs"

ou autres syntaxes dont je ne m'en souviens plus mais aucune ne fonctionne...

Quelqu'un aurait-il une idée comment écrire cela correctement, merci d'avance.

[chrismonoye]

Bonjour,
il y a la solution, entre autres, de créer autant de BindingSource que de ComboBox.

[Masamunai]

Merci chrismonoye pour cette idée, je pensait a quelquechose de plus "pro" mais bon cela marche.

Voilà ce que j'avais à l'origine dans Form1.Designer.vb :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
        Me.JobsListBindingSource = New System.Windows.Forms.BindingSource(Me.components)
        CType(Me.JobsListBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.JobsListBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
        Me.JobsListBindingSource.DataSource = Me.DataSet
        Me.JobsListBindingSource.DataMember = "Jobs List"
        Me.JobsListBindingSource.Sort = "Jobs ASC"
        Me.Combobox1.DataSource = Me.JobsListBindingSource
        Me.Combobox1.DisplayMember = "Jobs"
        Me.Combobox2.DataSource = Me.JobsListBindingSource
        Me.Combobox2.DisplayMember = "Jobs"
        Me.Combobox3.DataSource = Me.JobsListBindingSource
        Me.Combobox3.DisplayMember = "Jobs"
        Me.Combobox4.DataSource = Me.JobsListBindingSource
        Me.Combobox4.DisplayMember = "Jobs"

...et c'est devenu :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
        Me.JobsListBindingSource1 = New System.Windows.Forms.BindingSource(Me.components)
        CType(Me.JobsListBindingSource1, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.JobsListBindingSource1, System.ComponentModel.ISupportInitialize).EndInit()
        Me.JobsListBindingSource2 = New System.Windows.Forms.BindingSource(Me.components)
        CType(Me.JobsListBindingSource2, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.JobsListBindingSource2, System.ComponentModel.ISupportInitialize).EndInit()
        Me.JobsListBindingSource3 = New System.Windows.Forms.BindingSource(Me.components)
        CType(Me.JobsListBindingSource3, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.JobsListBindingSource3, System.ComponentModel.ISupportInitialize).EndInit()
        Me.JobsListBindingSource4 = New System.Windows.Forms.BindingSource(Me.components)
        CType(Me.JobsListBindingSource4, System.ComponentModel.ISupportInitialize).BeginInit()
        CType(Me.JobsListBindingSource4, System.ComponentModel.ISupportInitialize).EndInit()        Me.JobsListBindingSource.DataSource = Me.DataSet
        Me.JobsListBindingSource1.DataMember = "Jobs List"
        Me.JobsListBindingSource1.Sort = "Jobs ASC"
        Me.JobsListBindingSource2.DataMember = "Jobs List"
        Me.JobsListBindingSource2.Sort = "Jobs ASC"
        Me.JobsListBindingSource3.DataMember = "Jobs List"
        Me.JobsListBindingSource3.Sort = "Jobs ASC"
        Me.JobsListBindingSource4.DataMember = "Jobs List"
        Me.JobsListBindingSource4.Sort = "Jobs ASC"
        Me.Combobox1.DataSource = Me.JobsListBindingSource1
        Me.Combobox1.DisplayMember = "Jobs"
        Me.Combobox2.DataSource = Me.JobsListBindingSource2
        Me.Combobox2.DisplayMember = "Jobs"
        Me.Combobox3.DataSource = Me.JobsListBindingSource3
        Me.Combobox3.DisplayMember = "Jobs"
        Me.Combobox4.DataSource = Me.JobsListBindingSource4
        Me.Combobox4.DisplayMember = "Jobs"

[tomlev]

cf. cette question :
http://www.developpez.net/forums/d99...-donnees-pbme/

[Masamunai]

Indeed, c'est joli, exactement ce dont j'avais besoin, "magique" dixit dans l'autre thread

Cependant, je me demande comment je pourrai rendre mes comboboxs mutuellement exclusives, puisque ces nouvelles instances du bindingsource initial ne sont pas nommées ?

Code :

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

1
2
        Me.MainJob1.DataSource = New BindingSource(Me.JobsListBindingSource, "")
        Me.MainJob1.DisplayMember = "Jobs"

...avec Me.MainJob1.Items.??? peutêtre ?

[chrismonoye]

Bonjour
Si j'ai bien compris, un item choisi dans un Combo, doit disparaitre des autres.
On ne doit pas pouvoir modifier la liste depuis les combo, car ils sont liés à une source de données.
Donc travailler sur les BindingSources, mais même déclarées, elles sont liées au même Dataset, et modifier l'une modifiera les autres, je pense.
Une solution consisterait à les isoler les unes des autres, (après avoir renseigné la première) genre :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
        Me.JobsListBindingSource2 = New BindingSource
        Me.JobsListBindingSource3 = New BindingSource
        Me.JobsListBindingSource4 = New BindingSource
 
        For Each membre As DataRowView In JobsListBindingSource1
            JobsListBindingSource2.Add(membre.Item(0))
            JobsListBindingSource3.Add(membre.Item(0))
            JobsListBindingSource4.Add(membre.Item(0))
        Next
 
        ComboBox2.DataSource = JobsListBindingSource2
        ComboBox3.DataSource = JobsListBindingSource3
        ComboBox4.DataSource = JobsListBindingSource4

Et le genre d'action suivante, ne devrait pas affecter les combo non concernés :

Code :

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

1
2
3
        JobsListBindingSource4.RemoveAt(2)
        JobsListBindingSource3.RemoveAt(1)
        JobsListBindingSource1.RemoveAt(0)