Тема: Звук
Показать сообщение отдельно
  #4  
Старый 19.10.2011, 21:51
Аватар для angvelem
angvelem angvelem вне форума
.
 
Регистрация: 18.05.2011
Адрес: Омск
Сообщения: 3,970
Версия Delphi: 3,5,7,10,12,XE2
Репутация: выкл
По умолчанию

Это готовая процедура, вызываете её с величиной от 0 до 100
Код:
  SetVolume(10);
  SetVolume(20);
  SetVolume(30);
  SetVolume(40);
числа, это какую громкость хотим выставить.
__________________
Je venus de nulle part
55.026263 с.ш., 73.397636 в.д.
Ответить с цитированием