Jak odczytać wartość z karty dźwiękowej ?

jak ktoś wie jak odczytać tą wartość to prosze pisać, za wszystkie posty wielkie dzięx !! Chodzi mi dokładnie o to, że w winapmie gra muzyka a progs odczytuje wartość z karty sieciowej i w progsie wyświetla tą wartość. Widziałem taki programik w pascalu ale nie znalazłem w Delphi ... :-(

Jak znalazłeś progs w Pascalu to nie widze przeszkód, aby go przepisac w Delphi :p . W końcu Delphi = Object Pascal :-P .
Ale sam jestem ciekawy jak zrobić spektrum, oscyloskop, czy bardziej zaawansowaną wizualizację utworu. Wię może wrzuć ten progs na 4p.

Sory tam była pomyłka, chodzi mi cały czas o karte dzwiekowa. Chodzi mi o wartosc dzwieku wychodzacego z karty dzwiekowej. A dokladnie czestotliwosc dziweku wychodzacego.

O ile wiem, nie ma takiej możliwości. Tzn możesz odczytać wartość dźwięku, który sam wysłałeś karcie, bądź na niektórych kartach ustawić mikser na nagrywanie wyjścia ('What you hear","Wave Out Mix" lub t.p.) i odczytywać dźwięk jako dźwięk wchodzący.

pq jak mówisz, że nie mozna odczytać tych informacji to powiedz mi jak działa wizualizacja dźwięku (oscyloskop, itp.) w WinAmpie i innych playerach?

Użyj biblioneki BASS

BASS

Skąd wziąźć tę bibliotekę i API do niej [???] [wstyd]

http://un4seen.com

Ale tym pobierzesz wartości tylko z tych dźwięków, które samemu odgrywasz.

// i to jest posrednia odpowiedź na pytanie do mnie. pq

OK. Dzięki. Pobawię się tym DLL-em. [cya]

Wielkie dzieki za wszystkie odpowiedzi ... pobawie sie tym BASS'em, ale jakby ktoś miał jeszcze jakiś pomysł to nie zastanawiać sie tylko pisać :p

Cześć.

1. Jak sprawdzić czy sterowniki do karty dźwiękowej są zainstalowane?

2. Jak sprawdzić czy kodeki dźwięku np. Wave, midi... (Głównie chodzi mi o te dwa) są zainstalowane.

uses MMSystem;

function SoundCard: Boolean;
begin
  Result :=  WaveOutGetNumDevs > 0;
end;