#include <WinAPI.au3>
#include <Array.au3>
_ViewArray()
_Main()

Func _ViewArray()
	Local $aWindows, $s
	$aWindows = _WinAPI_EnumWindows()
	Local $aWindows2D[$aWindows[0][0] + 1][5] = [[$aWindows[0][0]]]
	For $i = 1 To $aWindows[0][0]
		$aWindows2D[$i][0] = $aWindows[$i][0]
		$aWindows2D[$i][1] = $aWindows[$i][1]
		$aWindows2D[$i][2] = WinGetTitle($aWindows[$i][0])
		$aWindows2D[$i][3] = WinGetText($aWindows[$i][0])
		$aWindows2D[$i][4] = WinGetProcess($aWindows[$i][0])
	Next
	$s = Chr(1) ; $s = '|'
	_ArrayDisplay($aWindows2D, "Окна", -1, 0, $s, $s, '№' & $s & 'Дескриптор' & $s & 'Класс' & $s & 'Заголовок' & $s & 'Текст' & $s & 'Процесс')
EndFunc   ;==>_ViewArray

Func _Main()
	Local $aWindows, $i, $text
	$aWindows = _WinAPI_EnumWindows()
	For $i = 1 To $aWindows[0][0]
		$text = "Дескриптор окна: " & $aWindows[$i][0] & @LF
		$text &= "Класс окна: " & $aWindows[$i][1] & @LF
		$text &= "Заголовок окна: " & WinGetTitle($aWindows[$i][0]) & @LF
		$text &= "Текст окна: " & WinGetText($aWindows[$i][0]) & @LF
		$text &= "Процесс окна: " & WinGetProcess($aWindows[$i][0])
		MsgBox(4096, "Пункт " & $i & " из " & $aWindows[0][0], $text)
	Next
EndFunc   ;==>_Main