Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Media";
Текущий архив: 2005.09.25;
Скачать: [xml.tar.bz2];

Вниз

Как сделать эквалайзер?   Найти похожие ветки 

 
ArtKil   (2005-05-12 20:05) [0]

Помогите, кто может сделать эквалайзер на Bass. Скачал его, но там всё по-английски.


 
programania ©   (2005-05-12 21:04) [1]


const qEQ=9;

type
BASS_FXPARAMEQ = record
 fCenter: FLOAT;
 fBandwidth: FLOAT;
 fGain: FLOAT;
end;

var
EQ:   EQ:BASS_FXPARAMEQ;
fx:array[0..qEQ] of dWord;
...
//инициализация
for i:=0 to qEQ do fx[i]:=BASS_ChannelSetFX(chan,BASS_FX_PARAMEQ);

//установка тембра
for i:=0 to qEQ do begin
 EQ.fCenter:=1000;     //частота 80..20000
 EQ.fBandwidth:=4;    // ширина полосы 0..12
 EQ.fGain:=0;             // усиление -15..+15,
 if fx[n]<>0 then BASS_FXSetParameters(fx[n],@EQ);
end;


Кстати в delphi тоже все по английски так что спрашивай переведу и delphi


 
Nik_vr   (2005-05-12 21:37) [2]

Найди на Torry компонент BASSPlayer - там есть отличный пример работы с BASS.



Страницы: 1 вся ветка

Форум: "Media";
Текущий архив: 2005.09.25;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.44 MB
Время: 0.065 c
3-1123580030
IgorRu
2005-08-09 13:33
2005.09.25
Не могу создать таблицу - External file


1-1125809659
Lower_
2005-09-04 08:54
2005.09.25
Использование MDIChild


3-1124081213
Rentgen
2005-08-15 08:46
2005.09.25
ограничение размера для фильтра в таблице ADO


1-1125400262
Vera
2005-08-30 15:11
2005.09.25
перейти на строку в текстовом файле.


14-1125679258
Джо
2005-09-02 20:40
2005.09.25
Delphi 2005 - Generate XML documentation





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский