![]() |
Problem mit WAV Länge/Header
Hallo allerseits!
Es "geht sich um folgendes" *G* : Ich haber hier also zwei WAV Audio-Puffer, einer wird mit Daten von einer WAV-Datei befüllt, der andere dient der Modifikation (in diesem Fall das hin- und herkopieren):
Delphi-Quellcode:
WavEnd := High(Wavbuffer) div 2;
Delphi-Quellcode:
Ich versuche also , 50% Prozent (Offset ebenfalls 50%) vom Wavbuffer am Ende desbegin WavAdd := High(Wavbuffer); setlength(TempWavbuffer, WavAdd+WavEnd); // copy the whole main buffer into temp buffer for i := Low(TempWavbuffer) to WavAdd do begin TempWavbuffer[i] := Wavbuffer[i]; end; // append 50% of main buffer at end for i := Low(TempWavbuffer) to WavEnd do begin TempWavbuffer[WavAdd+i] := Wavbuffer[WavEnd+i]; end; end Temp-Buffers anzufügen. Erst kopiere ich den Inhalt vom eigentlichen Wavbuffer komplett in den TempWavBuffer. Zuvor habe ich die Größe so gesetzt das er den gesamten Wavbuffer + 50% von sich selbst extra speichern kann. Nur habe ich das dumpfe Gefühl das dies so noch nicht ganz richtig ist. Das kopieren SCHEINT zu funktionieren, aber dazwischen gibts Knackser und Lücken, oder es crashed. Nun bin ich mir auch nicht sicher, ob das nicht evtl.mit dem WAV-Header zusammenhängt, bei dem ich anschließend die Größe der DataBytes verändert habe: (Damits auch korrekt ausgelesen wird)
Delphi-Quellcode:
Könnte es sein das ich hier irgendwie auf dem Holzweg bin? :oops:
Header.DataBytes := Header.DataBytes + Header.DataBytes div 2;
|
Re: Problem mit WAV Länge/Header
...das merkwürzige ist : Hab mal mit einem HEX-Editor in das WAV geschaut ; die Größenangabe bei DataBytes ist sogar kleiner(???) als wenn ich den Eintrag einfach unverändert lasse?
Quasi:
Delphi-Quellcode:
:shock: :wiejetzt:
Header.DataBytes := (Header.DataBytes div 2) + Header.DataBytes;
Ergebnis z.b. 128950 Header.DataBytes := Header.DataBytes; Ergebnis z.b. 134175 |
Re: Problem mit WAV Länge/Header
Hat das irgendwas mit den Zuweisungen zu tun?
|
Alle Zeitangaben in WEZ +1. Es ist jetzt 04:06 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz