1. Наш канал codeby в telegram. Пишем об информационной безопасности, методах защиты информации, о программировании. Не пропускай новости с кодебай, будь в тренде ! Подробнее ...

    Скрыть объявление

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

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

  1. INTELlect

    INTELlect Гость

    Репутация:
    0
    Пишу программу для прослушивания радио через интернет. Все замечательно но есть одно но. Пишу на 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. shizzoidman
    Ответов:
    1
    Просмотров:
    232
  2. XenoGig
    Ответов:
    1
    Просмотров:
    1.695
  3. morpheus
    Ответов:
    5
    Просмотров:
    4.288

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