Частотная Визуализация

Тема в разделе "Delphi - Multimedia, Графика, Игры", создана пользователем INTELlect, 15 авг 2008.

  1. INTELlect

    INTELlect Гость

    Пишу программу для прослушивания радио через интернет. Все замечательно но есть одно но. Пишу на bass.dll. Никак не могу настроить частотную визуализацию. Есть 2 TProgressBar которые отвечают за левый и правый каналы соответственно. Но почему то реакции при воспроизведении никакой. Помогите пожалуйста разобраться. Заранее спасибо!

    ""
    procedure TForm1.Timer1Timer(Sender: TObject);
    var
    wavedata:twavedata;
    r,l:SmallInt;
    begin
    BASS_ChannelGetData(chan,@wavedata,BASS_DATA_FFT1024);
    R := SmallInt(LOWORD(WaveData[0]));
    L := SmallInt(HIWORD(WaveData[0]));
    Progressbar1.position:=r;
    Progressbar2.position:=l;
    end;
    ""
    Вот код изъятия из потока данных о звуке
     
Загрузка...
Похожие Темы - Частотная Визуализация
  1. XenoGig
    Ответов:
    1
    Просмотров:
    1.573
  2. morpheus
    Ответов:
    5
    Просмотров:
    4.217

Поделиться этой страницей