Sonido en programas

[salvanano]

Hola, mi duda es como hacer que cada vez que se abra y cierre mi programa suene un sonido. Gracias

[Sotrono]

Para reproducir un archivo de sonido podes utilizar un TMediaPlayer, de la paleta System (D5).
En la propiedad FileName va el nombre del archivo a reproducir y para reproducirlo utiliza los metodos Open y Play.
Si queres que se escuche cuando se inicia y cuando termina la aplicacion, reproduci el sonido en los eventos OnCreate y OnCloseQuery del Form principal. Pero fijate que la aplicacion va a tener que esperar a que termine de reproducirse el sonido para cerrarse.

Saludos...

[S.M.S.]

Para activar la reproducción de un sonido de manera repetitiva sin esperar la aplicación a que termine el sonido:

Código Delphi [-]
SndPlaySound('c:\sonido.wav', SND_LOOP Or SND_ASYNC);

Para pararlo:

Código Delphi [-]
SndPlaySound(Nil, 0);

Si deseas que la aplicación espere hasta que termine el sondio, sustituye el segundo parámetro por SND_SYNC.

Saludos.