Hei, du kan f.eks bruke en TMediaPlayer.
Putt dette inn i en knapps OnClick.
with MediaPlayer1 do
begin
FileName := Edit1.Text;
Open;
Play;
end;
Bruk dette for å stoppe og lukke filen:
with MediaPlayer1 do
begin
Stop;
Close;
end;
-------------------------------------
I am AGAINST TCPA!!
[
http://www.againsttcpa.com/ ]
-------------------------------------
Mvh
DiZpel