Récupérer item.Tag dans un DataTemplate

Version imprimable

Bonjour,

Je voudrais récupérer la valeur des item.Tag d'un ListBox en cliquan sur l'item:

XAML:

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
 
<Window.Resources>
        <DataTemplate x:Key="listBoxItem">
            <StackPanel Margin="3">
                <StackPanel>
                    <ListBoxItem Tag="{Binding Path=Tag}">
                        <StackPanel Width="Auto">
                            <Image Height="16" Source="images/movies_24x24.png" />
                            <TextBlock Text="{Binding Path=Content}" Width="Auto" />     
                        </StackPanel>               
                    </ListBoxItem>
                </StackPanel>
            </StackPanel>
        </DataTemplate>
    </Window.Resources>
 
<Grid>
<ListBox Name="ListBox1" ItemTemplate="{StaticResource listBoxItem}" Width="214" HorizontalAlignment="Left" Margin="14,116,0,44" BorderThickness="1,1,1,1" />
    </Grid>

J'ajoute les item (Binding):

VB

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
 
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.Windows.RoutedEventArgs) Handles Button1.Click
        'cree les objets
        Dim obj As New cls_film_search
        Dim mov As cls_movie_tags
        Dim i As Integer = 0
        'pour chaque resultat
        Dim itemlist As New List(New ListItem)
 
        Dim lst As New List(Of items)
        For Each mov In obj.get_propositions(Me.TextBox1.Text)          
            i = i + 1
 
            lst.Add(New items(mov.title.Replace("&nbsp;", " "), mov.num))
            'Me.BackgroundWorker1.ReportProgress(i, elt)
        Next
 
        Me.ListBox1.ItemsSource = lst
 
    End Sub

Je veux récupérer le Tag de l'item sélectionner:

VB

Code:

1
2
3
4
5
6
7
8
9
10
 
Private Sub ListBox1_MouseDoubleClick(ByVal sender As Object, ByVal e As System.Windows.Input.MouseButtonEventArgs) Handles ListBox1.MouseDoubleClick
 
        Dim lst As New ListBoxItem
 
        lst = Me.ListBox1.ItemContainerGenerator.ContainerFromIndex(Me.ListBox1.SelectedIndex)
 
        MsgBox(lst.Tag.ToString()) 
 
    End Sub

Ici list.Tag.ToString() est null :cry: Pourquoi?

Merci, Olivier.

05/11/2008, 09h55
blaster681
Code:

1 2 3 4 5 Dim lst As New ListBoxItem lst = Me.ListBox1.ItemContainerGenerator.ContainerFromIndex(Me.ListBox1.SelectedIndex) MsgBox(lst.Content.ToString())
Dans lst je récupère bien tout le contenu de l'item, mais ensuite si je veux faire un lst.Tag ou un lst.Content pour récupérer les valeurs, soit je recois rien (pour item.Tag) ou je recois WpfApplication1.Window1+items (pour item.Content) ?

Merci
05/11/2008, 09h59
Thomas Lebrun

Dans ce cas, si tu ne recupères rien dans Tag, c'est que ton binding ne semble pas marcher....
05/11/2008, 10h05
blaster681

Le Binding fonctionne, les éléments s'ajoutent a la ListBox et si je fais un Breakpoint sur la MsgBox(), je vois bien que dans lst Content a bien la valeur que j'ai mise en Content et en Tag....
05/11/2008, 10h11
binoo

Salut,

Dans ton code, tu fais ceci :

Code:

lst.Add(New items(mov.title.Replace(" ", " "), mov.num))

le items en question est un objet à toi ? avec une propriété Tag et Content de défini ?
En gros ce que tu fais c'est bien quelque chose comme ça :

Code:

lst.Add(New items(Content, Tag))
05/11/2008, 10h15
blaster681
Oui c'est exactement ce que je fais.

Je récupère le Content (mov.Title) et le Tag (Mov.num) d'une class externe.
Que je met ensuite dans la la liste:
Code:

1 2 Dim lst As New List(Of items)
05/11/2008, 10h19
binoo

Et si tu cast ton ListBoxItem comme ça :

Code:

MsgBox( ((items)lst).Content.ToString() )

[Edit] ce cast marche en c#, est-ce qu'en vb on fait de la même façon, je ne sais pas :?
05/11/2008, 10h54
blaster681

1 pièce(s) jointe(s)

J'ai esseiller sa revien au meme...

J'ai mis le Projet complet en fichier attaché si sa peut aider... je suis a court d'idée, je vois pas ou est mon erreur :?

Bonjour,

C'est bon j'ai enfin trouvé mon erreur! :yaisse2:
Voici le code à modifier:

Code:

1
2
3
4
5
6
7
8
 
 Private Sub ListBox1_MouseDoubleClick1(ByVal sender As Object, ByVal e As System.Windows.Input.MouseButtonEventArgs) Handles ListBox1.MouseDoubleClick
        Dim lst As New List(Of items)
 
        lst.Add(Me.ListBox1.SelectedItem)
 
        MsgBox(lst.Item(0).Tag.ToString())
    End Sub

@++