29/03/2010

Tocar musica com RealBasic.

Esta quase nem tem graça. é muito fácil!

Dim s as Sound // instância do objeto

s = GetOpenFolderItem("").OpenAsSound //Abre o arquivo de som

if s = Nil Then Return //Encerra se não houver arquivo

s.Play // Toca a musica

Moleza não é ? Bom, mesmo assim vou falar algo a respeito.
A classe Sound apesar de reduzida tem algumas propriedades interessantes, como por exemplo o Pan, onde você pode regular o balanço do stério, o Volume que varia de 0 a 100, o PlayLooping que permite repetir continuamente um som, e sem esquecer do Stop que para o som imediatamente

Com o Stop, eu consegui fazer um telegrafo usando um único beep continuo, apenas variando o tempo de duração que eu queria para cada beep.

Com a propriedade IsPlaying, é possível saber se o som ainda esta tocando, assim um playlist ficará bem simples de ser feita (Quando terminar uma, coloque a próxima da lista).

E isso é tudo p p soal :)

Nenhum comentário:

Postar um comentário

Escreva à-vontade. mas dê prioridade ao idioma Português, e lembre-se, aqui não é o MSN, ICQ, etc. mais de uma pessoa vai ler, então tente escrever a palavra toda.
E a propósito.
Os comentários estão sem moderação. Caso sua TESTOSTERONA ou TPM esteja em níveis elevados, lembre-se que crianças visitam esse blog. ;)