Discussion :

[shayw]

Bonjour

J'ai une liste de fichier wav dans my resources
Aussi j'ai une liste d'image et quand je clique sur une image un wav se joue

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
 Private listcards As New List(Of PictureBox)
      Private listmusics As New List(Of System.IO.UnmanagedMemoryStream)
 Private Sub init()
        For Each ResourceFile As DictionaryEntry In My.Resources.ResourceManager.GetResourceSet(Globalization.CultureInfo.CurrentCulture, True, True).OfType(Of Object)()
            If TypeOf (ResourceFile.Key) Is String Then
                If ResourceFile.Key.ToString.StartsWith("mus") Then
                    listmusics.Add(CType(ResourceFile.Value, System.IO.UnmanagedMemoryStream))
 
                End If
            End If
        Next
end sub
Private Sub cardmouseclick(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs)
 
        Dim x As Integer
 
        x = Convert.ToInt32(DirectCast(sender, PictureBox).Tag.ToString.Substring(4))
        Try
            My.Computer.Audio.Play(listmusics(x), AudioPlayMode.Background)
        Catch ex As Exception
            MessageBox.Show(ex.Message)
        End Try
    End Sub

le problème quand je clique sur la meme image j'ai une erreur wav endommagé
Merci

[ranzoken]

tu n'a pas fermé t'es ressource, essaie d'ouvrir une boite qui l'es déjà

pense à utilisé le mot clé using

[Magnusmen]

Utilise .close sa pourrait peut être arranger.

[shayw]

il faut ajouter avant la ligne

Code :

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

My.Computer.Audio.Play(listmusics(x), AudioPlayMode.Background)

la ligne

Code :

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

listmusics(x).Position = 0