获取声卡实时的声音的强度值(声音的强弱).如何实现,求一函数.
大概知道是用
WinAPI: waveOutGetPitch - 获取输出设备当前的音调设置(音高的倍数值)
提示:
参数 lpdwPitch 虽然指向的是 4 字节的正整数, 但表示的是个小数;
两个高位表示整数部分, 两个低位表示小数部分;
$8000 表示一半, $4000 表示四分之一;
譬如: $00010000 表示 1.0, 说明音高没变; $000F8000, 表示 15.5 倍;
修改音高不会改变播放速度、采样速度和播放时间, 但不是所有设备都支持.
--------------------------------------------------------------------------------//声明:
waveOutGetPitch(
hWaveOut: HWAVEOUT; {设备句柄}
lpdwPitch: PDWORD {存放音高值的变量的指针}
): MMRESULT; {成功返回 0; 可能的错误值见下:}MMSYSERR_INVALHANDLE = 5; {设备句柄无效}
MMSYSERR_NOTSUPPORTED = 8; {设备不支持}
MMSYSERR_HANDLEBUSY = 12; {设备已被另一线程使用}
但是获取混音器句柄不会.
大概知道是用
WinAPI: waveOutGetPitch - 获取输出设备当前的音调设置(音高的倍数值)
提示:
参数 lpdwPitch 虽然指向的是 4 字节的正整数, 但表示的是个小数;
两个高位表示整数部分, 两个低位表示小数部分;
$8000 表示一半, $4000 表示四分之一;
譬如: $00010000 表示 1.0, 说明音高没变; $000F8000, 表示 15.5 倍;
修改音高不会改变播放速度、采样速度和播放时间, 但不是所有设备都支持.
--------------------------------------------------------------------------------//声明:
waveOutGetPitch(
hWaveOut: HWAVEOUT; {设备句柄}
lpdwPitch: PDWORD {存放音高值的变量的指针}
): MMRESULT; {成功返回 0; 可能的错误值见下:}MMSYSERR_INVALHANDLE = 5; {设备句柄无效}
MMSYSERR_NOTSUPPORTED = 8; {设备不支持}
MMSYSERR_HANDLEBUSY = 12; {设备已被另一线程使用}
但是获取混音器句柄不会.
DWORD flags;
long DeviceID;
mciOpen.lpstrDeviceType="waveaudio";
mciOpen.lpstrElementName="";
flags=MCI_OPEN_ELEMENT¦MCI_OPEN_TYPE;
mciError(mciSendCommand(0,MCI_OPEN,flags,DWORD(&mciOpen)),"OpenWave");
DeviceID=mciOpen.wDeviceID;
一段C看看有没有用
提示: 因为其中的回调函数是在中断时间内访问的, 必须在 DLL 中; 要访问的数据都必须是在固定的数据段中; 除了
PostMessage
timeGetSystemTime
timeGetTime
timeSetEvent
timeKillEvent
midiOutShortMsg
midiOutLongMsg
OutputDebugString 外, 也不能有其他系统调用.
--------------------------------------------------------------------------------//声明:
waveOutOpen(
lphWaveOut: PHWaveOut; {用于返回设备句柄的指针; 如果 dwFlags=WAVE_FORMAT_QUERY, 这里应是 nil}
uDeviceID: UINT; {设备ID; 可以指定为: WAVE_MAPPER, 这样函数会根据给定的波形格式选择合适的设备}
lpFormat: PWaveFormatEx; {TWaveFormat 结构的指针; TWaveFormat 包含要申请的波形格式}
dwCallback: DWORD {回调函数地址或窗口句柄; 若不使用回调机制, 设为 nil}
dwInstance: DWORD {给回调函数的实例数据; 不用于窗口}
dwFlags: DWORD {打开选项}
): MMRESULT; {成功返回 0; 可能的错误值见下:}MMSYSERR_BADDEVICEID = 2; {设备ID超界}
MMSYSERR_ALLOCATED = 4; {指定的资源已被分配}
MMSYSERR_NODRIVER = 6; {没有安装驱动程序}
MMSYSERR_NOMEM = 7; {不能分配或锁定内存}
WAVERR_BADFORMAT = 32; {设备不支持请求的波形格式}//TWaveFormatEx 结构:
TWaveFormatEx = packed record
wFormatTag: Word; {指定格式类型; 默认 WAVE_FORMAT_PCM = 1;}
nChannels: Word; {指出波形数据的通道数; 单声道为 1, 立体声为 2}
nSamplesPerSec: DWORD; {指定样本速率(每秒的样本数)}
nAvgBytesPerSec: DWORD; {指定数据传输的平均速率(每秒的字节数)}
nBlockAlign: Word; {指定块对齐(单位字节), 块对齐是数据的最小单位}
wBitsPerSample: Word; {采样大小(字节)}
cbSize: Word; {应该是该结构的大小}
end;
{16 位立体声 PCM 的块对齐是 4 字节(每个样本2字节, 2个通道)}//打开选项 dwFlags 的可选值:
WAVE_FORMAT_QUERY = $0001; {只是判断设备是否支持给定的格式, 并不打开}
WAVE_ALLOWSYNC = $0002; {当是同步设备时必须指定}
CALLBACK_WINDOW = $00010000; {当 dwCallback 是窗口句柄时指定}
CALLBACK_FUNCTION = $00030000; {当 dwCallback 是函数指针时指定}//如果选择窗口接受回调信息, 可能会发送到窗口的消息有:
MM_WOM_OPEN = $3BB;
MM_WOM_CLOSE = $3BC;
MM_WOM_DONE = $3BD;//如果选择函数接受回调信息, 可能会发送给函数的消息有:
WOM_OPEN = MM_WOM_OPEN;
WOM_CLOSE = MM_WOM_CLOSE;
WOM_DONE = MM_WOM_DONE;