Mid em meu aplicativo?

Delphi

15/02/2003

Gostaria de saber como posso executar um arquivo mid ou midi em meu aplicativo. Por favor me ajudem.


Anonymous

Anonymous

Curtidas 0

Respostas

Anonymous

Anonymous

15/02/2003

Acrescente MMSystem na Uses do começo na Unit

Utilize a API SndPlaySound();
Para interromper o som sem ele acabar de tocar utilize a API PlaySound(nil,0,0);

Ex: SndPlaySound(´c:\teste.mp3´, snd_ASync);

PS: snd_Loop serve para repetir continuamente o som.


GOSTEI 0
POSTAR