activar sonido

emiliu · #1 27-11-2005

hola de nuevo amigos, me gustaría que con un timer cada x segundos suene un sonido, cual es la instrucción para que suene un sonido que tengo guardado en una carpeta

, gracias de antemano y saludos

dec · #2 27-11-2005

Hola,

Investiga en el SDK (Software Development Kit) para Win32 (incluido en el menú de ayuda de Delphi) sobre esto, pero, aquí tienes una función que reproducirá el sonido que le pidas:

Código Delphi [-] uses
   MMSystem;
 
 procedure TForm1.Button1Click(Sender: TObject);
 begin
   MMSystem.PlaySound('C:\Windows\Media\ringin.wav', 0, SND_FILENAME or SND_ASYNC);
 end;

Observa el tercer parámetro de la función "PlaySound"... te permitirá "repetir" el sonido, entre otras muchas cosas (te remito de nuevo a su ayuda), de este modo, por ejemplo:

Código Delphi [-] uses
   MMSystem;
 
 procedure TForm1.Button1Click(Sender: TObject);
 begin
   MMSystem.PlaySound('C:\Windows\Media\ringin.wav', 0, SND_FILENAME or SND_ASYNC or SND_LOOP);
 end;

emiliu · #3 27-11-2005

gracias amigo!! ahora veré que puedo hacer, gracias de veras