[已解决]如何 获取这个控件的内容.
本帖最后由 nxfhcsj 于 2012-5-10 10:21 编辑如图,如何用au3获取这个里面的"Realtek Audio Input"数据呢.因为有的声卡设置这里默认不同... Run("rundll32.exe shell32.dll,Control_RunDLL mmsys.cpl,,2")
Sleep(5000)
WinActivate("声音和音频设备 属性")
ControlClick ("声音和音频设备 属性", "", "", "left")
$n = 1
While True
If $n < 3 Then
ControlCommand("声音和音频设备 属性", "", "", "TabRight", "")
ElseIf $n > 3 Then
ControlCommand("声音和音频设备 属性", "", "", "TabLeft", "")
Else
ExitLoop
EndIf
$n = ControlCommand("声音和音频设备 属性", "", "", "CurrentTab", "")
WEnd
$text = WinGetText("声音和音频设备 属性")
MsgBox(0, "", $text)
$start = StringInStr($text, "默认设备(&E):")
$start += StringLen("默认设备(&E):")
$end = StringInStr($text, "音量(&O)")
$str = StringMid($text, $start, $end-$start)
MsgBox(0, "", $str)
;*************
;默认设备(&E):
;Realtek AC97 Audio
;音量(&O)...
;************* If WinExists("声音和音频设备 属性", "") Then
WinActivate("声音和音频设备 属性", "")
$Var = WinGetText("声音和音频设备 属性", "")
$Record = StringRegExp($Var, "E\):\n(.+)\n", 1)
MsgBox(0, "", $Record)
EndIf 有了Run("rundll32.exe shell32.dll,Control_RunDLL mmsys.cpl,,2") ;;;最后的参数2就是指定
tab控件的 音频 页的
这段while 可以不要
$n = 1
While True
If $n < 3 Then
ControlCommand("声音和音频设备 属性", "", "", "TabRight", "")
ElseIf $n > 3 Then
ControlCommand("声音和音频设备 属性", "", "", "TabLeft", "")
Else
ExitLoop
EndIf
$n = ControlCommand("声音和音频设备 属性", "", "", "CurrentTab", "")
WEnd 在WIN7下不知道能不能用!貌似只能获取XP的。 万分感谢大家.. 目前能获取xp就行了.. 昨天自己试n久.换n多代码都不行..
页:
[1]