; Tuape
; http://www.autoitscript.com/forum/topic/13704-systray-udf/page__hl__systray_udf
#include <Array.au3>
#include <SysTray_UDF.au3>
$Array = _SysTrayIconTitles()
$iCount = UBound($Array)
Global $Array2D[$iCount + 1][4]
$c = 0
For $i = 0 To $iCount - 1
	If $Array[$i] <> '---No title---' Then
		$c += 1
		$Array2D[$c][0] = $Array[$i]
		$Array2D[$c][1] = _SysTrayIconIndex($Array[$i], 1)
		$Array2D[$c][2] = Hex(_SysTrayIconHandle($Array2D[$c][1]), 8)
		$Array2D[$c][3] = WinGetHandle($Array[$i])
	EndIf
Next
ReDim $Array2D[$c + 1][4]
$Array2D[0][0] = $c
_ArrayDisplay($Array2D, 'Array2D')