Und nochmal 2 Sounds Gleichzeitig abspielen...

[Niko]

Also, dass man über das normale Multimedia-API zwei Sounds auf einem Gerät (Ausgang) gleichzeitig abspielen kann, wäre mir neu (auch nicht aus zwei verschiedenen Anwndungen heraus). Während ein Stück wiedergegeben wird ist der Ausgang blockiert, bzw. dieses Stück wird abgebrochen, wenn ein anderes abgespielt werden soll.
Die einzigen Möglichkeit die ich kenne um das Problem zu lösen, sind:
DirectX verwenden (DirectX kann mehrere Stücke gleichzeitig wiedergeben) oder
aus beiden Stücken selbst die Mischung berechnen und diese dann wiedergeben (FMOD, SwiftSoft und wahrscheinlich auch Bass machen das so).
Grundsätzlich würde ich mich SirThornberrys Empfehlung für SwiftSoft anschließen, für deine Zwecke würde ich aber eher FMOD (kostenlos) empfehlen (Bass kenne ich nicht näher). Damit reichen drei, vier Zeilen Code, um zwei Stücke abzuspielen.

[Lefko]

danke für die tipps!

also das mit den 2 verschiedenen exes klappt super... eine spielt nur den background-sound, die andere das spiel mit fresssounds. beide werden wunderbar abgespielt.
nur: es sind ZWEI exes! grmbl...

ich werd mir mal fmod anschauen, danke :)

MfG Lefko.

[Gandalfus]

Zitat:

Zitat von Lefko

danke für die tipps!

also das mit den 2 verschiedenen exes klappt super... eine spielt nur den background-sound, die andere das spiel mit fresssounds. beide werden wunderbar abgespielt.
nur: es sind ZWEI exes! grmbl...

Tut mir leid wenn ich das so sage aber das ist echt schrecklich!!!!!

beschäftige dich mal mit der bass.dll so schwer ist das nicht.
z.B.: meine unit:
http://www.delphipraxis.net/internal...light=bass+dll
könnte ein guter Einstieg sein.
(einfach 2 Objekte instanzieren und fertig)

[Lefko]

Zitat:

Zitat von Gandalfus

Zitat:

Zitat von Lefko

danke für die tipps!

also das mit den 2 verschiedenen exes klappt super... eine spielt nur den background-sound, die andere das spiel mit fresssounds. beide werden wunderbar abgespielt.
nur: es sind ZWEI exes! grmbl...

Tut mir leid wenn ich das so sage aber das ist echt schrecklich!!!!!

beschäftige dich mal mit der bass.dll so schwer ist das nicht.
z.B.: meine unit:
http://www.delphipraxis.net/internal...light=bass+dll
könnte ein guter Einstieg sein.
(einfach 2 Objekte instanzieren und fertig)

Hey Gandalfus,
danke, is ja wunderbar übersichtlich erstellt von dir, damit werd ich mal werkeln :)

MfG Lefko.

[rene50]

Zitat:

Zitat von SirThornberry (Beitrag 90640)

von Swissdelphicenter.com:

Delphi-Quellcode:

uses 
  MMSystem; 

procedure SendMCICommand(Cmd: string); 
var 
  RetVal: Integer; 
  ErrMsg: array[0..254] of char; 
begin 
  RetVal := mciSendString(PChar(Cmd), nil, 0, 0); 
  if RetVal <> 0 then 
  begin 
    {get message for returned value} 
    mciGetErrorString(RetVal, ErrMsg, 255); 
    MessageDlg(StrPas(ErrMsg), mtError, [mbOK], 0); 
  end; 
end; 

procedure TForm1.Button1Click(Sender: TObject); 
begin 
  SendMCICommand('open waveaudio shareable'); 
  SendMCICommand('play "C:\xyz\BackgroundMusic.wav"'); 
  SendMCICommand('play "C:\xyz\AnotherMusic.wav"'); 
  SendMCICommand('close waveaudio'); 
end;

Hi, danke für den Tipp, aber kann man einen Laufenden Ton denn auch wieder stoppen? :D