Редактировалось 4 раз(а), последний 2021-05-21 07:53:38

FraL, есть компоненты для вывода потока звуковых данных (на форуме неоднократно обсуждалось), вот схема для их выделения, внутри InLineCode можно сделать прямое преобразование Фурье, регулировать уровень по отдельным частотам как угодно и обратным преобразованием выводить на воспроизведение. Всё в ваших руках
code_568

Леонид, можно ли расширить границы компонента BASS_ChlFX?
{
}

Fral, можно обойтись и без библеотеки BASS, типа так:
code_570
Только придется немного доработать главную форму.
В обработчик сообщений MainForm надо добавить сообщения
MM_WIM_DATA и MM_WOM_DONE:
function THIMainForm._onMessage;
begin
case Msg.message of
WM_COPYDATA: _hi_OnEvent(_event_OnCopyData,Msg.LParam);
MM_WIM_DATA: _hi_OnEvent(_event_OnWimData{,Msg.lParam});
MM_WOM_DONE: _hi_OnEvent(_event_OnWomData{,Msg.wParam});
Соответственно в декларациях добавить:
_event_onWimData:THI_Event;
_event_onWomData:THI_Event;
И соответственно в ini файл в раздел Methods:
onWimData=Получено сообщение MM_WIM_DATA|2|
onWomData=Получено сообщение MM_WOM_DATA|2|

ХЭМ, кстати, эти добавления в код главной формы у меня не получились - то переменные не декларированы, то ещё что-либо; посмотрите повнимательней, наверное есть изменения, про которые Вы запамятовали , сравнивая с не изменённым кодом, если его (не изменённого кода) не осталось, пришлите на почту Ваш вариант.
Geka, польщён Вашим мнением о моих возможностях в программировании, но вопрос о BASS_ChlFX не ко мне

они определены в MMSystem

Леонид, забыл напомнить - в uses надо влепить mmsystem.

ХЭМ, это я делал, но сейчас попробую ещё раз (интересно, регистр там различается?)

Нет.

Редактировалось 4 раз(а), последний 2021-05-21 07:53:38

Вот типа так, только без BASS (к нему личная неприязнь - надо таскать с собой и от версии зависит.
code_576
Главное окно надо доработать, как указано выше. И регулировка по полосам у меня от 0 до 1 , а не +/-15 дб. При желании арифметику легко доработать на HiAsme. Да, это обработка со входа звуковой карты. Если требуется обработка с файла, то надо немного подождать.

Редактировалось 4 раз(а), последний 2021-05-21 07:53:38

рибята, говорите понятно для чайников - я тоже хочу поиграться.
ХЭМ, а нельзя ли без доработки главного окна - у меня при вставке твоей схемы (576) хиасм ругается.

Редактировалось 4 раз(а), последний 2021-05-21 07:53:38

ХЭМ, тебе может следует прикрепить main form переработанный в rar файл, а то после моей дороботки компилятор стал грозно ругатся...