Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.056 Beiträge
Delphi 12 Athens
|
Re: Qualität einer Wav Datei ändern
17. Aug 2009, 18:15
Delphi-Quellcode:
WaveHdr.riff := 'RIFF';
WaveHdr.len := 36;
WaveHdr.cWavFmt := 'WAVEfmt ';
WaveHdr.dwHdrLen := 16;
WaveHdr.wFormat := 1;
WaveHdr.wNumChannels := 2;
WaveHdr.dwSampleRate := 44100;
WaveHdr.wBlockAlign := 4;
WaveHdr.dwBytesPerSec := WaveHdr.dwSampleRate * WaveHdr.wNumChannels * WaveHdr.wBitsPerSample div 8;
WaveHdr.wBitsPerSample := 16;
WaveHdr.cData := 'data';
WaveHdr.dwDataLen := 0;
wNumChannels = Kanäle ... 1=Mono und 2=Stereo
dwSampleRate = Abtastrate = Meßpunkte/-Werte pro Sekunde
wBitsPerSample = Auflösung pro Abtastung = 16=16 Bit pro Messung
dwBytesPerSec * Zeit_in_Sekunden + SizeOf(Header) = Dateigröße
gebräuchliche Werte wären
Code:
dwSampleRate, wBitsPerSample, wNumChannels, dwBytesPerSec
*8,000 kHz, 8-Bit, Mono, 7 Kbit/s
*8,000 kHz, 8-Bit, Stereo, 15 Kbit/s
*8,000 kHz, 16-Bit, Mono, 15 Kbit/s
*8,000 kHz, 16-Bit, Stereo, 31 Kbit/s
11,025 kHz, 8-Bit, Mono, 10 Kbit/s [b]= Sprach Qualität (Telefon)[/b]
11,025 kHz, 8-Bit, Stereo, 21 Kbit/s
11,025 kHz, 16-Bit, Mono, 21 Kbit/s
11,025 kHz, 16-Bit, Stereo, 43 Kbit/s
22,050 kHz, 8-Bit, Mono, 21 Kbit/s
22,050 kHz, 8-Bit, Stereo, 43 Kbit/s
22,050 kHz, 16-Bit, Mono, 43 Kbit/s
22,050 kHz, 16-Bit, Stereo, 86 Kbit/s [b]= Radio Qualität[/b]
44,100 kHz, 8-Bit, Mono, 43 Kbit/s
44,100 kHz, 8-Bit, Stereo, 86 Kbit/s
44,100 kHz, 16-Bit, Mono, 86 Kbit/s
44,100 kHz, 16-Bit, Stereo, 172 Kbit/s [b]= CD Qualität[/b]
48,000 kHz, 8-Bit, Mono, 46 Kbit/s
48,000 kHz, 8-Bit, Stereo, 93 Kbit/s
48,000 kHz, 16-Bit, Mono, 93 Kbit/s
48,000 kHz, 16-Bit, Stereo, 187 Kbit/s
(Radio und Telefon mit der Klangqualität der Technik von vor 10-20 Jahren gleichgesetzt)
ich möchte aber mal wissen, wie du auf 80 MB kommst, denn rechnerisch komme ich nur auf knapp 20 MB?
172 KB/sec {176400} * 120 Sekunden {2 Minuten} = 20,2 MB
Neuste Erkenntnis:
Seit Pos einen dritten Parameter hat,
wird PoSex im Delphi viel seltener praktiziert.
|