MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access


2 participantes

    [Resolvido]Windows Media Player

    allysson1511
    allysson1511
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 36
    Registrado : 27/04/2018

    [Resolvido]Windows Media Player Empty [Resolvido]Windows Media Player

    Mensagem  allysson1511 28/8/2018, 21:21

    Olá Boa tarde,
    eu tenho uma listbox no formulário do access que me lista todas as músicas de uma pasta e quando eu clicar no nome da listbox ele toca a música
    a minha dúvida é que eu queria que ao finalizar a música ele já passasse para a outra música listada na listbox.
    alguém poderia me ajudar com essa dúvida?
    obrigado
    scandinavo
    scandinavo
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1059
    Registrado : 11/11/2009

    [Resolvido]Windows Media Player Empty Re: [Resolvido]Windows Media Player

    Mensagem  scandinavo 3/9/2018, 19:21

    Atenção

    Encontrei nos meus arquivo em bloco de notas esta instrução (Não sei se funciona)  

    O programa vai passar para a próxima musica da lista quando a que estiver em execução acabar.Vamos chamar o método EndOfStream do MediaPlayer1, ele é sempre executado quando um arquivo chega ao fim.

    Private Sub MediaPlayer1_EndOfStream(ByVal Result As Long)
       If File1.ListCount > File1.ListIndex + 1 Then
           File1.ListIndex = File1.ListIndex + 1
       Else
           File1.ListIndex = 0
       End If
    End Sub

    Simplificando esse método, assim que acaba a musica ele chama o próximo arquivo da lista, se a lista tiver acabado ele vai para o primeiro, repetindo a lista continuamente.

    Agora que você já tem a base de um player, pode fazer as melhorias que quiser.
    allysson1511
    allysson1511
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 36
    Registrado : 27/04/2018

    [Resolvido]Windows Media Player Empty obrigado

    Mensagem  allysson1511 3/9/2018, 20:22

    oi valeu pelo código.
    scandinavo
    scandinavo
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1059
    Registrado : 11/11/2009

    [Resolvido]Windows Media Player Empty Re: [Resolvido]Windows Media Player

    Mensagem  scandinavo 4/9/2018, 16:56

    ok
    allysson1511
    allysson1511
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 36
    Registrado : 27/04/2018

    [Resolvido]Windows Media Player Empty resposta

    Mensagem  allysson1511 4/9/2018, 18:46

    Eu acabei ultilizando o modelo que o JPaulo disponibilizou neste tópico e adaptei ele de acordo com minhas necessidades.
    https://www.maximoaccess.com/t31240-ajuda-com-botao-play-para-executar-arquivo-selecionado-na-listbox
    se alguém tiver com dúvidas também, clica no link que tem um ótimo exemplo.

    Conteúdo patrocinado


    [Resolvido]Windows Media Player Empty Re: [Resolvido]Windows Media Player

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 8/11/2024, 06:39