Olá galera, nesta Quick Tips, irei mostrar fazer um Player com o Delphi usando o componente nativo do mesmo, MediaPlayer.
Vamos ao exemplo
Adicione 1 Button, 1 OpenDialog, 1 MediaPlayer, 1 StatusBar
Selecione a StatusBar, no object Inspector localize a propriedade Panels, e adicione dois itens
Selecione o Form e no evento onCreate, programe o seguinte: (Iremos filtrar os arquivos listados pelo OpenDialog, onde o mesmo só exibirá arquivos com extensão mp3 ou wma
Selecione o Button, e no evento onClick, programe o seguinte:
Fico por aqui até a próxima,
Att,
Wesley Yamazack
wyamazack@rwsolution.com.br
