MIDI-Hintergrundmusik in Delphi-Anwendungen abspielen lassen

[SgtSilver]

Hey Leutz!
Ich hab ein kleines Spiel in Delphi geschrieben.
Und nun will ich eine Musik im Hintergrund abspielen lassen (Midi-Datei).
Wie kann ich das machen?

[mkinzler]

In einem Thread oder mit speziellen Komponenten z.B. Bass

[SgtSilver]

also keine ahnung, was du gemeint hast....es soll unabhängig laufen..also musik soll laufen von alleine...keine steuerung und so...

[BenjaminH]

Hallo,
TMediaPlayer kann das. Einfach ausblenden, dann ist auch die Steuerung weg

[mkinzler]

http://www.un4seen.com/bass.html

[SgtSilver]

ich habs mit media player gemacht..aber irgendwie kommt kein sound raus

Delphi-Quellcode:

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs,MPlayer, StdCtrls;

type
  TForm1 = class(TForm)
    MediaPlayer1: TMediaPlayer;
    procedure FormActivate(Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}








procedure TForm1.FormActivate(Sender: TObject);
begin
With MediaPlayer1 do begin
     Filename := 'D:\Musik\Midi\mario.mid';
     DeviceType := dtAutoSelect;
     Open;
     Play;

end;
end;

end.

[Sunlight7]

Es kann auch keiner rauskommen

Delphi-Quellcode:

With MediaPlayer1 do begin
   Filename:='D:\Musik\Midi\mario.mid';
   Open;
   Play;
end;

Edit Und ich würd' das nicht unbedingt ins FormActicate schreiben.

[SgtSilver]

ok..nun höre ich es)

Edit: Und wie kann ich so was machen, dass die Musik abgespielt wird, wenn der andere Nutzer diese nicht hat?
Kann ich die Musik irgendwie in die exe einbauen?

[mkinzler]

Zitat:

Kann ich die Musik irgendwie in die exe einbauen?

Du könntest sie in die Ressource der Anwendung einbinden oder halt als Datei Mitliefern. Aber keinesfalls mit festem Datenpfad!

[SgtSilver]

Zitat von mkinzler:

Zitat:

Kann ich die Musik irgendwie in die exe einbauen?

Du könntest sie in die Ressource der Anwendung einbinden oder halt als Datei Mitliefern. Aber keinesfalls mit festem Datenpfad!

und wie kann ich sie als Ressource einbinden?