Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.06.10;
Скачать: CL | DM;

Вниз

Эквалайзер   Найти похожие ветки 

 
alex810 ©   (2007-05-21 15:00) [0]

Подскажите пожалуйста как сделать эквалайзер наподобие как в Winampе?


 
Jeer ©   (2007-05-21 15:19) [1]

Многому научиться, для начала.


 
alex810 ©   (2007-05-21 15:28) [2]

Спосибо за ответ.


 
Сергей М. ©   (2007-05-21 15:29) [3]


> alex810 ©   (21.05.07 15:00)


А в чем затруднения ?


 
alex810 ©   (2007-05-21 15:31) [4]

Не сталкивался с таким заданием


 
Сергей М. ©   (2007-05-21 15:33) [5]

Ну вот теперь, как видно, столкнулся.
Так в чем же таки затруднения ?


 
alex810 ©   (2007-05-21 15:37) [6]

Не знаю как. Прикреплю к компоненту например TrackBar значения от 0 до 100 или сколько там надо. Буду перемещать, а значения Position передавать. Затруднения в том куда и как передавать?


 
clickmaker ©   (2007-05-21 15:40) [7]

а чем управляет эквалайзер?


 
alex810 ©   (2007-05-21 15:41) [8]


> а чем управляет эквалайзер?

Ну например увеличивает или уменьшает басы или низкие частоты


 
clickmaker ©   (2007-05-21 15:42) [9]


> уменьшает басы или низкие частоты

у кого?


 
Сергей М. ©   (2007-05-21 15:42) [10]

Причем здесь TrackBar ?

Он что, является "эквалайзером" ?


 
alex810 ©   (2007-05-21 15:45) [11]


> Причем здесь TrackBar ?
>
> Он что, является "эквалайзером" ?


Громкостью я управляю TrackBarом. Ну думаю можно и эквалайзер сделать так.


 
Сергей М. ©   (2007-05-21 15:47) [12]


> alex810 ©   (21.05.07 15:45) [11]
>
>



> Громкостью я управляю


Громкостью чего ?


 
Knight ©   (2007-05-21 15:48) [13]

Винампа?


 
clickmaker ©   (2007-05-21 15:48) [14]

блин, тут поневоле себя Мюллером начинаешь чувствовать
да, Сергей? )


 
Сергей М. ©   (2007-05-21 15:49) [15]


> clickmaker ©   (21.05.07 15:48) [14]


Угу)


 
{RASkov} ©   (2007-05-21 15:51) [16]

http://www.google.com/search?num=20&hl=ru&newwindow=1&q=%28%D0%AD%D0%BA%D0%B2%D0%B0%D0%BB%D0%B0%D0%B9%D0%B7%D0%B5%D1%80%2BDelphi%29&btnG=%D0%9F%D0%BE%D0%B8%D1%81%D0%BA&lr=
http://www.google.com/search?num=20&hl=ru&newwindow=1&sa=X&oi=spell&resnum=0&ct=result&cd=1&q=(%D0%AD%D0%BA%D0%B2%D0%B0%D0%BB%D0%B0%D0%B9%D0%B7%D0%B5%D1%80%2BDelphi%2BBASS)&spell=1


 
alex810 ©   (2007-05-21 15:54) [17]


> Винампа?

Причем здесь Винамп. Я задал вопрос наподобие как у Винампа. Громкостью динамиков.
Вот так я управляю звуком
а как управлять частотами звука я не знаю


procedure TForm1.TrackBar1Change(Sender: TObject);
var
  LVol: Word;
  RVol: Word;
begin
  LVol := TrackBar1.Position;
 RVol := TrackBar2.Position;
 SetWaveVolume(MakeLong(LVol, RVol));
end;

function GetWaveVolume(var LVol: DWORD; var RVol: DWORD): Boolean;
var
  WaveOutCaps: TWAVEOUTCAPS;
  Volume: DWORD;
begin
  Result := False;
  if WaveOutGetDevCaps(WAVE_MAPPER, @WaveOutCaps, SizeOf(WaveOutCaps)) = MMSYSERR_NOERROR then
    if WaveOutCaps.dwSupport and WAVECAPS_VOLUME = WAVECAPS_VOLUME then
    begin
      Result := WaveOutGetVolume(WAVE_MAPPER, @Volume) = MMSYSERR_NOERROR;
      LVol   := LoWord(Volume);
      RVol   := HiWord(Volume);
    end;
end;



 
Сергей М. ©   (2007-05-21 15:57) [18]


> наподобие как у Винампа. Громкостью динамиков


Каких динамиков ? Винамп не управляет динамиками. И никогда не управлял.


 
clickmaker ©   (2007-05-21 15:58) [19]

mixerSetControlDetails()?


 
alex810 ©   (2007-05-21 16:04) [20]


> Каких динамиков ? Винамп не управляет динамиками. И никогда
> не управлял.


Как будто не поняли вопроса. Если нет то как вам еще объяснить не знаю


 
Сергей М. ©   (2007-05-21 16:10) [21]


> alex810 ©   (21.05.07 16:04) [20]


Да понял я все )
Кроме одного - причем здесь динамики ?


> как управлять частотами звука я не знаю


Смотри все касаемое Фурье-преобразований, если хочешь понять суть.


 
alex810 ©   (2007-05-21 16:12) [22]


> http://www.google.com/search?num=20&hl=ru&newwindow=1&q=%28%D0%AD%D0%BA%D0%B2%D0%B0%D0%BB%D0%B0%D0%B9%D0%B7%D0%B5%D1%80%2BDelphi%29&btnG=%D0%9F%D0%BE%D0%B8%D1%81%D0%BA&lr=
> http://www.google.com/search?num=20&hl=ru&newwindow=1&sa=X&oi=spell&resnum=0&ct=result&cd=1&q=(%D0%AD%D0%BA%D0%B2%D0%B0%D0%BB%D0%B0%D0%B9%D0%B7%D0%B5%D1%80%2BDelphi%2BBASS)&spell=1


Спасибо за ссылку.


 
alex810 ©   (2007-05-21 16:14) [23]


> Смотри все касаемое Фурье-преобразований, если хочешь понять
> суть.

Скажите  Где если не трудно.


 
alex810 ©   (2007-05-21 16:15) [24]


> Да понял я все )
> Кроме одного - причем здесь динамики ?


Зачем издеваться? Ну уровнем звука. Не так выразился.


 
Сергей М. ©   (2007-05-21 16:22) [25]


> Где


Здесь:

http://www.google.ru/search?q=Delphi+%D1%8D%D0%BA%D0%B2%D0%B0%D0%BB%D0%B0%D0%B9%D0%B7%D0%B5%D1%80&ie=utf-8&oe=utf-8&aq=t&rls=org.mozilla:ru:official&client=firefox-a


> Ну уровнем звука


Звук звуку рознь.


 
alex810 ©   (2007-05-21 16:26) [26]


> Звук звуку рознь.


Спасибо большое.


 
X9 ©   (2007-05-21 16:53) [27]

bass.dll



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

Текущий архив: 2007.06.10;
Скачать: CL | DM;

Наверх




Память: 0.5 MB
Время: 0.046 c
15-1178608499
DemonP
2007-05-08 11:14
2007.06.10
портирование кода C++ -> Delphi


15-1179440350
РТР
2007-05-18 02:19
2007.06.10
Зеленый чай


2-1179774236
Познающий
2007-05-21 23:03
2007.06.10
Окантовка текста


15-1179160502
Bad_B
2007-05-14 20:35
2007.06.10
Как это работать программистом?


3-1174556149
dolmat
2007-03-22 12:35
2007.06.10
Изменение свойств поля





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский