Tocando som WAV no delphi

Escreve na Uses o MMSystem. E no corpo do programa o comando:

SndPlaySound(‘C:\Windows\Media\Som.wav’,SND_ASYNC);

————— outras formas …….

{ Síncrona: aguarda terminar a reprodução para continuar: }
SndPlaySound(‘C:\Win95\Media\Office97\Lembrete.wav’, SND_SYNC);

{ Assíncrona: a execução continua normalmente enquanto ocorre a reprodução: }
SndPlaySound(‘C:\Win95\Media\Office97\Lembrete.wav’, SND_ASYNC);

{ Contínua: a reprodução é repetida num efeito de loop. Este tipo de reprodução precisa ser assíncrona: }
SndPlaySound(‘C:\Win95\Media\Office97\Lembrete.wav’, SND_ASYNC or SND_LOOP);

{ Interrompe uma reprodução contínua: }
SndPlaySound(nil, 0);

Esse post foi publicado em Sem categoria definida e marcado . Guardar link permanente.

Deixe uma resposta

Preencha os seus dados abaixo ou clique em um ícone para log in:

Logotipo do WordPress.com

Você está comentando utilizando sua conta WordPress.com. Sair / Alterar )

Imagem do Twitter

Você está comentando utilizando sua conta Twitter. Sair / Alterar )

Foto do Facebook

Você está comentando utilizando sua conta Facebook. Sair / Alterar )

Foto do Google+

Você está comentando utilizando sua conta Google+. Sair / Alterar )

Conectando a %s