Delphi Wie waveOutWrite visualisieren ?

Thema durchsuchen

Ansicht

Themen-Optionen

Wie waveOutWrite visualisieren ?

Ein Thema von turboPASCAL · begonnen am 30. Aug 2009 · letzter Beitrag vom 30. Aug 2009

Antwort

igel457

Registriert seit: 31. Aug 2005
1.622 Beiträge

FreePascal / Lazarus

Re: Wie waveOutWrite visualisieren ?

30. Aug 2009, 10:26

Gibst du die Daten über WaveOut aus, oder ein anderes Programm?

Falls ersteres der Fall ist, schau dir mal den Quellcode von Audorra an. Du kannst bei WaveOut eine Callbackfunktion registrieren und mit jedem Buffer "Userdata" verknüpfen. Dort schreibst du einfach den entsprechenden Timecode des Buffers rein, den du über die Callbackfunktion zurückbekommst. Nun Streamst du die Daten nicht nur an WaveOut sondern auch an einen Visualisierungsthread, der die Timecodedaten der Daten und der aktuellen Wiedergabe hat und synchronisierst dort.

Siehe:
AuFilterGraph.TAuAnalyzeThread.Excecute
AuWaveOut32Driver.stream_callback

Andreas
"Sollen sich auch alle schämen, die gedankenlos sich der Wunder der Wissenschaft und Technik bedienen, und nicht mehr davon geistig erfasst haben als die Kuh von der Botanik der Pflanzen, die sie mit Wohlbehagen frisst." - Albert Einstein