#Include <WinAPIEx.au3>
$sFileExe = "program.exe"
Global $hNewDesktop = _WinAPI_CreateDesktop( "ShellExecuteHidden_Desktop", 0x10000000) ; создаем другой рабочий стол
Global $pid
_shellExecuteHidden($sFileExe, "") ; запускаем program.exe на другом рабочем столе
$hWin = _GetWindow("TFormMain") ; получаем хэндл главного окна
Sleep(3000) ; !!! тут хотелось бы использовать что-то типа WinWait($hWin), но это приведет к вечному ожиданию, т.к. функция не видит окно на другом рабочем столе
ControlClick($hWin, "", "TButton1") ; п.1: жмем "ОК" на главном окне
$hWin = _GetWindow("#32770") ; получаем хэндл Бокса "Да/Нет"
Sleep(3000) ; !!! тут хотелось бы использовать что-то типа WinWaitClose($hWin), но это приведет к вечному ожиданию, т.к. функция не видит окно на другом рабочем столе
ControlClick($hWin, "", "Button1") ; п.2: жмем "Да" на Боксе
$hWin = _GetWindow("#32770") ; получаем хэндл последнего Бокса "ОК"
Sleep(3000) ; !!! тут хотелось бы использовать что-то типа WinWaitClose($hWin), но это приведет к вечному ожиданию, т.к. функция не видит окно на другом рабочем столе
ControlClick($hWin, "", "Button1") ; п.3а / п. 3б: жмем последний "ОК" на Боксе
Func _shellExecuteHidden( $filepath , $parameters = "")
$tProcess = DllStructCreate( $tagPROCESS_INFORMATION )
$tStartup = DllStructCreate( $tagSTARTUPINFO )
DllStructSetData( $tStartup , 'Size', DllStructGetSize( $tStartup) )
DllStructSetData( $tStartup , 'Desktop', _WinAPI_CreateString( "ShellExecuteHidden_Desktop" ) )
_WinAPI_CreateProcess( $filepath , $parameters , 0, 0, 0, 0x00000200 , 0, 0, DllStructGetPtr($tStartup), DllStructGetPtr($tProcess))
$pid = DllStructGetData( $tProcess , 'ProcessID' )
EndFunc
Func _GetWindow ($WinClassName)
$aWindows = _WinAPI_EnumDesktopWindows($hNewDesktop)
If IsArray( $aWindows ) Then
For $i = 1 to $aWindows[0][0]
$hWnd = $aWindows[$i][0]
If WinGetProcess( $hWnd ) = $pid And $aWindows[$i][1] = $WinClassName Then
Return ($hWnd)
EndIf
Next
EndIf
EndFunc
