Fórum Bass – DBGrid – Selecionar musica #230648

07/05/2004

0

:?: Olá a todos. Estou fazendo um programa para tocar MP3 usando Bass.
Todos os exemplos que tenho selecionam as músicas
usando OpenDialog (dessa forma tudo bem conseguimos).
Em minha aplicação quero selecionar a música a partir do DBGrid, onde
tenho o path e o nome da música juntos num só campo.

Exemplo:
1- BASS_MusicPlay(Table1.FieldValues[‘NomeCampo’]);
- - - - - - - - -
2- Channel := BASS_StreamCreateFile(FALSE, Table1.FieldValues[‘NomeCampo’], 0, 0, 0);
BASS_StreamPlay(Channel, False, 0);
Muito obrigado pela ajuda
Abraços
Neto


Neto

Neto

Responder

Posts

07/05/2004

Neto

No site da Bass (http://www.un4seen.com/) não achei nada.


Responder

Gostei + 0

07/05/2004

Lucas Silva

Acho que este site será bem util pra vc..
http://pbb-player.sourceforge.net/pbbforum/index.php


Responder

Gostei + 0

07/05/2004

Cebikyn

Channel := BASS_StreamCreateFile(FALSE, [b:2833d132a5]PCHAR([/b:2833d132a5]String com o nome e endereço do arquivo[b:2833d132a5])[/b:2833d132a5], 0, 0, 0);

BASS_StreamPlay(Channel, False, 0);

E antes dos códigos a cima (no OnCreate do form principal), vc deve inicializar a BASS com a função BASS_Init.


Responder

Gostei + 0

10/05/2004

Neto

var
M_Arquivo : string;
M_Caminho : DWord;
M_Channel : Integer;
begin
M_Arquivo := Musicas.FieldValues[´Som_NomeMusica´];
M_Arquivo := musicas.fieldvalues[´som_enderecoPathnome´];

Channel := Bass_StreamCreateFile(FALSE , pchar(M_arquivo) , 0 , 0 , 0);
Bass_StreamPlay(Channel , False , 0);
Edit2.Text := IntToStr(Channel);

Channel retorna 0, portanto não funciona.
Como posso fazer.
Neto


Responder

Gostei + 0

10/05/2004

Cebikyn

Coloque uma chamada à função BASS_ErrorGetCode logo antes depois de chamar BASS_StreamCreateFile e me diga qual código (inteiro) ela retorna, para que eu possa ajudar. Podem ser diversos motivos (BASS não inicializada corretamente, problema com o arquivo, problema do dispositivo, etc..)


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar