| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

озвучка [D5, Win95/98]

sammy ©   (2002-04-01 08:11:00) 

Есть ли возможность регулировать через
дельфи громкость звука?
Подкиньте пожалуста функцию.

---

pasha676   (2002-04-05 10:21:00) [1]

Фредди - эквалайзер можно сделать через преобразование Фурье. В MCI насколько мне известно таких фенек никогда не было.

---

Фредди   (2002-04-05 08:36:00) [2]

А как сбацать эквалайзер? Его через MCI реально сделать?

---

Walker   (2002-04-05 03:33:00) [3]

добавлю: свойство Max в каждом TrackBar"e должно равняться 65535 (то есть MaxWord)

---

olookin   (2002-04-02 16:06:00) [4]

Выставь на форму 2 тракбара и двигай их. Если у тебя звучит музыка, ты должен услышать изменения громкости правого и левого каналов.

procedure TForm1.TrackBar1Change(Sender: TObject);
var s: dword;
a,b: word;
h: hWnd;
begin
a:=trackbar1.position;
b:=trackbar2.position;
s:=(a shl 16) or b;
waveOutSetVolume(h,s);
end;

---

Наверх