![]() |
![]() |
|
, 13:28 | #1 |
Новичок
Регистрация: 23.08.2012
Сообщений: 2
Репутация: 1 / 0
|
![]()
Громкость нужно получить любым способом, с помощью BASS.dll - отображается некорректно...
OS Bass 0 0 5 1,65 10 3,34 15 5,52 20 8,15 25 11,21 30 14,67 35 18,54 40 22,78 45 27,38 50 32,36 55 37,67 60 43,3 65 49,32 70 55,65 75 62,3 80 69,26 85 76,56 90 84,14 95 92,04 100 100 IMAGE http://i082.radikal.ru/1208/6a/b43cef54dac4.jpg Что делать? |
![]() |
Наши Спонсоры | ||||
|
, 12:36 | #2 |
Новичок
Регистрация: 23.08.2012
Сообщений: 2
Репутация: 1 / 0
|
![]()
Решилось все просто.
1) Скачиваем исходник http://www.codeproject.com/Articles/...Volume-Control 2) Для студии 2008 комментируем (можно удалить) все code:
using System.Linq; 4) Подкл. к проэкту ("Добавить ссылку...") выбираем наш DLL 5) Ставим на форму прогрессбар code:
Imports CoreAudioApi Public Class Form1 Private device As MMDevice Private Sub FormMasterVolume_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Dim DevEnum As New MMDeviceEnumerator() device = DevEnum.GetDefaultAudioEndpoint(EDataFlow.eRender, ERole.eMultimedia) AddHandler device.AudioEndpointVolume.OnVolumeNotification, AddressOf OnVolumeNotification ProgressBar1.Value = CInt(device.AudioEndpointVolume.MasterVolumeLevelScalar * 100) End Sub Private Sub OnVolumeNotification(ByVal data As CoreAudioApi.AudioVolumeNotificationData) If Me.InvokeRequired Then Me.Invoke(New AudioEndpointVolumeNotificationDelegate(AddressOf OnVolumeNotification), data) Else ProgressBar1.Value = CInt(data.MasterVolume * 100) End If End Sub 'Private Sub tbMaster_Scroll(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ProgressBar1.Scroll ' device.AudioEndpointVolume.MasterVolumeLevelScalar = tbMaster.Value / 100.0F 'End Sub End Class |
![]() |
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Установка OS Windows XP SP3 LEX-PEX | tickhack | Windows | 3 | 22.09.2013 22:28 |
SQL injection полный FAQ | deihack | Сайты, Форумы, CMS | 0 | 21.01.2012 12:16 |
Взлом забытого пароля Windows XP | tiBEG | Операционные Системы | 0 | 27.12.2010 15:11 |
ваш личный чат на PHP Devel Studio или как это работает | max95 | Оффтоп | 8 | 05.11.2010 19:09 |
Copyright © 2008 - 2013 «HPC» Реклама на сайте Правила Форума Пользовательское соглашение Работа на сайте |