#include <WinAPIFiles.au3>
Global $sApp_Name = '~MyTitle~'
AutoItWinSetTitle($sApp_Name)
;Only for tests
For $i = 1 To 6
GUICreate('MyWinTitle' & $i)
GUISetState()
Next
_Excec('MyWinTitle1', '{ESC}')
_Excec('MyWinTitle2', '{ESC}')
_Excec('MyWinTitle3', '{ESC}')
_Excec('MyWinTitle4', '{ESC}')
_Excec('MyWinTitle5', '{ESC}')
_Excec('MyWinTitle6', '{ESC}')
Sleep(1000) ;Wait a litle bit to make sure all process are set
ControlSetText('[CLASS:AutoIt v3;TITLE:' & $sApp_Name & ']', '', 'Edit1', 'OK')
Func _Excec($sTitle, $sSend)
Local $sFile = _WinAPI_GetTempFileName(@TempDir)
Local $sSrc = _
"#NoTrayIcon" & @CRLF & _
"While ControlGetText('[CLASS:AutoIt v3;TITLE:" & $sApp_Name & "]', '', 'Edit1') <> 'OK'" & @CRLF & _
"WEnd" & @CRLF & _
"SendKeepActive('" & $sTitle & "')" & @CRLF & _
"Send('" & $sSend & "')" & @CRLF & _
"FileDelete('" & $sFile & "')"
Local $hFile = FileOpen($sFile, 2)
FileWrite($hFile, $sSrc)
FileClose($hFile)
Run(@AutoItExe & ' /AutoIt3ExecuteScript "' & $sFile & '"')
EndFunc