|
楼主 |
发表于 2013-6-18 11:22:43
|
显示全部楼层
搞定,解决方法如下:
Local $parentwindw=""
Local $var=WinList()
For $i = 1 To $var[0][0]
If $var[$i][0] <> "" And IsVisible($var[$i][1]) Then
Local $sClassList = WinGetClassList($var[$i][1])
If @error Then Return SetError(1, 0, 0)
Local $avClassList = StringSplit($sClassList, @LF)
For $c = 1 To $avClassList[0]
Local $NN = 1
While 1
$hCtrl = ControlGetHandle($var[$i][1], "", $avClassList[$c] & $NN)
If @error Then
ExitLoop
Else
$NN += 1
EndIf
If $hCtrl=$Dhandle Then
$parentwindw=$var[$i][1]
ExitLoop
EndIf
WEnd
Next
EndIf
Next |
|