Musik in Delphi hinterlegen

[KeksRebellion]

Hallo,

Ich versuche für mein Spiel einen einzigen MP3 Musiktitel zu hinterlegen, komme aber auch mit den schon vorhandenen Threads hier nicht weit.

Ich habe folgenden code

Code:

procedure TForm2.FormCreate(Sender: TObject);
begin

  sndPlaySound(PChar(ExtractFilePath(ParamStr(0)) + '/Leveldesign/Bunnymajs - Reload.mp3'), SND_ASYNC or SND_LOOP);
end;

Jedoch kommt beim Starten des Programms ein typischer Windows Fehlerton und das programm läuft einfach ohne musik ab.
Was kann ich hier machen?

Danke im Vorraus

[Popov]

Also ich weiß nicht ob sndPlaySound MP3 abspielt - kann sein, hab es noch nicht getestet, dachte immer die spielt nur WAV ab. Gehen wir aber mal davon aus, dass das nicht das Problem ist.

ExtractFilePath in ExtractFilePath(ParamStr(0)) liefert den Pfad mit einem Backslash. Immer. Somit sollte dem kein Backslash folgen.

Ein Schrägstrich, bzw. Slash wie in Leveldesign/Bunnymajs - Reload.mp3 ist kein Backslash. Der sieht so aus: "\".

Leerzeichen könne Windows verwirren, wie in \Bunnymajs - Reload.mp3 . Die Regel besagt, dass man in solchen Fällen den Pfad in Anführungszeichen "" setzten sollte.

Teste das mal und sag ob es immer noch Probleme gibt. Ansonsten den Code so ändern:

Delphi-Quellcode:

var
  Path: String;
begin
  Path := '"' + ExtractFilePath(ParamStr(0)) + 'Leveldesign\Bunnymajs - Reload.mp3"';

  if not FileExists(Path) then
    raise Exception.Create('Unbekannter Pfad: ' + Path);

  sndPlaySound(PChar(Path), SND_ASYNC or SND_LOOP);
end;

Ist der Pfad nicht da, gibt es eine Fehlermeldung.

[glotzer]

sndPlaySound spielt leider nur .wav ab. Wenn du mp3 oder ähnliches apsielen willst brauchst du etwas wie OpenAL oder die bass.dll (zweiteres sollte wesentlich einfacher für dich sein) (Eigenwerbung: hab da hier eine (hoffentlich) einfache Klassenkapselung von erstellt. Für dich am einfachsten zu verwenden sollte V0.6 sein, die ist zwar sehr eingeschränkt aber ansonsten wirds schnell aufwendiger)

[DeddyH]

Der TMediaPlayer sollte es auch tun, man muss ja nicht mit Kanonen auf Spatzen schießen: MP3 abspielen