hey David,
auch von mir ein herzliches Willkommen in der
DP!
hans ditter hat zwar recht mit dem Verweis auf Delphi-Treff was Tuts betrifft aber der mp3 Player dort wird mit der bass.dll realisiert was für einfache Hintergrundmusik in meinen Augen etwas overkill ist
so, die infos zum TMediaPlayer hätte man sich zwar auch ergoogeln oder die Forensuche bemühen können aber da es nur ein paar Zeilen Code sind werd ich mal nicht so sein
also zuerts einen TMediaPlayer auf die Form und dann in das "OnCreate" Event der Form folgende Zeilen rein:
Delphi-Quellcode:
MediaPlayer1.Visible := False; //damit der Media Player nicht auf der Form gezeigt wird...
MediaPlayer1.FileName := 'Pfad deiner Musikdatei';
MediaPlayer1.Open; //Datei laden...
MediaPlayer1.Notify := true; // falls der Sound in einer Endlosschleife gespielt werden soll! (Erklärung weiter unten)
MediaPlayer1.Play; // Datei abspielen...
wenn du willst das deine Musik in einer Endlosschleife läuft kannst du das entweder über einen Timer lösen oder besser noch über das "OnNotify" Event des Media Players das immer aufgerufen wird wenn die Musik zu Ende ist...
also in die procedure des Events:
Delphi-Quellcode:
if MediaPlayer1.Notify then //Wenn Notify = true geladene Datei abspielen...
MediaPlayer1.Play
Und wenn du die Musik stoppen willst (z.B. über einen Button) einfach
Delphi-Quellcode:
MediaPlayer1.Notify := False;
MediaPlayer1.Stop;
in das "OnClick" Event einbauen...
lg paperboy