Ejecutar Sonido en Tiempo de Ejecución

[subzero]

Buenas tardes....


Existe alguna manera en la cual pueda ejecutar un sonido en tiempo de ejecución indicandole la ruta y el nombre del archivo (*.mp3) en un Edit utilizando el componente TMediaPlayer, estoy trabajando con la versión 7 de delphi. Ya he revisado en los foros anteriores pero no he encontrado algo que se asemeje.


Gracias...

[[Delphius]]

Hola subzero,

¿Buscaste bien?

No tengo delphi a mano pero si no me equivoco la cosa viene así:

Código Delphi [-]
MediaPlayer1.FileName := 'C:\..\tumusica.mp3';
MediaPlayer1.Open; // es necesario hacer Open antes de cualquier operación!
MediaPlayer1.Play;

Saludos,

[subzero]

Hola...


Hice lo que me dijiste pero me aparece el siguiente mensaje..


'No se puede determinar el tipo de dispositivo por la extension del archivo'

Estoy tratando de reproducir un archivo con extensión mp3

[[cHackAll]]

Código Delphi [-]
uses MMSystem;
 
procedure TForm1.Button1Click(Sender: TObject);
begin
 mciExecute(PChar('play '+Edit1.Text));
end;

PD: yo tampoco dengo el Delphi a la mano... pero si al Club

[[Delphius]]

Hola subzero,
Podría decir, casi con toda certeza, que se trata de un problema con los codecs.

Revisa que lo tengas instalados.

Saludos,