FindFirst ( $TreeScope_Children, $pCondition0, $pNox ) $oNox = ObjCreateInterface ( $pNox, $sIID_IUIAutomationElement, $dtagIUIAutomationElement ) If Not IsObj ( $oNox ) Then Return ConsoleWrite ( "$oNox ERR" & ) ConsoleWrite ( "$oNox OK" & ) Nox Sub Class element Local $pCondition0 $oUIAutomation. CreatePropert圜ondition ( $UIA_ClassNamePropertyId, "Qt5QWindowIcon", $pCondition0 ) If Not $pCondition0 Then Return ConsoleWrite ( "$pCondition0 ERR" & ) ConsoleWrite ( "$pCondition0 OK" & ) $oDesktop. GetRootElement ( $pDesktop ) $oDesktop = ObjCreateInterface ( $pDesktop, $sIID_IUIAutomationElement, $dtagIUIAutomationElement ) If Not IsObj ( $oDesktop ) Then Return ConsoleWrite ( "$oDesktop ERR" & ) ConsoleWrite ( "$oDesktop OK" & ) Nox Player Element Local $pCondition0 $oUIAutomation.
Expand collapse popup #include ".\Includes\3" #include ".\Includes\UIA_3" Opt ( "MustDeclareVars", 1 ) Global $oUIAutomation Global $pDesktop, $oDesktop Global $pNox, $oNox Global $pNoxSub, $oNoxSubĭeleteTextBox ( ) Func prepareNox ( ) Prepare Nox Player If Not WinExists ( "" ) Then Exit Else WinActivate ( "", "" ) EndIf Sleep ( 1000 ) EndFunc =>prepareNox Func setVarsInit ( ) Create UI Automation object $oUIAutomation = ObjCreateInterface ( $sCLSID_CUIAutomation, $sIID_IUIAutomation, $dtagIUIAutomation ) If Not IsObj ( $oUIAutomation ) Then Return ConsoleWrite ( "$oUIAutomation ERR" & ) ConsoleWrite ( "$oUIAutomation OK" & ) Get Desktop element $oUIAutomation.
0 kommentar(er)
