Thema: Delphi WAV-Dateien verschmelzen

Einzelnen Beitrag anzeigen

Benutzerbild von LDericher
LDericher

Registriert seit: 29. Jan 2007
Ort: Erkelenz
224 Beiträge
 
Delphi 7 Enterprise
 
#8

Re: WAV-Dateien verschmelzen

  Alt 30. Mär 2009, 21:44
Wenn ich dich richtig verstehe, kann ich dann ja auch 3 stück verschmelzen:

Delphi-Quellcode:
var Source1, Source2, Source3 : Cardinal;
    Mixer : Cardinal;

// File1 kann mp3 sein und File2 kann wav sein
Source1 := BASS_StreamCreateFile(false, 'File1', 0, 0, BASS_STREAM_DECODE) // < So oft wie du willst
Source2:= BASS_StreamCreateFile(false, 'File2', 0, 0, BASS_STREAM_DECODE)
Source3:= BASS_StreamCreateFile(false, 'File3', 0, 0, BASS_STREAM_DECODE)

Mixer:= BASS_Mixer_StreamCreate(44100, 3, 0) ;

BASS_Mixer_StreamAddChannel(Mixer, Source1, 0); // < So oft wie du willst
BASS_Mixer_StreamAddChannel(Mixer, Source2, 0);
BASS_Mixer_StreamAddChannel(Mixer, Source3, 0);

BASS_ChannelPlay(Mixer, false);
Wenn das so ist und auch so funtionieren sollte - Habe aktuell die sachen auf einem anderen rechner - dann kann ich damit arbeiten und markiere die frage nach testen als GELÖST.
Andernfalls natürlich nicht aber ich bin mal zuversichtlich: Morgen ist mal wieder ein Tag mit zu viel Zeit...

Gruß vom LDer!

Edit: *Codeüberdenk*, *Räusper*, kann es sein, dass dein Code die Dateien übereinanderlegt bzw. gleichzeitig abspielt? Wenn ja, ich bräuchte sie nacheinander... Wenn das allerdings nacheinander abspielt, ... *owt*
  Mit Zitat antworten Zitat