Ergebnis der Suchanfrage

• Forum: Programmieren allgemein

  AW: Mergen von Audios

   
    by markusagb, 7. Jul 2018
  Danke - gelöst.
  
  Timer mit dem BASS_MIXERPLAY starten und den Status abfragen. wenn er nicht mehr spielt dann die Streams freigeben. Vorher geht nicht da sonst der Mixer nichts mehr zum Abspielen hat.
  Schönes Wochenende!!
  
  Markus
• Forum: Programmieren allgemein

  AW: Mergen von Audios

   
    by markusagb, 5. Jul 2018
  Vorschläge geändert, funktioniert genau gleich, danke dennoch!!
  
  Ein Problem habe ich noch, das geschriebene WAV-File wird erst dann finalisiert wenn ich die Anwendung schließe. Das ist natürlich blöd. Muss ich die Streams alle freigeben bzw. gibts ne callback wenn der encoder fertig ist?
  
  Lieber Gruß und nochmals danke an alle :-)
• Forum: Programmieren allgemein

  AW: Mergen von Audios

   
    by markusagb, 5. Jul 2018
  Danke. Aus der Bass-Doku:
  
  http://www.un4seen.com/doc/#bassmix/BASS_Mixer_StreamAddChannelEx.html
  
  Example
  Add a channel to a mixer, delaying the start by 1 second and limiting the duration to 2 seconds.
  
  QWORD start=BASS_ChannelSeconds2Bytes(mixer, 1); // delay
  QWORD length=BASS_ChannelSeconds2Bytes(mixer, 2); // duration
  BASS_Mixer_StreamAddChannelEx(mixer, channel, 0, start, length);...
• Forum: Programmieren allgemein

  AW: Mergen von Audios

   
    by markusagb, 4. Jul 2018
  Für alle die das Gleiche benötigen, hier der Code wie es funktioniert. Hat etwas gedauert, aber das läuft:
  
  
  procedure TForm1.Audiomerge;
  var Source1, Source2, Source3 : Cardinal;
  Mixer : Cardinal;
  duration1, duration2, duration3: double;
  len:qword;
  start: QWORD;
  length: QWORD ;
• Forum: Programmieren allgemein

  AW: Mergen von Audios

   
    by markusagb, 29. Jun 2018
  Hi, fehler gefunden, danke für den Tipp mit der Doku. Die Bassenc und Bassmix pas + dll haben gefehlt, dachte die sind im Bass mit drin...
  
  Läuft trotzdem nicht. Die Samples helfen auch nicht weiter .-(
• Forum: Programmieren allgemein

  AW: Mergen von Audios

   
    by markusagb, 29. Jun 2018
  Soweit sogut... ich muss nur irgendwie die bassmix.dll einbinden, daran scheiterts vermutlich noch...
  BASS_Mixer_StreamCreate kennt er nicht... ist wohl in der bassmix.dll drin. Aber ich habe keine Ahnung wie man das einbindet...
  
  
  procedure TForm1.audiomix;
  var Source1, Source2, Source3 : Cardinal;
  Mixer : Cardinal;
  begin
  Source1 := BASS_StreamCreateFile(false, PChar('D:\Intro.wav'),...
• Forum: Programmieren allgemein

  AW: Mergen von Audios

   
    by markusagb, 29. Jun 2018
  Hallo zusammen,
  vielen Dank für die Antworten. Der Process soll immer wieder abgerufen werden. Zum Verständnis, unser Radiosender soll in den Regionalnachrichten jede Stunde ein neues Nachrichtenfile bekommen mit durchwechselnden Meldungen. Die Redaktion spricht jede Meldung einzeln ein und das Programm soll 5 Min. vor der Ausstrahlung aus diesen Einzelelementen ein neues File "Würfeln". Die...
• Forum: Programmieren allgemein

  Mergen von Audios

   
    by markusagb, 29. Jun 2018
  Hallo zusammen,
  
  ich muss 3 MP3 Audios zu einem file zusammenbauen und speichern. Ich würde das gerne mit BASS realisieren, scheitere aber seit längerem...
  
  Die Kunst ist dabei, dass file 2 und 3 jeweils 1 Sek vor ende der vorhergehenden Datei gestartet wird, also überlappt (ohne Blenden).
  
  Hat mir jemand einen Tipp oder Link der mir eventuell etwas helfen könnte? Die BASS Beispiele bringen...