Einzelnen Beitrag anzeigen

Benutzerbild von dizzy
dizzy

Registriert seit: 26. Nov 2003
Ort: Lünen
1.932 Beiträge
 
Delphi 7 Enterprise
 

Re: Sound graphisch darstellen

  Alt 26. Jul 2004, 00:40
Oh mann... Es geht viel einfacher ! Kommando zurück! Ich hab den ganzen Quark nochmal angehängt.

Es gibt jetzt nur noch 2 Arrays. ChL und ChR. 8 Bit Daten werden zunächst nach 16 Bit konvertiert, und bei Mono landet alles im linken Kanal (ChL) und Stereo in beiden.

Das Array ist nun DOCH wieder ein array of SmallInt, nicht Word, da man sich den Kram mit dem xor $8000 dann (natürlich...) sparen kann . (Manchmal ist man etwas bresig.)

Fazit: Wave wird korrekt geladen, und landet in max. 2 Arrays deren Elemente -32768 bis 32767 sein können, und 0 ist auch wieder der Nulldurchgang.

Mit dabei ein etwas erweiterter Viewer mit Zoom und Scrolling. Jetzt kann ich beruhigt schlafen gehen .
Angehängte Dateien
Dateityp: zip wave-reader_436.zip (166,3 KB, 297x aufgerufen)
Fabian K.
INSERT INTO HandVonFreundin SELECT * FROM Himmel
  Mit Zitat antworten Zitat